|
Property |
Value |
|---|---|
|
Kind |
Client library or connection library |
|
Type |
EBCDIC string |
|
Read |
Anytime |
|
Write |
Client libraries: While not linked Connection libraries (SINGLE): While not linked Connection libraries (Non-SINGLE): Anytime |
|
Default |
Value of INTNAME library attribute, except in COBOL74; see following discussion |
Explanation
The TITLE library attribute specifies the object code file title of the library. The TITLE attribute has meaning only if the LIBACCESS library attribute is set to BYTITLE.
Connection Libraries
The TITLE attribute affects the entire connection library. If you want to link the various connections BYTITLE to different library programs, you can specify a different TITLE attribute in each LINKLIBRARY request. The action of specifying a different TITLE causes a value override to the BYTITLE value for the LIBACCESS attribute for the LINKLIBRARY request. For example, the following ALGOL statements link connections 0 and 1 of connection library CL1 to different library programs:
CLTYPE LIBRARY CL1(INTERFACENAME = “CLF.”, CONNECTIONS = 2); REPLACE TITL BY “OBJECT/DELTA ON DISK.”; RSLT:= LINKLIBRARY (CL1[0], TITLE = TITL); REPLACE TITL BY “OBJECT/GAMMA ON DISK.”; RSLT:= LINKLIBRARY (CL1[1], TITLE = TITL);
In order for linkage to complete, the requesting connection library and the responding connection library must also have matching INTERFACENAME library attribute values. Refer to INTERFACENAME earlier in this section.
COBOL74 Considerations
Because libraries cannot be explicitly declared in COBOL74, the compiler constructs the default title for a library from the first reference to that library in the client program. The first reference to the library title might be in the CALL statement that invokes the library, or in a CHANGE statement that assigns attributes to the library. If either of the following two statements is the first reference to a library in a COBOL74 client program, the library receives a title of OBJECT/LIB1:
CHANGE ATTRIBUTE FUNCTIONNAME OF “OBJECT/LIB1” TO “TESTSUPPORT.”. CALL “FACT IN OBJECT/LIB1” USING PARAM.
To prevent any two libraries in a COBOL74 program from receiving the same INTNAME, you should give each library a title that has a different value in the final node of the title. Refer to INTNAME earlier in this section.
Direct Library Linkages
The TITLE library attribute has no effect when direct library linkage is used. Refer to Directly Linking to Server Libraries and Directly Linking Connection Libraries earlier in this section.

