26 lines
2.0 KiB
Plaintext
26 lines
2.0 KiB
Plaintext
//ECNTGD17 JOB (UI,4300,3400,T),RUNBX347,CLASS=S, 00010099
|
|
// MSGCLASS=X, 00020061
|
|
// NOTIFY=ECNTSUP, 00030099
|
|
// REGION=0M 00050022
|
|
//**** 00060025
|
|
//* BUILD ATC TRANSACTION UPDATE FILE EXTRACT FOR 00070099
|
|
//* EXPORT TO SERVER DATABASE. 00081099
|
|
//* 00082099
|
|
//* NO MASTER FILE UPDATES 00090099
|
|
//* 00100099
|
|
//* 00110099
|
|
//**** 00130090
|
|
// SET LVLNODE='PROD' 00140099
|
|
// SET MSTNODE='PROD' 00150099
|
|
//**** 00151099
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCLIB 00160099
|
|
//**** 00170036
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00180036
|
|
//**** 00190086
|
|
//STEP0100 EXEC DTSBX347 EXTRACT MAINFRAME DATA 00200099
|
|
//* 00250099
|
|
//STEP0100.DTSFBTCO DD DUMMY 00260099
|
|
//STEP0100.DTSFVRO1 DD DUMMY 00270099
|
|
//* 00280099
|
|
//**** 00284099
|