job  01A4
               ctl  6611
               org  420
420  start     CS   332
424            CS
425            LCA  data,332
432  loop1     SW   201,loop1&1
439            A    k001,loop1&3
446            BW   loop2,332 
454            CW   loop1&1
458            B    loop1
462  loop2     W
463            WM
465            B    loop2
               dc   #1
               dcw  @ABCDEFGHIJKLMNOPQRSTUVWXYZ@
               dc   @1234567890.,/&)-$*%#@@
               dc   @ABCDEFGHIJKLMNOPQRSTUVWXYZ@
               dc   @1234567890.,/&)-$*%#@@
               dc   @ABCDEFGHIJKLMNOPQRSTUVWXYZ@
     data      dc   @1234567890.@
     k001      dcw  001
               end  start