Anthony replied to Anthony's discussion Convert Normal/Standard date format to Julian format in Mainframe
"Hi Team,

I have found the way,

//SORTIN DD *
20081231
20090204
20070405
20040331
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
OUTREC BUILD=(1,8,Y4T,TOJUL=Y2T)

Please skip.

Kind regards,
Anthony"
Mar 22, 2017
Anthony replied to Anthony's discussion JOINKEYS Query in Mainframe
"Hi All,

Please skip above query., I am able to tidy up using below,

//SYSIN DD *
JOINKEYS FILE=F1,FIELDS=(1,44,A)
JOINKEYS FILE=F2,FIELDS=(1,44,A)
JOIN UNPAIRED,F1,F2
REFORMAT FIELDS=(F1:1,44,F2:1,92),FILL=C'#'
SORT FIELDS=COPY
OUTFIL FNAMES=NOMAT…"
Jan 30, 2017
Anthony replied to Anthony's discussion Find and count similar fields in each records and display if >20 in Mainframe
"Hi Brian Wood,

Thanks. Sorry, I misused your time. I have tidy up using REXX code.

Kind regards,
Anthony"
Jan 30, 2017