You enter here more physical information about the Report
line Definition in the Program.
- Physical unit type
- The possible unit type varies according to the Type
of COBOL code:
- Type of COBOL code = 1: IBM
DOS/VSE: Enter the model type (examples: 2314, 3330, 2400)
- Type of COBOL code = 3: UNIX,
WINDOWS:
- EXT: Generation of the EXTERNAL clause
at the file FD level
- LS: Generation of the LINE SEQUENTIAL clause
- EXLS: Generation of the LINE SEQUENTIAL clause
and of the EXTERNAL clause at the file FD level
- Type of COBOL code = Q: ACUCOBOL:
- LS: Generation of the LINE SEQUENTIAL clause
- Type of COBOL code = 4: BULL
GCOS7:
- SSF: Option WITH SSF in
the SELECT clause
- OUT: Option -SYSOUT suffix
after the file name in the SELECT clause (WITH
SSF is generated).
- Type of COBOL code = 5: BULL
GCOS8:
- PT: Printer
- CR: Card reader
- SSF: ORGANIZATION IS GFRC SEQUENTIAL
SSF CODE SET IS GBCD
- IBM: ORGANIZATION IS IBM-OS SEQUENTIAL
- xxx: WITH xxx
A V in the fourth position generates the
clause VALUE OF FILE-ID is 3-FF00-IDENT (FF is
the Data Structure Code in program). The field 3-FF00-IDENT must
be defined in work areas by the user.
- Type of COBOL code = 8: UNYSIS
A Series:
- DK or blank: disk
- DKS: sort disk (with T opening).
- DKM: merge disk (with T opening).
- RD: reader.
- PT: printer.
- PO: file.
- TP: tape.
For the two-character codes, a third character can specify a
particular final disposition:- P: purge
- R: release
- L: lock
- S: save
A V in the fourth position generates the
clause VALUE OF D.S. NAME IS 3-FF00-IDENT.
- Type of COBOL code = U: UNYSIS
2200 Series:
- CR: Card reader
- CP: Card punch
- .UN: UNISERVO
- .TP: tape
- PN: printer with external name. If the Complement field
contains a value, the RECORDING clause is also generated.
- PT: printer without external name
- PF: printer with external name and:
- VALUE OF PRINTER-FORMS 3-FF00-FORMS
- LINAGE IS 3-FF00-LINES
- TOP IS 3-FF00-TOP
- BOTTOM IS 3-FF00-BOTTOM
These four data names are to be declared in work area lines with
their appropriate values.
- Type of COBOL code = O: AS/400:
- RD: reader.
- CP: card punch
- DB: database
- PT: printer.
- TP: tape.
- DK or blank: disk.
- Complement
- It is a complement to the Physical unit type field.
The purpose of this field varies according to the Type
of COBOL code.
Table 1. Values of the
complement to the physical unit typeValue |
Type of COBOL code |
R: reader |
1: IBM DOS/VSE |
P: punch |
1: IBM DOS/VSE |
S: EBCDIC set code |
5: BULL GCOS8 and U:
UNYSIS 2200 Series |
C: ASCII set code |
5: BULL GCOS8 |
O: OPTIONAL option not to be generated |
4: BULL GCOS7 and 5:
BULL GCOS8 |
A: ALLOWING ALL file optioning option
& REGARDLESS sequential reading |
I: DEC VAX VMS |
- Access key Data Element code
This code, on six characters, is required for indexed files.