IBM Support

PH12102: ZUNIT TEST DATA ENTRY EDITOR FAILS WITH ERROR "XYZ IS NOT DEFINED IN THE DATA DIVISION."

Subscribe to this APAR

By subscribing, you receive periodic emails alerting you to the status of the APAR, along with a link to the fix after it becomes available. You can track this item individually or track all items by product.

Notify me when this APAR changes.

Notify me when an APAR for this component changes.

 

APAR status

  • Closed as program error.

Error description

  • In IBM Developer for z Systems - IDz - v14.1.5, zUnit Test data
    entry editor fails with errors like:
    
    INQSAM1-FD is not defined in the DATA DIVISION.
    
    Error happens when a File Descriptor name is used in a call
    statement instead of its record name.
    
    For example with:
    
           FILE-CONTROL.
               SELECT  INQSAM1-FD      ASSIGN TO INDD1.
    
           DATA DIVISION.
           FILE SECTION.
          *
           FD  INQSAM1-FD
               LABEL RECORDS ARE STANDARD
               BLOCK CONTAINS 0 RECORDS
               RECORDING MODE V.
           01 INPUT-REC.
               05 VALUETXT1 PIC X(3354).
    
    ...
    
    PROCEDURE DIVISION.
          * MAIN.
               DISPLAY "Start"
                OPEN INPUT  INQSAM1-FD
          *
               CALL 'MYPROG' USING INQSAM1-FD.
    

Local fix

  • It works when using the record name instead of FD name.
    
    For example:
    
    CALL 'MYPROG' USING INPUT-REC.
    

Problem summary

  • zUnit Test case editor fails in opening when a File Descriptor
    name is used in a call statement instead of its record name.
    

Problem conclusion

  • CALL .... BY REFERENCE file-name  : This is to pass a data
    control block(DBC) to assembler programs. zUnit has been
    corrected so that the file-name would not be extracted as a
    parameter.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH12102

  • Reported component name

    DEV FOR Z SYS

  • Reported component ID

    5724T0700

  • Reported release

    E10

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2019-05-16

  • Closed date

    2019-06-14

  • Last modified date

    2019-06-14

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

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

Fix information

  • Fixed component name

    DEV FOR Z SYS

  • Fixed component ID

    5724T0700

Applicable component levels

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSJK49","label":"IBM Developer for z Systems"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"E10","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Document Information

Modified date:
27 October 2020