APAR status
Closed as program error.
Error description
In IBM Developer for z/OS - IDz - v14.2.3, PLI preprocessing fails with the below errors when the first line of the program contains DBCS characters and right numbering: T6SOSI.pli(0:2) : IBM1917I S Program contains no valid source lines. T6SOSI.pli(1:2) : IBM1859I S The first statement must be a PROCEDURE or PACKAGE statement. T6SOSI.pli(5:2) : IBM1859I S The first statement must be a PROCEDURE or PACKAGE statement. T6SOSI.pli(8:2) : IBM1859I S The first statement must be a PROCEDURE or PACKAGE statement. T6SOSI.pli(10:2) : IBM1859I S The first statement must be a PROCEDURE or PACKAGE statement. T6SOSI.pli(1:2) : IBM1352I E The statement element 01234567 is invalid. The statement will be ignored. Steps to reproduce: 1- create a PLI program member with the following code and code page IBM-1364: /************ìë íì¸ì ì¸ê³ **********************************/01234567 /************above says Hello World *********************************/01234567 T6SOSI: PROC() OPTIONS(MAIN); DCL MYVAR1 CHAR(2); DISPLAY("for case TS003893493"); END T6SOSI; 2- edit it in PLI editor and select menu Source > Preprocessor Statements > Identify using configured preprocessors 3- observe the above errors
Local fix
remove the right numbering on the first line.
Problem summary
This problem occurs because the first line is read before options processing is complete (because options may be specified on the first lines via %PROCESS statements), and so the first was being read without the special processing for Korean source in UTF-8.
Problem conclusion
PL/I importer fixed to do special processing initially before reading the first line.
Temporary fix
Comments
APAR Information
APAR number
PH27551
Reported component name
DEV FOR Z/OS
Reported component ID
5724T0700
Reported release
E20
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2020-07-16
Closed date
2020-12-04
Last modified date
2020-12-04
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/OS
Fixed component ID
5724T0700
Applicable component levels
[{"Line of Business":{"code":"LOB17","label":"Mainframe TPS"},"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSQ2R2","label":"Rational Developer for z Systems"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"E20"}]
Document Information
Modified date:
05 December 2020