We have recently moved from SCLM platform to DeltaVision; during the code movement, on the new platform, we were getting compilation error for the below code snippet (same has been working on SCLM):
020000 05 FILLER PIC X(13) VALUE
020100 "// SET USER='". <-- error line
020200 05 WS-USER-NAME PIC X(20) VALUE SPACES.
020300 05 FILLER PIC X(47) VALUE SPACES.
The error description states:
On searching for the informational message, came across a few explanations stating that the DBCS characters were not handled correctly during translation ( referring to link: http://www-01.ibm.com/support/docview.wss?uid=swg1PQ66800 and http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/index.jsp?topic=%2Fcom.ibm.cics.ts.messages.doc%2FDFH70%2FDFHXX7035IE.html)
Below are the compiler options in force for the above compilation:
OPTIONS IN EFFECT*
Have done a workaround for this and got the code compiled; though was curious as to what am I missing here which is causing this error; the workaround solution is as below:
022900 05 FILLER PIC X(12) VALUE
023000 "// SET USER=". <-- Modified line-1
023010 05 FILLER PIC X(01) VALUE QUOTE. <-- Modified line-2
023100 05 WS-USER-NAME PIC X(20) VALUE SPACES.
023200 05 FILLER PIC X(47) VALUE SPACES.