Skip to main content

Transaction Processing Facility (TPF) - Online Maintenance TPF : Support : Maintenance TPF : Support : Maintenance

JavaScript not Active

This page uses JavaScript. You must activate JavaScript in your browser to be sure youare able to view all of the information.

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  PJ24845  PJ24541  
 PJ25084  PJ25632  PJ25807  
FOR SEGMENT CSTDLL40   (Assembler) - REL TPF4
 PJ25084  PJ25632  PJ25983  
FOR SEGMENT CSTRTD40   (Assembler) - REL TPF4
 PJ17852  PJ19938  PJ21167  PJ21907  
 PJ24472  PJ25632  PJ25983  
FOR SEGMENT CSTRTL40   (Assembler) - REL TPF4
 PJ17852  PJ21167  PJ21907  PJ24472  
 PJ24528  PJ25084  PJ25632  
 PJ25807  PJ25981  PJ26218  PJ26502  
 PJ26468  PJ26757  PJ27254  
 PJ27361  PJ27522  
FOR SEGMENT IDSLST40   (Dsect)     - REL TPF4
 PJ17852  PJ19966  PJ19938  PJ21167  
 PJ21907  PJ24472  PJ25084  
 PJ25632  PJ25807  PJ25981  
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. Source Binary