COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-86
COBOLASSIGN
COBOLASSIGN
The COBOLASSIGN routine enables an HP COBOL program to perform an ASSIGN-
like statement while the program is executing. It associates a COBOL file name
(fd-name ) with a file-system file name.
You must declare the COBOL file name as dynamically assignable in a file-control
entry in the Input-Output Section. The syntax for this declaration is:
This form of the ASSIGN clause specifies only that fd-name is dynamically
assignable; unlike the other forms of the ASSIGN clause (or of the command
interpreter ASSIGN command), it does not associate fd-name with any file-system
file name.
After fd-name is declared as dynamically assignable, the HP COBOL program can
use ENTER to call COBOLASSIGN. The general form of the ENTER statement to use
COBOLASSIGN is:
Note. COBOLASSIGN uses a protocol different from that used by normal TAL procedures.
The ENTER verb must not be followed by the keyword TAL.
SELECT
OPTIONAL
fd-name
ASSIGN #DYNAMIC
TO
VST355.vsd
ENTER COBOLASSIGN
"
USING
library-reference
system-file-name
OF
error-numberGIVING
"
fd-name
ns ns
VST354.vsd