Replacement of a physical access level in a Screen or Business Component

You can insert specific processing in the function 80 of a Screen or Business Component. This function manages the physical access to Segments. It contains one subfunction for each Segment and access type. You can then create a subfunction of this function to replace a standard access type to a Segment.

The Segment physical access level is run by PERFORM from the Segment logical access level. The generated processing for the physical access level depends on the physical storage mode. Changing the storage mode does not modify the logical structure of the Screen or Business Component.

The information that you enter in this wizard is displayed in the Macro code as ACTION=*R REF=SEGM ACCESS. In this statement, ACTION=*R indicates that the standard subfunction is to be replaced. REF=SEGM ACCESS indicates which Segment access type is to be replaced. For example, ACTION=*R REF=SS11 W indicates that the standard write access type W to Segment SS11 is to be overwritten and replaced with specific processing.

Note: When you create a subfunction in function 80, you cannot select any model for the insertion because the required information for Screens and Business Components is accessed from the same wizard page.
Segment code
The input or the selection of the accessed Segment is required.

Access type

Selecting an access type is not compulsory. If you select an access type, only the subfunction that corresponds to this access type is replaced. If you do not indicate any access type, all the access subfunctions of this Segment are replaced. So, for example, if you select an access type R, the F80-SEGM-R subfunction that is generated in standard is overwritten. If you do not indicate any access type, all the access subfunctions to this Segment are overwritten.

Note: Extraction methods must be called from the ££80EX protected Macro in the -CP Lines of the Business Component. The extraction methods that are called in another way are ignored. From Rational® Programming Patterns V9.5.1, they constitute inactive code that you can remove. A warning is automatically displayed in the COBOL code. This case also applies to the extraction methods that were called from the function and subfunction wizard in an earlier version of Rational Programming Patterns.
Parameter
To indicate a parameter, you must first check the Parameter box. You can then parameterize the access type to identify it in various use contexts. To do so, enter a $ symbol followed by a digit or a letter directly in the field.
Access type
To indicate an access type, you must first check the Access box. You can select a standard access type to replace only the subfunction that corresponds to this access type. The following access types are available:
  • Standard access types.

    You can select the standard access type that you want to overwrite with specific code.

  • Access types specific to Server.
    You can specify the general processing relatively to which you want to insert a specific processing.
    • ALIM: Loading before call for the loading of the communication area. This access type is identified by R1 in the Macro code (REF=SEGM R1).
    • CALL: Business Component call. This access type is identified by R2 in the Macro code.
    • RETC : Return after Business Component call. This access type is identified by R3 in the Macro code.
  • Access types specific to DL/1.
    • CALL 1. This access type is identified by 1 in the Macro code (REF=SEGM 1).
    • CALL 2. This access type is identified by 2 in the Macro code
    • CALL 3. This access type is identified by 3 in the Macro code

Feedback