I've one sequential file, that file size is LREC=100 (File contain Record

I've one sequential file, that file size is LREC=100 (File
contain Records like 1 to 100). Now I was increase the file
size is LREC=102. My question is I want insert 00 (Two
Zeros) in to the new file (That output file looks like :
00123 up to 100). How will write the SORT card in JCL.
Please let me know.

Question Posted / khbnaidu

2 Answers
10676 Views
Syntel, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

I've one sequential file, that file size is LREC=100 (File contain Records like 1 to 100). No..

Answer / mahesh

Hi,
Please find the JCL below
//JOBCARD
//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=INPUT-FILE,DISP=SHR(100 LENGHT)
//SORTOUT DD DSN=OUTPUT-FILE,DISP=NEW,DCB=(LRECL=102,..)
//.....
//.....
//SYSIN DD *
SORT FIELDS=COPY,
OUTREC BUILD=(1:C'00',3:1,100)
/*

Thanks & Regards,
Mahesh.

Is This Answer Correct ?

29 Yes

0 No

I've one sequential file, that file size is LREC=100 (File contain Records like 1 to 100). No..

Answer / satish

//sysin dd *
option copy
oufil fnames=(ddname),build=(2c'0',1,100)
/*

Is This Answer Correct ?

1 Yes

0 No

Post New Answer