A fix is available
APAR status
Closed as program error.
Error description
Rational Developer for i Systems (RDi) v9 When you use Create Web Service wizard for a COBOL program a compiler error will be given in the case where the COBOL program has a DISPLAY-OF that references a variable that is GRAPHIC. The following error pops up in a dialog, IJTP0028, "The program definition could not be obtained from the COBOL source code." If you click on details you will that the possible causes are: 1. The required libraries have not been added to the library list. 2. There are compilation errors in the COBOL source code. In the listing, you will find these errors for the COBOL program: " "LNC2767 Function argument 'FIELD1' did not have the correct type for function 'FUNCTION DISPLAY-OF', for the statement, "MOVE function display-of(FIELD1) TO FIELD2." However, if either a CRTBNDCBL or CRBCLBMOD is used with the same program and with the same compilers options in CVTOPT and OPTIONS there is no error given.
Local fix
Comment out the DISPLAY-OF statement before invoking the Web Service wizard. After creating the necessary web service files then uncomment the statement and compile the program.
Problem summary
**************************************************************** * USERS AFFECTED: * * RDi users who verify COBOL source containing a COPY DDS * * statement for a file containing National data items (CCSID * * 13488 or CCSID 1200). * **************************************************************** * PROBLEM DESCRIPTION: * * Rational Developer for i (RDi) Create Web Service wizard for * * a COBOL program containing the COPY DDS statement for a file * * containing national data fields (G fields with CCSID 13488 * * or 1200) can fail the compile giving error IJTP0028 when the * * national field is used in a FUNCTION DISPLAY-OF statement. * **************************************************************** * RECOMMENDATION: * **************************************************************** RDi Create Web Service wizard for a COBOL program containing the COPY DDS statement for a file containing national data fields (G fields with CCSID 13488 or 1200) can fail the compile giving error IJTP0028 when the national field is used in a FUNCTION DISPLAY-OF statement. The compile listing shows the national field as a PIC G graphic data items in the listing and gives error LNC2767 in the compiler listing. However CRTBNDCBL and CRTCBLMOD are able to successfully compile the program.
Problem conclusion
This problem is fixed in the RDi 9.1.1 update. When national DDS fields (G fields with CCSID 13488 or 1200) are found during COPY DDS, the COBOL PV will handle these as PIC N national data items when the correct compiler options are specified.
Temporary fix
Comments
APAR Information
APAR number
SE57861
Reported component name
RDI RPG COBOL E
Reported component ID
5724Y99EG
Reported release
900
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2014-01-17
Closed date
2014-12-31
Last modified date
2014-12-31
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
WebTool
Fix information
Fixed component name
RDI RPG COBOL E
Fixed component ID
5724Y99EG
Applicable component levels
R900 PSY
UP
R901 PSY
UP
R910 PSY
UP
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSAE4W","label":"Rational Developer for i"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"9.0","Line of Business":{"code":"LOB57","label":"Power"}}]
Document Information
Modified date:
03 November 2021