MVSFORUMS.com

[sankar narayanan]

Hi;
I want to Merge a two PS file(both are in sorted format) to a single PS,but the columns key are different in Both the input files.

Here is the Jcl:

[krisprems]

Hello sankar narayanan
How should the output look like?
_________________
cHEERs
krisprems

[Frank Yaeger]

Also, what is the RECFM and LRECL of each input file?
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

[sankar narayanan]

Hi

I need the output format to be in two ways.

O/P 1:

[sankar narayanan]

Hi
Just adding to the above words.I need the approach to be done only thru JCL and not Thru any Programs or Ezytrives.

Rgds
Sank.

[vkphani]

sankar narayanan,

pls check the below link
http://www.mvsforums.com/helpboards/viewtopic.php?t=10&postdays=0&postorder=asc&highlight=merge+lateral&&start=0

[krisprems]

sankar narayanan
Here you go...

[Nic Clouston]

Krisprems,

Sankar is wanting it done by JCL only (not possible), not by a program. Your solution uses program ICETOOL (PGM=ICETOOL).
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

[krisprems]

Nic Clouston

[Frank Yaeger]

[krisprems]

[Nic Clouston]

So how would you classify a compile/link/go job where the code is inline (PL/1 in my case)? JCL or application program?

Yes, I realise people mean a batch job - probably sort or another utility - but that does ot mean theu should not be precise. Frank is always asking for precise details. Getting the thread into the right area would be nice - I look for JCL problems to resolve - not SORT etc. (If I want to do other things then I look in the appropriate area.)
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

[Frank Yaeger]

I think we'd all agree that it would be great if everyone used the correct terminology and the correct Forums. But unfortunately we have to live with the reality that they don't. You're free to keep pointing out what JCL is and isn't, but it might not do much good since most people don't seem to care about using correct terminology. I've gotten to the point where I only ask for clarification if I need it to come up with a solution. I often just make assumptions rather than asking for clarification. Such is life in the help board jungle.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

[sankar narayanan]

Hi krisprems;

The JCL is getting abend with MAXCC=20.
Plz look to my JCl and correct me if i am wrong in any part of it.

//xxxxxxxP JOB (0009Z,,,CC),'TEST REPT',
// MSGCLASS=L,CLASS=A,NOTIFY=&SYSUID
//*
//STEP02 EXEC PGM=ICETOOL
//IN1 DD DSN=xxxxx.FILE1,DISP=SHR
//IN2 DD DSN=xxxxx.FILE2,DISP=SHR
//TMP1 DD DSN=&&TEMP1,DISP=(MOD,PASS),
// SPACE=(TRK,(5,5)),UNIT=TSTDA
//OUT1 DD DSN=xxxxx.FILE4,DISP=MOD
//OUT2 DD DSN=xxxxx.FILE5,DISP=MOD
//TOOLIN DD *
COPY FROM(IN1) TO(TMP1)
COPY FROM(IN2) TO(TMP1) USING(CP01)
SPLICE FROM(TMP1) TO(OUT2) ON(1,4,ZD) WITH(15,10) USING(CP02)
/*
//CP01CNTL DD *
OUTREC BUILD=(11,4,15:1,10)
/*
//CP02CNTL DD *
OUTFIL FNAMES=OUT1,BUILD=(1,76),FTOV
OUTFIL FNAMES=OUT2,BUILD=(1,10,/,1,5,6:15,10),FTOV
/*

Here File1 and File2 Recfm=FB, Lrecl =80.///ly File4 and File5 Recfm=VB, Lrecl = 2000.

Regds
Sank

[vkphani]

sankar narayanan

You have to post the error messages from the joblog.