从FTP(JES)

时间:2016-10-19 15:08:55

标签: ftp mainframe zos jcl mvs

我在JES上找到了我要检索的主机上的工作或通过FTP列出目录。

如果我想要工作的一个或所有OUTPUT DDNames,我能够轻松完成 (在SDSF中,使用" INPUT OFF"命令)

SDSF JOB DATA SET DISPLAY - JOB MYUSERUL (JOB06197)    LINE 1-8 (8)
COMMAND INPUT ===>                                            SCROLL ===> PAGE
PREFIX=*  DEST=(ALL)  OWNER=*  SYSNAME=
NP   DDNAME   StepName ProcStep DSID Owner    C Dest               Rec-Cnt Page
     JESMSGLG JES2                 2 MYUSER   X LOCAL                   16
     JESJCL   JES2                 3 MYUSER   X LOCAL                   74
     JESYSMSG JES2                 4 MYUSER   X LOCAL                  152
     FILESEQ  ETAPE010           103 MYUSER   X LOCAL                   10
     PRINT    ETAPE010           104 MYUSER   X LOCAL                   17
     IMPRIM   ETAPE020           107 MYUSER   X LOCAL                   28
     LISTUTV  ETAPE020           110 MYUSER   X LOCAL                    2
     LISTE    ETAPE020           111 MYUSER   X LOCAL                    4

为此,我执行DIR命令,然后执行带有DDName id的GET命令。

ftp> dir j06197
200 Port request OK.
125 List started OK for JESJOBNAME=MYUSER*, JESSTATUS=ALL and JESOWNER=MYUSER
JOBNAME  JOBID    OWNER    STATUS CLASS
MYUSERUL JOB06197 MYUSER   OUTPUT T        RC=0000
--------
         ID  STEPNAME PROCSTEP C DDNAME   BYTE-COUNT
         001 JES2              X JESMSGLG       688
         002 JES2              X JESJCL        2735
         003 JES2              X JESYSMSG      9553
         004 ETAPE010          X FILESEQ        244
         005 ETAPE010          X PRINT         1116
         006 ETAPE020          X IMPRIM        3504
         007 ETAPE020          X LISTUTV        173
         008 ETAPE020          X LISTE          248
8 spool files
250 List completed successfully.
ftp> get j06197.1 D:\test.txt

不幸的是,我正在寻找的信息在INPUT DDNames中 (在SDSF中,使用" INPUT ON"命令)

SDSF JOB DATA SET DISPLAY - JOB MYUSERUL (JOB06197)    LINE 1-13 (13)
COMMAND INPUT ===>                                            SCROLL ===> PAGE
PREFIX=*  DEST=(ALL)  OWNER=*  SYSNAME=
NP   DDNAME   StepName ProcStep DSID Owner    C Dest               Rec-Cnt Page
     JESJCLIN                      1 MYUSER   X                         55
     JESMSGLG JES2                 2 MYUSER   X LOCAL                   16
     JESJCL   JES2                 3 MYUSER   X LOCAL                   74
     JESYSMSG JES2                 4 MYUSER   X LOCAL                  152
     $INTTEXT JES2                 5 MYUSER   A                         25
     $JOURNAL                      6 MYUSER   A                        175
     FICIN    ETAPE010           101 MYUSER   X                          3
     CARTE    ETAPE020           102 MYUSER   X                          2
     FILESEQ  ETAPE010           103 MYUSER   X LOCAL                   10
     PRINT    ETAPE010           104 MYUSER   X LOCAL                   17
     IMPRIM   ETAPE020           107 MYUSER   X LOCAL                   28
     LISTUTV  ETAPE020           110 MYUSER   X LOCAL                    2
     LISTE    ETAPE020           111 MYUSER   X LOCAL                    4

如何通过FTP检索其中一个INPUT DDName(例如:" JESJCLIN") 有没有办法通过DIR命令来输入INPUT DDNames?

更新

例如,Utimate目标是从FTP重新提交作业。为此我需要初始的JCL以及所有内容"内联",两者都只能使用" INPUT ON"

我绝不会谈论生产工作。我正在谈论程序员在大型机上手动提交的程序员工作(或者#34;测试工作"),我希望这对同一个程序员来说是可能的通过外部PC工具访问提交作业的完整INPUT信息,包括提交的JCL以及内联DD的内容,最终用它做一些事情,一个示例用例(但不是唯一的用例)将重新提交准确的工作。

谢谢!

0 个答案:

没有答案