2 /CHECKS END OF FILE CONDITION.
3 /ZEROS PASSED VARIABLE + PASSES ITS ADDRESS TO #EOFSW
14 FSTA CHKRTN /RETURN ADDR
15 FLDA 0 /GET PTR TO VARIABLE LIST
21 FLDA% CHKBAS,1 /HERES PTR TO VAR ADDR
28 FSTA #EOFSW /PASS ADDR TO SYS
31 FSTA% CHKBAS /ZERO VAR