// JOB ECDK                                                             ECD00010
// OPTION DUMP                                                          ECD00020
// DVC 20  // LFD PRNTR                                                 ECD00030
// GBL F                                                                ECD00040
// IF ('&F(1)' NE 'CR')NOCR                                             ECD00050
// DVC 50                                                               ECD00060
// CR                                                                   ECD00070
// GO LFDNAME                                                           ECD00080
//NOCR NOP                                                              ECD00090
// IF ('&F(1)' EQ '')NOALT                                              ECD00100
// DVC 50  // VOL &F(1)  // LBL &F(2)                                   ECD00110
//LFDNAME NOP                                                           ECD00120
// LFD ALTL                                                             ECD00130
// EXEC E2$CTD,ALTL                                                     ECD00140
// GO DATASET                                                           ECD00150
//NOALT NOP                                                             ECD00160
// EXEC E2$CTD                                                          ECD00170
//DATASET NOP                                                           ECD00180
/&                                                                      ECD00190
