mainframegurukul.com

Sample input and required output : ---------------------------------------- File A : LRECL - 221 , RECFM=FB AField1 AFiled2 AFiled3 AFiled4 AFiled5 <-- Just for information AA........BB........MM.........XX..........11MB AA........BB........NN.........MM..........22MB AA........BB........YY............

Hi, i have two files, File A - LRECL - 221 File B - LRECL - 999 File A AField1 - Column(50:4) AField2 - Column(55:10) AField3 - Column(1:21) AField4 - Column(23:21) AField5 - Column(67:25) File B BField1 - Column(51:4) BField2 - Column(124:10) BField3 - Column(180:21) BField4 - Column(215:25) I want...

I am able to do this using SAS.
But need to try using ICETOOL or SORT.

I want to concatenate 3 input records in different dataset into one record in output dataset:

input1:
99abcdefghijklmno

input2:
123456789

input3:
987654321

Required output:
99abcdefghijklmno 123456789 987654321

//S1 EXEC PGM=SORT //SYSUDUMP DD SYSOUT=* //SYSOUT DD SYSOUT=* //SORTIN DD DSN= input.. //SORTOF1 DD DSN= output1.. //SORTOF2 DD DSN= output2.. //SYSIN DD * SORT FIELDS=COPY OUTFIL FILES=1,INCLUDE=(1,2,SS,EQ,C'00,01,98,99') OUTFIL FILES=2,INCLUDE=(1,2,SS,EQ,C'10') /* Thanks.

input -
00header-record
01Sub-header-record
10d1
10d2
10d3
10d4
10d5
98Sub-trailer-record
99Trailer-record

need output as -

output1-
00header-record
01Sub-header-record
98Sub-trailer-record
99Trailer-record

output2-
10d1
10d2
10d3
10d4
10d5

Can we do this in one step in JCL ??

//FILEAID1 EXEC PGM=FILEAID //SYSPRINT DD SYSOUT=* //DD01 DD DSN=input file,DISP=SHR //DD01O DSN=Output file,DISP=SHR //SYSIN DD * $$DD01 COPYALL IF=(10,EQ,C'AAAA'), ORIF=(10,EQ,C'BBBB'), REPLALL=(5,9,C'DDDD',C'EEEE') /* the problem im facing here is : Even if i give two conditional if . It is check...

I have a file in which there are 20 records.

I want to extract only the 7th, 11th and 16th record.

Is it possible to get these records without any key characters in those records.

Can anyone please suggest me a JCL to do the above.

All Thanks to you Frank ..
I learnt Overlay parameter

I have a dataset in which there are 5 input records .
i want to replace the characters 1234 in the header record and trailer record (topmost and bottom record) by 5678 characters , in the same position.

i want a jcl which will replace the specified characters in the approriate position.

I/p ds :

HEADERxxxx1234xxxx
xxxxx
xxxxx
xxxxx
TRAILERxxxx1234xxxx

o/p :

HEADERxxxx5678xxxx
xxxxx
xxxxx
xxxxx
TRAILERxxxx5678xxxx

can anyone pls suggest me a JCL to get the above ....

I receive 6 files daily . Each having around few records . The trailer of each file has the seq number and record count in different position . example : in File 1 : The Trailer record consists of : FTAXENCRCM1898520110915093313001000084137560000 from this reocrd in file1 i have to extract and displ...

********************************* Top of Data ********************************** NAME OF THE FILE SEQ COUNT FILE1 9002 000123449 ............................ FILE2 9003 000971349 ............................ FILE3 9004 000999949 ............................ FILE4 9005 000976543 ........................

Can anyone suggest a Quality JCL (simple and effiient JCL to send a results in a data set as a email) .

i have 5 different jobs(JCLs) in 5 different ds .
i want to know the syntax and job how to merge them into one job .
so that on submitting that one merged job i should be able to run all the above 5 different jobs.

Please adivse?