Tuesday, December 30, 2008

How to show MVS code within blog

add code within a table and td style="font-family: Courier, 'Courier New', sans-serif; font-size: 11px; color: #00FF00;background-color: #000000; border: #D1D7DC; border-style: solid;border-left-width: 1px; border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px"

Code:
//SORT01 EXEC PGM=SORT
//SORTJNF1 DD *
f123
f456
f789
//SORTJNF2 DD *
s123
s456
s789
//SORTOUT DD SYSOUT=*
//SYSIN DD *
JOINKEYS FILE=F1,FIELDS=(2,3,A)
JOINKEYS FILE=F2,FIELDS=(2,3,A)
REFORMAT FIELDS=(F2:1,7)
SORT FIELDS=COPY
END
/*

No comments:

Post a Comment