我需要完成一项练习并执行必要的应用程序 分发有关信用卡业务交易的信息,最终目标是在网页上显示交易确认。
我目前的步骤: “运行发布应用程序的JCL必须有一个DD 调用SYSIN以允许应用程序从发布中读取 使用STDIN文件句柄的ZOS.CONTEST3.TXNS文件。“
ZOS.CONTEST3.TXNS包含有关要发布的操作的信息。
我只需要像这样实现一个名为SYSIN的DD语句指向'ZOS.CONTEST3.TXNS'吗?
//SYSIN DD DSN=ZOS.CONTEST3.TXNS,DISP=SHR
JCL代码:
//EXECPUB JOB MSGCLASS=H
//PUBLISH EXEC PGM=PUBAPP,REGION=1024K,
// PARM='MQ03 USER_ID'
//STEPLIB DD DSN=USER_ID.PRTTHREE.LOAD,DISP=SHR
// DD DSN=WMQ.V701.SCSQLOAD,DISP=SHR
// DD DSN=WMQ.V701.SCSQANLE,DISP=SHR
// DD DSN=WMQ.V701.SCSQAUTH,DISP=SHR
//STDOUT DD SYSOUT=*
//STDERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
我已提交作业,这是SDSF中的LOG(没有SYSIN): (在“ST工作状态”中没有提交的作业......)
SDSF SYSLOG 6203.101 MVST MVST 06/07/2014 0W 30042 COLUMNS 1 80
COMMAND INPUT ===> SCROLL ===> PAGE
N 0200000 ZTT1 14158 04:13:08.90 JOB06616 00000281 $HASP100 EXECPUB ON INTRDR FROM TSU06615
S USER_ID
N 0000000 ZTT1 14158 04:13:08.90 JOB06616 00000290 IRR010I USERID USER_ID IS ASSIGNED TO THIS JOB.
N 0020000 ZTT1 14158 04:13:08.94 JOB06616 00000281 ICH70001I USER_ID LAST ACCESS AT 03:58:54 ON SATURDAY, JUNE 7, 2014
N 4000000 ZTT1 14158 04:13:08.94 JOB06616 00000090 $HASP373 EXECPUB STARTED - INIT 1 - CLASS A - SYS MVST
N 0000000 ZTT1 14158 04:13:08.94 JOB06616 00000090 IEF403I EXECPUB - STARTED - TIME=04.13.08
N 0020000 ZTT1 14158 04:13:08.97 JOB06616 00000281 CSV003I REQUESTED MODULE PUBAPP NOT FOUND
N 00A0000 ZTT1 14158 04:13:08.97 JOB06616 00000090 CSV028I ABEND806-04 JOBNAME=EXECPUB STEPNAME=PUBLISH
N 0000000 ZTT1 14158 04:13:08.97 00000290 IEA989I SLIP TRAP ID=X806 MATCHED. JOBNAME=EXECPUB , ASID=002E.
M 0020000 ZTT1 14158 04:13:08.97 JOB06616 00000281 IEA995I SYMPTOM DUMP OUTPUT 402
D 402 00000281 SYSTEM COMPLETION CODE=806 REASON CODE=00000004
D 402 00000281 TIME=04.13.08 SEQ=02152 CPU=0000 ASID=002E
D 402 00000281 PSW AT TIME OF ERROR 070C1000 813DAC4E ILC 2 INTC 0D
D 402 00000281 NO ACTIVE MODULE FOUND
D 402 00000281 NAME=UNKNOWN
D 402 00000281 DATA AT PSW 013DAC48 - 8400181E 0A0D18FB 180C181D
D 402 00000281 AR/GR 0: 99FE0D16/00001E00 1: 00000000/84806000
D 402 00000281 2: 00000000/00000000 3: 00000000/00000000
D 402 00000281 4: 00000000/00000000 5: 00000000/006FF548
D 402 00000281 6: 00000000/000000FF 7: 00000000/00000000
D 402 00000281 8: 00000000/006B1250 9: 00000000/013DB138
D 402 00000281 A: 00000000/00000000 B: 00000000/00000000
D 402 00000281 C: 00000000/00000000 D: 00000000/006B1250
D 402 00000281 E: 00000000/84806000 F: 00000000/00000004
E 402 00000281 END OF SYMPTOM DUMP
M 0000000 ZTT1 14158 04:13:08.98 JOB06616 00000090 IEF450I EXECPUB PUBLISH - ABEND=S806 U0000 REASON=00000004 403
E 403 00000090 TIME=04.13.08
N 0004000 ZTT1 14158 04:13:08.98 JOB06616 00000290 - --TIMINGS (MINS.)--
S ----PAGING COUNTS---
N 0004000 ZTT1 14158 04:13:08.98 JOB06616 00000290 -JOBNAME STEPNAME PROCSTEP RC EXCP CPU SRB CLOCK SERV PG
S PAGE SWAP VIO SWAPS STEPNO
N 0004000 ZTT1 14158 04:13:08.98 JOB06616 00000290 -EXECPUB PUBLISH *S806 18 .00 .00 .00 2248 0
S 0 0 0 0 1
N 0000000 ZTT1 14158 04:13:08.98 JOB06616 00000090 IEF404I EXECPUB - ENDED - TIME=04.13.08
N 0004000 ZTT1 14158 04:13:08.98 JOB06616 00000290 -EXECPUB ENDED. NAME- TOTAL CPU TIME= .00 TOTAL
S ELAPSED TIME= .00
N 4000000 ZTT1 14158 04:13:08.98 JOB06616 00000090 $HASP395 EXECPUB ENDED
N C000000 ZTT1 14158 04:13:09.00 00000090 $HASP309 INIT 1 INACTIVE ******** C=A
MR0000000 ZTT1 14158 04:20:44.63 STARTUP 00000090 $HASP003 RC=(52),D 411
DR 411 00000090 $HASP003 RC=(52),D JQ - NO SELECTABLE ENTRIES FOUND
ER 411 00000090 $HASP003 MATCHING SPECIFICATION
感谢您的关注!
答案 0 :(得分:1)
运行此jobstep的问题在于:
CSV003I REQUESTED MODULE PUBAPP NOT FOUND
CSV028I ABEND806-04 JOBNAME=EXECPUB STEPNAME=PUBLISH
这意味着PUBAPP不在您//STEPLIB DD
上指定的任何加载库中。
可能是:程序无法编译/链接/绑定;它被链接/绑定到错误的库; STEPLIB包含错误的库; STEPLIB包含一个缺少的库。
记住这是一场比赛,一路上可能有很少的陷阱。