mainframegurukul.com

Next to the first line put the 'SORTED' parametre. Like this:


This indicates that F1 and F2 are sorted and save you time and space. Try it!

Finally I made the sort to convert those numeric fields... //******************************************************************** //STEP0040 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //SHOWDEF DD SYSOUT=* //ENT1 DD DSN=ENTRADA1 //SAL1 DD DSN=SALIDA1,DISP=(NEW,CATLG), // SPA...

Can you show us how the 3 output files should be? Also add the 'cols' line to see better the input file.

Hi guys, somebody know a freeware app to draw flowchart from a job on plain text?
I find some, but all are shareware. Do you know someone to recommend?
Thanks!

OK. I got this: //STEP0040 EXEC PGM=SORT //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SORTIN DD DSN=INFILE,DISP=SHR //SORTOUT DD DSN=OUTFILE, // DISP=(NEW,CATLG), // SPACE=(TRK,(10,10),RLSE), // DCB=(RECFM=FB,DSORG=PS,LRECL=250,BLKSIZE=0) //SYSIN DD * SORT FIELDS=COP...

Hi guys, I try to convert a number (ZD without sign) to PD, but the sign is unpacked at the end. My SORTIN: ----+----1----+----2----+----3----+----4-- CONV0000089800000002346768+00000000000000+ CONV0000095000000022186672-00000000000000+ CONV0000102600000023887500+00000000000000+ DEPO0017991200000229...

You may do a JOINKEYS sort (my favorite sentence in dfsort!) to do that, here a simple example: //JKE5 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTJNF1 DD DSN=FIRST.FILE,DISP=SHR //SORTJNF2 DD DSN=SECOND.FILE,DISP=SHR //F1ONLY DD SYSOUT=* //F2ONLY DD SYSOUT=* //BOTH DD SYSOUT=* //SYSIN DD * * Control s...