2!(prd:nmbr)(TKL:DATE,7,2)+$(TKL:DATE,1,2)+$(TKL:DATE,4,2)Í+¯2ýW2X2öW2X2X2øW!:«°Í -- specifies database to USE until next USE command is issued. > WAIT -- suspends command file processing uELEPHANT COLLAR HOUSE WRAPPER PORTABLE POOL QUIRKY LITTLE QWARK * RECALL.ndx - $(rcl:date,7,2)+$(rcl:date,1,2)+$(rcl:date,4,2) * places file in chronological order by recall date ** ** ** ** ** ** ** ** Begin command file ** clear set t123345123456258741258963 PORTABLE POOL QUIRKY LITTLE QWARK * RECALL.ndx - $(rcl:date,7,2)+$(rcl:date,1,2)+$(rcl:date,4,2) * places file in chronological order by recall date ** ** ** ** ** ** ** ** Begin command file ** clear set talk off * Load the date test routine into memory and set the call address LOAD datetest SET CALL TO 42240 ERASE * Read the current date, then set the system date STORE ' / / ' TO tmp:date DO WHILE DATE()