COBOL Manual for TNS and TNS/R Programs

Tape Input and Output
HP COBOL Manual for TNS and TNS/R Programs—522555-006
27-24
Executing HP COBOL Programs That Use Tape
Files
Executing HP COBOL Programs That Use Tape
Files
During execution of an HP COBOL program that uses tape files, the operating
environment software and the HP COBOL run-time library monitor:
•
Tape mounting
•
Adherence to rules for using DEFINEs
•
For labeled tapes, consistency of labeled-tape information in the HP COBOL
program, DEFINE, and tape label
You can mount tapes yourself or have an operator mount them.
On a D-series system: To act as the operator, you must use the Tape Utility Program
(TAPECOM) from a super-group user ID (255,nnn ).
Topics:
•
Mount Messages
•
Run-Time Errors
Mount Messages
Mount messages for unlabeled tape files (and labeled tapes files being handled as
such) are issued by an HP COBOL run-time routine; mount messages for labeled tape
files are issued by the labeled-tape processing software.
Example 27-13. DEFINE for Labeled Tape File With Fixed-Length Records and
Standard ASCII Labels
ADD DEFINE =DEF, CLASS TAPE, LABELS ANSI, RECFORM F,&
BLOCKLEN 132, RECLEN 132, FILESEQ 2, EXPIRATION 10
Table 27-7. Effect of LABELS Attribute on Mount Messages
LABELS Attribute Value Software That Issues Mount Messages
None (no LABELS attribute) HP COBOL run-time routine
OMITTED HP COBOL run-time routine
BYPASS HP COBOL run-time routine
ANSI Labeled-tape processing software
IBM Labeled-tape processing software