//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.PROCS.BATCH.LIB                            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