IBM Support

PI76520: RATIONAL PROGRAMMING PATTERNS : LABEL DUPLICATED IN COBOL SOURCE CODE AFTER GENERATION.

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as fixed if next.

Error description

  • Rational Programming Patterns - v9.5
    
    When a macrostructure contains an isolated line (aka no -sub-
    function explicitly created)
    Example:
    Macro structure AAAAAA
    F34BB
    100100   DISPLAY "SUB FUNCTION F34BB FROM MSP".
    
    and is called in a program already having the same sub
    function ("F34BB" here for aexample) created in specific code,
    the label F34BB is duplicated and the line coming from the
    macro structure can be misplaced.
    One label is automatically generated (the one coming from the
    macro structure) and one coming from the specific code.
    
    Example of resulting code:
     F34BB. EXIT.                                            lv10
    *N34BB.    NOTE *Fct in Specific code    *
     F34BB.                                                  lv10
               MOVE A TO B.
     F34BB-FN. EXIT.
               DISPLAY "SUB FUNCTION F34BB FROM MSP".        AAAAAA
     F34BB-FN. EXIT.
    

Local fix

  • Move the macro structure line(s) to the correct position
    Manually delete the duplicated labels.
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED:                                              *
    * All users of RPP when macro orphan lines must be inserted    *
    * into the existing specific code function.                    *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    * When macro orphan lines must be inserted into the existing   *
    * specific code function the result code is not optimal.       *
    ****************************************************************
    * RECOMMENDATION:                                              *
    * With the fix in this case the new macro orphan lines code go *
    * at the beginning of the user function with a warning to help *
    * the developer to validate the code dispatching. We recommend *
    * to use the macro preview function for this.                  *
    ****************************************************************
    

Problem conclusion

Temporary fix

Comments

APAR Information

  • APAR number

    PI76520

  • Reported component name

    RATL PROG PATTE

  • Reported component ID

    5725H0300

  • Reported release

    950

  • Status

    CLOSED FIN

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2017-02-13

  • Closed date

    2017-04-03

  • Last modified date

    2017-04-03

  • APAR is sysrouted FROM one or more of the following:

  • APAR is sysrouted TO one or more of the following:

Fix information

Applicable component levels

  • R950 PSY

       UP

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSKPEG","label":"Rational Programming Patterns"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"950","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
18 October 2021