メインフレームの JES で、FTP 経由でディレクトリを取得または一覧表示するジョブがあります。
自分のジョブの OUTPUT DDNames の 1 つまたはすべてが必要な場合は、簡単に実行できます (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 (例: "JESJCLIN") 経由で INPUT DDName の 1 つを取得するにはどうすればよいですか? DIR コマンド経由でも INPUT DDName を使用する方法はありますか?
アップデート
最終的な目標は、たとえば、FTP からジョブを再送信することです。このためには、初期 JCL とすべてが「インライン」である必要があり、どちらも「INPUT ON」を使用してのみアクセスできます。
私はプロダクションの仕事について話しているのではありません。プログラマーによってメインフレームに手動で送信されたプログラマーのジョブ (または「テスト ジョブ」) について話しているのですが、同じプログラマーが送信されたジョブの完全な INPUT 情報にアクセスできるようにしたいと考えています。インライン DD のコンテンツを含むサブミットされた JCL を含む外部 PC ツールは、最終的にそれを使用して何かを行います。ユース ケースの 1 つ (ただし、唯一のものではありません) は、まったく同じジョブを再サブミットすることです。
ありがとう ！