CD RECSEBYRECSECBYTRNULASTFIRSTAREAEXCHPNUMWORKUSERINLE@@ dNOTE & POINT DISK UPDATEnBY JERRY WHITEsANTIC MAGAZINExThis program demonstrates!!random access disk updatingusing NOTE and POINT. A""ĠήԠĠś""үŠΠӠ 6-%@ @"@("( !(  !( 68,-68,- A#6-&@#ARŠЛ"7 A(7(" ENTER RECORD NUMBER TO UPDATE OR,($( TYPE 0 AND RETURN TO QUIT(6 6-P:,(A@L @)! (>:A%,B( ENTER A NUMBER FROM 1 TO L AJ%@8,8,%@T16.7@<@,16.7@<@$,^16.7@%<@',16.7@(<@0,h'6.7@1<@4,'(>:A%,r))(!ENTER UPDATED INFORMATION OR JUST|,,($PRESS RETURN TO LEAVE ITEM UNCHANGED+ 6. 67@4,. +67@,.(( LAST NAME: C 6-B:,(967@<@,.7@<@,C A067@<,.(( FIRST NAME: C 6-B:,(967@<@$,.7@<@$,C A`67@<@%,.(( AREA CODE: C 6-B:,(967@%<@',.7@%<@',C A67@%<@$%,.(( EXCHANGE: C 6-B:,(967@(<@0,.7@(<@0,C A 67@(<@'%,.((NUMBER: C 6-B:,(967@1<@4,.7@1<@4,C AP67@1<@0%,.&@8,8,0 @::@:@@D:TELEPHON.DATD AN0 +((BASIC"(IS-@0b͠ΛvRR;@,;@,;@,;@,;@,;@4,;@4,&&9A,9A,;@,U +@@1@@9CAR@UAA`Šˠٛ'@@d'B7tA-(-(" TELEPHON.DAT RANDOM ACCESS UPDATE+(+( INSERT TELEPHON.DAT DISK THEN*('( PRESS WHEN READY*(FAU@*F:B2y,@<AU@F AD AP@D@@D:TELEPHON.DAT06-(>:A%,& AP0 AD:UPDATE