//HWINS01T JOB (HW213AB99T,MHEW),'KEN CALDWELL',NOTIFY=HWINS01,         00010000
//    MSGCLASS=Y,TIME=1,MSGLEVEL=(1,1),                                 00020000
//    TYPRUN=SCAN                                                       00030000
//*                                                                     00040000
//STEP1    EXEC COB2UCLG                                                00050000
//                                                                      00060000