Well, as most machine-CC operates after the line is printed, and ASA-CC operates before, I'd think it would be more complicated than that.
sas On Mon, Dec 6, 2021 at 2:58 PM Sri h Kolusu <[email protected]> wrote: > > DFSORT job to convert FBM to FBA? -- > > Michael, > > Try this. > > /STEP0100 EXEC PGM=SORT > //SYSOUT DD SYSOUT=* > //SORTIN DD DISP=SHR,DSN=your.FBM.file > //SORTOUT DD DSN=Your.FBA.File, > // DISP=(NEW,CATLG,DELETE), > // SPACE=(CYL,(X,Y),RLSE) > //SYSIN DD * > OPTION COPY > INREC FINDREP=(ENDPOS=1, > INOUT=(X'01',C'+',X'03',C'+', > X'0B',C' ',X'09',C' ', > X'13',C'0',X'11',C'0', > X'1B',C'-',X'19',C'-', > X'8B',C'1',X'89',C'1', > X'93',C'2',X'81',C'2', > X'9B',C'3',X'99',C'3', > X'A3',C'4',X'A1',C'4', > X'AB',C'5',X'A9',C'5', > X'B3',C'6',X'B1',C'6', > X'BB',C'7',X'B9',C'7', > X'C3',C'8',X'C1',C'8', > X'CB',C'9',X'C9',C'9', > X'D3',C'A',X'C1',C'A', > X'DB',C'B',X'D9',C'B', > X'E3',C'C',X'E1',C'C')) > /* > > Thanks, > Kolusu > DFSORT Development > IBM Corporation > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
