home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / database / custcopy.zip / CUSTCOPY.PRG
Text File  |  1987-12-06  |  269b  |  11 lines
  1. ** CUSTCOPY.PRG - outputs data to text file using COPY TO..DELIMITED
  2. PARA datafile,ndxfile,textfile,fldsepar
  3. if len(trim(ndxfile))=0
  4.    use &datafile.
  5. else
  6.    use &datafile. index &ndxfile.
  7. endif
  8. copy to &textfile. delimited with &fldsepar.
  9. close data
  10. return
  11.