This statement is only permissible for file copying. It assigns the input file. Furthermore it can also be used to define the response to errors and which user modules are to be used.
ASSIGN-INPUT-FILE | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
FILE =
FILE is used to select an input medium.
When FILE=*DISK-FILE or FILE=*TAPE-FILE is specified, supplementary specifications can be made with the aid of the ADD-FILE-LINK command. When an input file is assigned via a ADD-FILE-LINK command or via an ASSIGN-INPUT-FILE statement, an entry is created in the task file table (TFT) under the link name.
FILE = *DISK-FILE (...)The input file is on disk.
NAME = *STD / <filename 1..54>
Name of the input file. This is not required if the file name has already been specified in a ADD-FILE-LINK command to which the ASSIGN-INPUT-FILE statement refers via the LINK-NAME operand. The file name in the ADD-FILE-LINK command has priority over this entry.
NAME = *STD
The default value is the file name which accompanies the link name defined in the ADD-FILE-LINK command. If no ADD-FILE-LINK command has been issued, the name declared by the LINK-NAME operand is used as the file name.
REMOVE-FILE-LINK =
Defines whether or not and how the TFT entry is to be deleted after file processing or if it is to be retained.
REMOVE-FILE-LINK = *STD
PERCON deletes the TFT entry only if PERCON itself has created it via an ASSIGN-INPUT-FILE statement. If the file has been assigned using a ADD-FILE-LINK
command, the TFT entry is retained.
REMOVE-FILE-LINK = *NO
The TFT entry is retained, regardless of how it was created.
REMOVE-FILE-LINK = *YES(...)
The TFT entry is deleted, regardless of how it was created.
RELEASE-DEVICE = *YES / *NO
Used for management of the disk device after processing; for private disks only. *YES releases the disk device, with *NO the device remains assigned to this task.
OPEN-ERROR =
Controls PERCON’s response to open errors on the input file.
OPEN-ERROR = *STD
Interactive mode: | *DIALOG |
Batch mode: | *FINISH-INPUT(TERMINATION=*ABNORMAL) |
OPEN-ERROR = *FINISH-INPUT(...)
The input files which could be opened up until the input file was addressed are processed.
TERMINATION = *ABNORMAL / *NORMAL
The conversion step is terminated either abnormally or normally.
OPEN-ERROR = *CONTINUE-NEXT-FILE(...)The next input file is processed.
TERMINATION = *ABNORMAL / *NORMAL
The conversion step is terminated either normally or abnormally.
OPEN-ERROR = *DIALOG
Only for input via the terminal. PERCON expects instructions from the terminal regarding further processing.
The following responses are possible:
HA: | The conversion step is terminated abnormally. |
HN: | The conversion step is terminated normally. |
SA: | The next input file is processed. The conversion step is terminated abnormally. |
SN: | The next input file is processed. The conversion step is terminated normally. |
If this operand value is specified in a batch job, the specification is ignored, a warning is output and the default value for batch mode goes into effect.
OPEN-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of open errors”).
PARITY-ERROR =
Controls PERCON’s response if a block of a SAM file cannot be read due to a parity error or if only part of a block can be read.
PARITY-ERROR = *TERMINATE-ABNORMAL
The input and output files are closed and the conversion step is terminated with an error.
PARITY-ERROR = *IGNORE-ERROR
The error is ignored. PERCON reacts as if the block in question could be read. The block is transferred to the output file with the error.
PARITY-ERROR = *CONTINUE-NEXT-BLOCK
The errored block is skipped.
PARITY-ERROR = *DIALOG
Only for input via the terminal. PERCON expects instructions from the terminal relating to further processing. The following responses are possible:
H: | The conversion step is terminated with an error. |
I: | The error is ignored |
S: | The block is skipped |
If this operand value is specified in a batch job, the specification is ignored, a warning is output and the default value goes into effect.
PARITY-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of read/length errors”).
LENGTH-ERROR =
Controls PERCON’s response if a block is to be read whose length deviates from the total number of records contained therein.
LENGTH-ERROR = *TERMINATE-ABNORMAL
The input and output files are closed and the conversion step is terminated with an error.
LENGTH-ERROR = *IGNORE-ERROR
The error is ignored and the block in question is processed despite the error.
LENGTH-ERROR = *CONTINUE-NEXT-BLOCK
The errored block is skipped.
LENGTH-ERROR = *DIALOG
Only for input via the terminal. PERCON expects instructions from the terminal relating to further processing. The following responses are possible:
H: | The conversion step is terminated with an error. |
I: | The error is ignored |
S: | The block is skipped |
If this operand value is specified in a batch job, the specification is ignored, a warning is output and the default value goes into effect.
LENGTH-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of read/length errors”).
EMPTY-BLOCK =
Specifies how empty blocks are to be processed (see “PAM input files”).
EMPTY-BLOCK = *STD
*SKIP when BLOCK-CONTROL-INFO = *PAMKEY,
*TAKE when BLOCK-CONTROL-INFO = *WITHIN-DATA.
EMPTY-BLOCK = *TAKE
Empty blocks are treated like input records.
EMPTY-BLOCK = *SKIP
Empty blocks are skipped.
FILE = *TAPE-FILE(...)The input file is on tape.
NAME = *STD / <filename 1..54>
Specifies the name of the input file.
This is not required if the file name has already been specified in a ADD-FILE-LINK command to which the ASSIGN-INPUT-FILE statement refers via the LINK-NAME operand. The file name in the ADD-FILE-LINK command has priority over the one specified here.
NAME = *STD
The default value is the name associated with the link name specified in the ADD-FILE-LINK command. If no ADD-FILE-LINK command has been issued, the name declared in the LINK-NAME operand is used as the file name.
REMOVE-FILE-LINK =
Defines whether or not and how the TFT entry is to be deleted after processing or if it is to be retained.
RELEASE-DEVICE = *STD
PERCON deletes the TFT entry only if the entry has been created by PERCON itself by means of an ASSIGN-INPUT-FILE statement. If the file has been assigned using a ADD-FILE-LINK command, the TFT entry is retained.
REMOVE-FILE-LINK = *NO
The TFT entry is retained, regardless of how it was created.
REMOVE-FILE-LINK = *YES(...)
The TFT entry is deleted, regardless of how it was created.
RELEASE-DEVICE = *YES / *NO
Is used to manage the tape device after processing. The device is released when *YES is entered and remains assigned to this task when *NO is entered.
UNLOAD-RELEASED-TAPE = *NO / *YES
Is used for management of the tape after processing. The tape remains loaded when *NO is entered, and is unloaded when *YES is entered.
END-POSITION =
Specifies how the tape is to be positioned after the file has been processed.
END-POSITION = *BEGIN-OF-TAPE
The tape is wound back to the BOT marker.
END-POSITION = *BEGIN-OF-FILE
The tape is positioned to the beginning of the file that has just been processed.
END-POSITION = *END-OF-FILE
The position of the tape is not changed after processing.
END-POSITION = *UNLOAD-TAPE
The tape is rewound and unloaded.
CODE-TRANSLATION =
Specifies whether code conversion is to be performed for the input records.
CODE-TRANSLATION = *NO
No code conversion is to take place.
CODE-TRANSLATION = *MODULE(...)
The code conversion table resides in the module library assigned by means of SET-TASKLIB. Its contents are the 256 hexadecimal encryptions (X’00’ to X’FF’) of the characters to be converted to the input characters.
Conversion is based on the hexadecimal value of the input character. This value is added to the start address of the conversion table; the character at the resulting position of the conversion table replaces the input character.
NAME = <name 1..8>
Name of the user module or entry point in the user module containing the code conversion table.
LABEL-EXIT =
Defines user label processing.
LABEL-EXIT = *NO
User modules are not processed separately.
LABEL-EXIT = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for label processing”).
CONTROLLED-LABEL =
Control branches to the user module when user labels are specified.
CONTROLLED-LABEL = *STD
Control branches to the user module when the following four user labels are processed. VOL-USER-LABEL, HDR-USER-LABEL, EOV-USER-LABEL, END-USER-LABEL
CONTROLLED-LABEL = *VOL-USER-LABEL
Control branches to the user module when the user volume labels are processed.
CONTROLLED-LABEL = *HDR-USER-LABEL
Control branches to the user module when the user header labels are processed.
CONTROLLED LABEL = *EOV-USER-LABEL
Control branches to the user module when the user end-of-volume labels are processed for a tape swap.
CONTROLLED-LABEL = *END-USER-LABEL
Control branches to the user module when the user end labels are processed.
CONTROLLED-LABEL = *CLOSE-POSITION
Control branches to the user module to position the tape during CLOSE processing.
CONTROLLED-LABEL = *LABEL-ERROR
Control branches to the user module in the event of end-of-tape errors.
LABEL-EXIT = *SYSOUT(...)
PERCON logs the user labels to SYSOUT. This specification is only permitted for files with standard labels.
CONTROLLED-LABEL =
The specified user label groups are output to SYSOUT.
CONTROLLED-LABEL = *STD
The following user label groups are output to SYSOUT: VOL-USER-LABEL, HDR-USER-LABEL, EOV-USER-LABEL, END-USER-LABEL
CONTROLLED-LABEL = *VOL-USER-LABEL
User volume labels are output to SYSOUT.
CONTROLLED-LABEL = *HDR-USER-LABEL
User header labels are output to SYSOUT.
CONTROLLED-LABEL = *EOV-USER-LABEL
User end-of-volume labels are output to SYSOUT.
CONTROLLED-LABEL = *END-USER-LABEL
User end labels are output to SYSOUT.
OPEN-ERROR =
Controls PERCON’s response to open errors in the input file.
OPEN-ERROR = *STD
Interactive mode: | *DIALOG |
Batch mode: | *FINISH-INPUT(TERMINATION=*ABNORMAL) |
OPEN-ERROR = *FINISH-INPUT(...)
The input files which could be opened up until the specified input file are processed.
TERMINATION = *ABNORMAL / *NORMAL
The conversion step is terminated either abnormally or normally.
OPEN-ERROR = *CONTINUE-NEXT-FILE(...)
The next input file is processed.
TERMINATION = *ABNORMAL / *NORMAL
The conversion step is terminated either abnormally or normally.
OPEN-ERROR = *DIALOG
Only for input from the terminal. PERCON expects instructions from the terminal relating to further processing. The following responses are possible:
HA: | The conversion step is terminated abnormally. |
HN: | The conversion step is terminated normally. |
SA: | The next input file is processed. The conversion step is terminated abnormally. |
SN: | The next input file is processed. The conversion step is terminated normally. |
If this operand value is specified in a batch job, the specification is ignored, a warning is issued and the default value for batch mode becomes effective.
OPEN-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of open errors”).
PARITY-ERROR =
Controls PERCON’s response if a block of a SAM file or BTAM file cannot be read due to a parity error or if only part of a block can be read.
PARITY-ERROR = *TERMINATE-ABNORMAL
The input and output files are closed and the conversion step is terminated with an error.
PARITY-ERROR = *IGNORE-ERROR
The error is ignored. PERCON reacts as if the block in question could be read. The block, including the error, is transferred to the output file.
PARITY-ERROR = *CONTINUE-NEXT-BLOCK
The errored block is skipped.
PARITY-ERROR = *DIALOG
Only for input via the terminal. PERCON expects instructions from the terminal relating to further processing.
The following responses are possible:
H: | The conversion step is terminated with an error. |
I: | The error is ignored |
S: | The block is skipped |
If this operand value is specified in a batch job, the specification is ignored, a warning is issued and the default value goes into effect.
PARITY-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of read/length errors”).
LENGTH-ERROR =
Controls PERCON’s response if a block is to be read whose length deviates from the value defined in the BUFFER-LENGTH operand of the ADD-FILE-LINK command.
LENGTH-ERROR = *TERMINATE-ABNORMAL
The input and output files are closed and the conversion step is terminated with an error.
LENGTH-ERROR = *IGNORE-ERROR
The error is ignored and the block in question is processed despite the error.
LENGTH-ERROR = *CONTINUE-NEXT-BLOCK
The errored block is skipped.
LENGTH-ERROR = *DIALOG
Only for input from the terminal. PERCON expects instructions from the terminal relating to further processing.
The following responses are possible:
H: | The conversion step is terminated with an error. |
I: | The error is ignored |
S: | The block is skipped |
If this operand value is specified in a batch job, the specification is ignored, a warning is issued and the default value goes into effect.
LENGTH-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of read/length errors”).
EMPTY-BLOCK =
Specifies how empty blocks are to be processed (see also “PAM input files”).
EMPTY-BLOCK = *STD
*SKIP when BLOCK-CONTROL-INFO = *PAMKEY,
*TAKE when BLOCK-CONTROL-INFO = *WITHIN-DATA.
EMPTY-BLOCK = *TAKE
Empty blocks are treated as input records.
EMPTY-BLOCK = *SKIP
Empty blocks are skipped.
FILE = *SYSDTA(...)
Input is from the SYSDTA system file. Input begins with the record read from SYSDTA after either the START-CONVERSION or END statement and terminates when the end-of-file condition is encountered. This happens when:
a record begins with “/EOF”
the end of a cataloged file is reached
a BS2000 command is recognized in a procedure or a batch job.
Notes
When the end-of-file condition is encountered when reading a file, SYSDTA is assigned to SYSCMD again.
When the data is entered via terminal, the EOF condition is signaled by the following sequence:
interrupt key K2
/EOF
/RESUME-PROGRAM
RECORD-SIZE = 32767 / <integer 4..32767>
Specifies the maximum length of the records to be processed.
INPUT-ERROR =
Controls PERCON’s response when an input error occurs.
INPUT-ERROR = *TERMINATE-ABNORMAL
The input and output files are closed and the conversion step is terminated with an error.
INPUT-ERROR = *IGNORE-ERROR
The error is ignored. PERCON responds as if the record in question could be read. The record is transferred with the error.
INPUT-ERROR = *CONTINUE-NEXT-BLOCK
The errored record is skipped.
INPUT-ERROR = *DIALOG
Only for input via the terminal. PERCON expects instructions from the terminal relating to further processing. The following responses are possible:
H: | The conversion step is terminated with an error. |
I: | The error is ignored |
S: | The record is skipped |
If this operand value is specified in a batch job, the specification is ignored, a warning is issued and the default value goes into effect.
INPUT-ERROR = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for the recovery of read/length errors”).
LINK-NAME = PCIN / <filename 1..8 without-gen>
PERCON link name used for reference in keywords and the ADD-FILE-LINK command.
INPUT-EXIT =
Defines the name of the user module or entry point in the user module which processes the input records immediately after reading.
INPUT-EXIT = *NO
No processing by the user module
INPUT-EXIT = *MODULE(...)
NAME = <name 1..8>
Name of the user module or entry point in the user module which handles further processing (see “Interface for input”).