as/exam_fe/2008_04/Q09/token_call.casl

   1 MAIN    START
   2         LAD     GR1,STR
   3         LAD     GR2,TBL
   4         CALL    TOKEN
   5         RET
   6         DS      93
   7 STR     DC      '  THIS 1234  AN9999.'
   8 TBL     DS      100
   9         END