home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / database / dba0187.zip / ADDNEW.SC next >
Text File  |  1986-12-05  |  384b  |  16 lines
  1.  
  2. ;------------------------------------- AddNew.SC.
  3. ; -- Script to add new records to CustList table.
  4.  
  5. ; -- Make menu selections.
  6. CLEARALL {Modify} {DataEntry} {CustList}
  7. MENU {Image} {PickForm} {1}
  8. ; -- Allow new records until F2 pressed.
  9. WAIT TABLE
  10.      MESSAGE "Press F2 when done"
  11.      UNTIL "F2"
  12. ; -- Save new records, then clear everything.
  13. DO_IT!
  14. CLEARALL
  15. CLEAR
  16.