@echo off

rem The Library Access program passes 5 parameters when executing the FILE
rem TO RUN option.  These parameters are:

rem %1 = DRIVE LETTER (A:)              %4 = CURRENT DATE
rem %2 = FILE NUMBER                    %5 = CURRENT TIME
rem %3 = FILE NAME (.LZH)               %6 = PRT FILENAME

rem To Create a LOG FILE and have copy information appended to it use the
rem double greater than symbols. 
rem ***************************************************************************

rem echo %2 %3 copied to %1 at %5 on %4
rem echo.
rem echo This information has been appended to a file named COPY.LOG.
rem echo Edit the SAMPLE.BAT file for more information on using this feature.
echo.

rem PAUSE

echo.
rem ***************************************************************************

rem If you use this system be sure to delete the log file occasionally as it
rem will continue to grow each time a copy is made.  If you use this batch file
rem you should remove the PAUSE and all the ECHO statements except the one that
rem writes to a file.  This batch file could also be used to copy files to each
rem disk being made.  Example:

rem COPY HELPFILE.TXT %1

rem This command would cause the file HELPFILE.TXT to be copied to each disk
rem being made.
rem ***************************************************************************
rem GOTO chkdrive

rem This batch file can be used to call the LPRINT.EXE program to print a
rem label each time a program is copied.  Unremark the following line to
rem demonstrate this.

LPRINT /R%6 /P%2

rem To use this batch file to print labels from the SSLIB program you would
rem need to change to the \APLUS\COPYCAT directory, run the LPRINT program
rem then change back to the \APLUS\SSLIB directory.  Example:

rem     CD\APLUS\COPYCAT
rem     LPRINT /R%6 /P%2
rem     CD\APLUS\SSLIB     

rem The LPRINT program looks for it's files in the currently logged directory.
GOTO Endit
rem ***************************************************************************

rem This batch file can print both 3 1/2 and 5 1/4 inch labels.  Simply
rem uncomment the GOTO chkdrive line to enable this feature. If your 3 1/2
rem inch drive is not DRIVE A: you will need to edit this file to change
rem the drive letter designations.

:chkdrive
if %1 == A: GOTO print3
if %1 == B: GOTO print5

:print3
FULL3 /R%6 /P%2
GOTO endit

:print5
FULL5 /R%6 /P%2
GOTO endit

:endit