Generate a list of scenes that are to be read from tape to the Unitree Central File Manager (UCFM) or disk.
Read an orbital stitch list and generate a list of scenes that are to be read from a specified tape to the Unitree Central File Manager (UCFM) or disk.
- INFILE
- Input file. The file containing the orbital stitch data. See User Note 2 for the format and description of this file.
- TAPEID
- Tape ID. The ID number of the tape for which the appropriate scenes need to be identified.
- DEST
- Destination. The destination of the scenes read from tape:
= DISK: Copy the scenes from tape to disk. = SILO: Copy the scenes from tape to the UCFM.
- STRSCENE(--)
- Starting scene ID. The scene ID within INFILE at which processing will begin. If STRSCENE is not found within INFILE, no scenes will be processed. By default, processing will begin with the first scene ID in INFILE.
- ENDSCENE(--)
- Ending scene ID. The scene ID within INFILE at which processing will end. If defaulted, or ENDSCENE is not found within INFILE, processing will continue to the end of INFILE.
- SCENEID
- Scene ID's. The scene ID's that are to be read from tape TAPEID. These values will be returned in the specified TAE string variable.
- NSCENES
- Number of scene ID's. The number of scene ID's returned in SCENEID. This value will be returned in the specified TAE integer variable.
The input file is read and all of the scenes within the file between AL11063092130017 and AH11072292141577 are considered. If the scene is from the AVHRR archive tape 104569 and does not exist in the ADAPSORB/lndetect directory or the UCFM, the scene ID is returned in SCENEID to the calling PDF. The number of scene ID's in SCENEID is returned in NSCENES.
INFILE is read to determine which scenes are to be found on the tape specified by TAPEID. Only scenes that lie between STRSCENE and ENDSCENE are considered. For DEST=silo, if the scene does not exist on disk and does not exist on the UCFM but a tape ID is specified within INFILE, the scene ID is returned in SCENEID to the calling PDF. The number of scene ID's in SCENEID is returned in NSCENES. For DEST=disk, if the scene does not exist on disk but a tape ID is specified within INFILE, the scene ID is returned in SCENEID to the calling PDF. The number of scene ID's in SCENEID is returned in NSCENES.
A nonfatal error was encountered during processing. The error message that is displayed immediately preceding this message is the specific error that was encountered. Processing will continue.
No scene ID's were found in the input file to report to the calling PDF. Consequently, no scenes are to be read from this tape.
An error occurred closing the input file. Verify the data within the input file.
A fatal error was encountered. The message displayed preceding this message is the error that was encountered. Processing terminates.
An error occurred trying to open the input file. Check the permissions of the path and file to be opened.
An error occurred trying to read the input file. Make certain the input file is in the proper format.
An error occurred while determining the value of ADAPSORB. Verify the value of ADAPSORB.
An error was encountered while trying to return a parameter to TAE. Contact the system administrator.
The File Transfer Protocol is unable to communicate with the UCFM file system. Contact the system administrator.
tapeid mth acqdate start stop ceos st d a source flg 031185 AH 04/01/92 5332 10408 NGC 11 D A 31376 019990 AH 04/01/92 34636 35718 HBT 11 D A 37446 020403 AH 04/01/92 35703 40438 TSV 11 D A 38496 031272 AL 04/01/92 41800 42906 NOA 11 D A 31435 019990 AH 04/01/92 52626 54118 HBT 11 D A 37447 020403 AH 04/01/92 53416 54728 TSV 11 D A 38497 . . . . . .The header is read until the line beginning with "tapeid" has been encountered. Valid lines of data are expected following this line.
local SCENEVAR type=(string,16) count=(0:20) local NUMSCVAR type=integer