/***************OPEN PROGRAM************** 1 FILE$,FD$,1148 #FD$,0;N: #0@ 40,0;FILE$@ 55,0;"PAGE No.:";Nt1 @0,1;((148),80)@ 0,2;"DATE"@ 20,2;"REMARKS"@ 42,2;"IN"@ 57,2;"OUT"@ 70,2;"TOTAL"@ 0,3;((148),80)& B~ 65 r 780 (B);":": B; Nt1}1 s 572 580<@ 20,5;"B/FWD"D A ~ 1 r 14 E 4,2 F Nt1}1 z A~1 s 583 590 G 800 H 600 N 690Xb N~0 s N~1lN~Nt1: #FD$,Nv A~ 1 r 14  M$(A) #FD$,O;N:#0 0A:@ 15,10;"PRESS TO RETURN TO MAIN MENU OR TO END"; T$~$ T$~"R" s 150 685  0::********LAYOUT**********  4,2@ 20,20;"ENTER ";  A$ A~ 1 s 740 750@ 0,0;A$@ 3,At4;A$@ 20,20;(21) @ 20,20;"ENTER ";  B$@ 20,At4;B$ @ 20,20;(21)*@ 20,20;"ENTER ";4 C>@ 40,At4;CH@ 20,20;(21)R@ 20,20;"ENTER ";\ Df@ 55,At4;Dp@ 20,20;(21)z C}~D s 900 910E~EtC:@ 70,(At4);E: 925 C~D s 920 269E~EuD:@ 70,(At4);E: 925+@ 58,19;"PAGE TOTAL:-":T~E:@ 70,19;TM$(A)~(At4)Z~T9@ 20,20;"PRESS SPACE BAR TO CONTINUE OR TO END" Q$~ $ Q$~"E" s 620 970@ 20,20;(21)(21)0@ 20,20;(21))