終于有helloworld的實(shí)力了，哈哈
?000001?//ST155XX?JOB?,'LIGHTNING',MSGLEVEL=(1,1),MSGCLASS=C,CLASS=C,
?000002?//?NOTIFY=ST155
?000003?//STEP1?EXEC?PGM=IEBGENER
?000004?//SYSPRINT?DD?SYSOUT=*
?000005?//SYSUT1?DD?*
?000006?43521???JESSE?JAMES????00230000200006STO?
?000007?43522???MARY?MCGUIRE???01300001300000NET
?000008?43523???GEORGE?JONES???00829300870805STO
?000009?43524???MARTHA?STEWART?02112702060607CAT
?000010?43525???LORI?LUNDY?????00495300500004NET
?000011?43526???JOHN?CANDY?????04276504276507CAT?
?000012?43527???RICHARD?GREEN??00132500200005STO
?000013?43528???BEV?CRUSHER????15899915699900NET
?000014?43529???G.G.?LIDDY?????00399500427507STO
?000015?43530???HENRY?FONDA????00594500550008STO
?000016?43531???BRENDA?WALLS???00949901100000NET?
?000017?43532???GENIE?BOYD?????00099500100007CAT
?000018?43533???BON?SCOTT??????00149500158506STO
?000019?//SYSUT2?DD?DSN=ST155.SRC.ALL,DISP=(,CATLG),VOL=SER=USER02,
?000020?//?SPACE=(TRK,(2,1)),RECFM=FB,LRECL=80,DSORG=PS,UNIT=3390?
?000021?//SYSIN?DD?DUMMY
?000022?//ST155PPP?JOB?,'LIGHTNING',MSGLEVEL=(1,1),MSGCLASS=C,
?000023?//?CLASS=C,NOTIFY=ST155
?000024?//STEP2?EXEC?PGM=IEBGENER
?000025?//SYSPRINT?DD?SYSOUT=*
?000026?//SYSUT1?DD?DSN=?ST155.SRC.ALL,DISP=(OLD),UNIT=3390
?000027?//SYSUT2?DD?DSN=ST155.ALLFOLD,DISP=(,CATLG),SPACE=(TRK,(10,5,20)),
?000028?//?LRECL=80,RECFM=FB,VOL=SER=USER02,UNIT=3390,DSORG=PO
?000029?//SYSIN?DD?*
?000030???GENERATE?MAXNAME=3,MAXGPS=2?
?000031???MEMBER?NAME=MEM1
?000032??????????RECORD?IDENT=(5,'43524',1)
?000033???MEMBER?NAME=MEM2
?000034??????????RECORD?IDENT=(5,'43530',1)
?000035???MEMBER?NAME=MEM3
?000036?//ST155PTP?JOB?,'LIGHTNING',MSGLEVEL=(1,1),MSGCLASS=B,?
?000037?//?CLASS=B,NOTIFY=ST155
?000038?//STEP3?EXEC?PGM=IEBPTPCH
?000039?//SYSPRINT?DD?SYSOUT=*
?000040?//SYSUT1?DD?DSN=ST155.ALLFOLD,DISP=(OLD),UNIT=3390
?000041?//SYSUT2?DD?SYSOUT=*
?000042?//SYSIN?DD?*?
?000043???PRINT?MAXNAME=3,MAXFLDS=3,TYPORG=PO
?000044???MEMBER?NAME=MEM1
?000045???MEMBER?NAME=MEM2
?000046???MEMBER?NAME=MEM3
嘿嘿，helloworld：
000001?//ST155XX?JOB?,'LIGHTNING',MSGLEVEL=(1,1),MSGCLASS=C,CLASS=C,
?000002?//?NOTIFY=ST155
?000003?//STEP1?EXEC?PGM=IEBGENER
?000004?//SYSPRINT?DD?SYSOUT=*
?000005?//SYSUT1?DD?*
?000006?????????????HELLO?WORLD!
?000007????????HAHAHAHAHAHAHAHAHAHHAHA
?000008????????IIIIIIIIIIIIIIIIIIIIIIII
?000009?????????????????IIIIIII
?000010?????????????????IIIIIII??????????????S
?000011?????????????????IIIIIII
?000012?????????????????IIIIIII
?000013?????????????????IIIIIII
?000014?????????????????IIIIIII
?000015??????IIIIIIIIIIIIIIIIIIIIIIIIIIIII
?000016?//SYSUT2?DD?DSN=ST155.TEST.ABC,DISP=(,CATLG),VOL=SER=USER02,
?000017?//?SPACE=(TRK,(2,1)),RECFM=FB,LRECL=80,DSORG=PS,UNIT=3390
?000018?//SYSIN?DD?DUMMY