as/summary_call.casl

   1 MAIN    START
   2         LAD GR1,DATA
   3         LD  GR0,CNT
   4         CALL SUMMARY
   5         RET
   6 DATA    DC  #9600,#F000,#A400
   7 CNT     DC  3
   8         END