ログの抽出をJCLで出来ないか?

3:Re:ログの抽出をJCLで出来ないか?
0e0e 04/09 10:43

/SET SKIP;                                                                 0001
/RUN #LGEDT;                                                               0002
02_SYS@LOG_XXXJOBLOG_MSD_MSD001_                                           0003
/> ;                                                                       0004
/RUN XXXXXX,FIL=XXX-LML,DEV=MSD;                                           0008
/> ;                                                                       0009
/RUN #ABC,DEV=MSD;                                                         0010
MN1=01_MN2=01_MN3=02_PA1=MSD001_PA2=XXXJOBLOG_O03=YES_EXP=YES_             0011
MN1=99_                                                                    0013
/> ;                                                                       0014


こんなのでXXXJOBLOG(仮)というファイルに抜けます。

 256/1 RELATIVE

そのままでは中身が見えませんので、COBOLのプログラムの最初で
CALL ”SYSEDWR” を使ってファイルの最後にEODをつけます。
あとは好き勝手にデータ処理できます。


1-

BluesBB ©Sting_Band