Coastal & Marine Geology InfoBank

Home FACS Activities Atlas Geology School Related Sites More

USGS InfoBank program -- copyfiles

Skip navigational links
Loading
InfoBank Programs: by Name   by Topic  
Expanded Description
Topic Description
Name
copyfiles
Synopsis
/infobank/programs/dbase/misc/infobank/copyfiles.for
Description
  Subroutine to write and execute a command procedure to copy files.

       
AUTHOR
  Clint Steele     1/25/95


    
Reads
      read (5, '(q,a)', end = 99) 
     *         SaveLength,SaveOption(1:SaveLength)
Writes
      write (FileFlag, 525)
Opens
Calls
          call stringlen (SaveOption, SaveLength)
      call changecase ('CAPITALS', SaveOption)
          call helper ('OUTPUTMENU','??')
          call helper ('OUTPUTMENU','?')
          call commenter ('CopyFiles Menu')
      call setcopyflags (SaveOption, FileFlag)
      call makefilelist
     *    (Activity, KeepFlag, 
     *     FileList, FileFlag, FileCount, 'COPY')
      call commaker
     *    (FileList, FileCount, SaveOption, SaveOptionKeep)

Skip footer navigational links

Coastal and Marine Science Centers:  Pacific   St. Petersburg   Woods Hole  
InfoBank   Coastal and Marine Geology Program   Geologic Information   Ask-A-Geologist   USGS Disclaimer  


Accessibility FOIA Privacy Policies and Notices

Take Pride in America logo USA.gov logo U.S. Department of the Interior | U.S. Geological Survey
URL: http://walrus.wr.usgs.gov/infobank/programs/dbase/misc/infobank/copyfiles.doc.html
Page Contact Information: InfoBank staff
Page Last Modified: Mon Sep 16 03:37:45 PDT 2013  (chd)