Transaction Processing Facility (TPF) - Online MaintenanceTPF : Support : Maintenance TPF : Support : Maintenance
SUBJECT: APAR NUMBER: PJ27692
REFERENCE: AREA: ISO-C SUPPORT
SEGMENT: @@USRDLD40 - RELEASE: TPF4 (ObjOnly)
SEGMENT: @@USRDMD40 - RELEASE: TPF4 (ObjOnly)
SEGMENT: @@USRLBD40 - RELEASE: TPF4 (ObjOnly)
SEGMENT: C$IDSLST40 - RELEASE: TPF4 (C-Header)
SEGMENT: CSTDLL40 - RELEASE: TPF4 (Assembler)
SEGMENT: CSTRTD40 - RELEASE: TPF4 (Assembler)
SEGMENT: CSTRTL40 - RELEASE: TPF4 (Assembler)
SEGMENT: IDSLST40 - RELEASE: TPF4 (Dsect)
Pre-requisite APARs are:
FOR SEGMENT C$IDSLST40 (C-Header) - REL TPF4
PJ19966 PJ19938 PJ21167 PJ23088
PJ24472 PJ24845PJ24541PJ25084PJ25632PJ25807
FOR SEGMENT CSTDLL40 (Assembler) - REL TPF4
PJ25084PJ25632PJ25983
FOR SEGMENT CSTRTD40 (Assembler) - REL TPF4
PJ17852 PJ19938 PJ21167 PJ21907
PJ24472 PJ25632PJ25983
FOR SEGMENT CSTRTL40 (Assembler) - REL TPF4
PJ17852 PJ21167 PJ21907 PJ24472
PJ24528PJ25084PJ25632PJ25807PJ25981PJ26218PJ26502PJ26468PJ26757PJ27254PJ27361PJ27522
FOR SEGMENT IDSLST40 (Dsect) - REL TPF4
PJ17852 PJ19966 PJ19938 PJ21167
PJ21907 PJ24472 PJ25084PJ25632PJ25807PJ25981
To be applied in the order listed for each segment.
ABSTRACT OF PROBLEM
___________________
Provide a field in the C startup code for customer use.
COMMENTS ON PROBLEM
___________________
Create fields reserved for customer use in C startup segments,
CSTRTL, CSTRTD, and CSTDLL. Customers should not use fields
marked "RESERVED FOR IBM."
SOLUTION
________
Fields @@USRDLD (in CSTDLL), @@USRDMD (in CSTRTD), and @@USRLBD
(in CSTRTL) have been added to the C startup code as user data
areas.
Customers can use these fields for whatever purpose they choose.
This eliminates the need to modify IDSLST when customers want to
insert their own data into C startup code.
TPF supplies a default object-code-only 'dummy' stub data object
for each of the user data areas.
Module Type Startup Code Data object name
DLM CSTRTD @@USRDMD
LLM CSTRTL @@USRLBD
DLL CSTDLL @@USRDLD
To customize the user data, replace the particular object-code-
only 'dummy' stub data object in the ACP.STUB.REL40 data set
with the user data object.
Note: The stubs in this data set are autocalled into the module.
SAMPLE DUMMY OBJECT SUPPLIED BY IBM:
@@USRxxx CSECT
@@USRxxx AMODE ANY
@@USRxxx RMODE ANY
DS 0D
DC 4F'0'
END
Substitute your customized data in place of the current data and
then assemble the segment, placing the object in the STUB data
set.
DEPENDENCIES
____________
Related Segments Affected By This APAR.
_______________________________________
Segments to be assembled or compiled:
- None.
Segments to be link-edited:
- None.
Load Modules to be loaded:
- None.
Migration Considerations
========================
To customize the user data, replace the particular existing
object-code-only stub data object in the ACP.STUB.REL40 data set
with the user data object.
Note: The stubs in this data set are autocalled into the module.
After applying this APAR, link-edit again any DLM, DLL, or LLM that
uses the customer-supplied user data object.
If the particular stub object is in the ACP.CLIB.REL40 data set,
delete the stub object from this data set. The stub object should
only be in the ACP.STUB.REL40 data set.
SAMPLE DUMMY OBJECT SUPPLIED BY IBM:
@@USRxxx CSECT
@@USRxxx AMODE ANY
@@USRxxx RMODE ANY
DS 0D
DC 4F'0'
END
Substitute your customized data in place of the current data,
and then assemble the segment, placing the object in the STUB data set.
Link-edit again any modules requiring the user data field each time
the user data objects are changed.
-- END APAR PJ27692
Download file(s):
Login once to access server, leave window open, then
click on link(s) below.