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