如何使用SYSIN？

Question

我有一个练习，我需要完成并执行必要的应用程序来分发有关信用卡交易的信息，最终目标是在网页上显示交易的确认情况。

我的当前步骤是：“运行发布应用程序的JCL必须有一个名为SYSIN的DD，以允许应用程序使用STDIN文件句柄从发布的ZOS.CONTEST3.TXNS文件中读取。”

to包含有关要发布的操作的信息。

我只需要实现一个名为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中的日志(没有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

感谢您的关注！

Answer 1

您在运行此作业步骤时遇到的问题如下：

CSV003I REQUESTED MODULE PUBAPP   NOT FOUND  
CSV028I ABEND806-04  JOBNAME=EXECPUB   STEPNAME=PUBLISH 

这意味着PUBAPP不在您在//STEPLIB DD上指定的任何加载库中。

可能是:程序无法编译/链接/绑定；它被链接/绑定到错误的库；STEPLIB包含错误的库；STEPLIB包含缺少的库。

记住，这是一场比赛，在这过程中可能会有一些小陷阱。