View previous topic :: View next topic |
Author |
Message |
sharma ritika Beginner
Joined: 27 Jan 2016 Posts: 1 Topics: 1
|
Posted: Thu Jan 28, 2016 5:14 am Post subject: Pl1 code exceeding 32767 characters |
|
|
Hi,
I have to make changes in PL1 code.
The code is Code: |
DCL MQ_INTRQST_IN_REC CHAR (7588);
DCL 1 INTRQST_IN DEF (MQ_INTRQST_IN_REC),
|
I have to change MQ_INTRQST_IN_REC CHAR (7588) to CHAR (37588).
But when I do this I get compilation error saying that it should not exceed 32767 characters.
So ,
I used it as
Code: |
DCL MQ_INTRQST_IN_REC FIXED BIN(31) INIT(37588);
|
It did not give error for this line when compiled but started giving error for the very next line i.e DCL 1 INTRQST_IN DEF (MQ_INTRQST_IN_REC),
The error is mentioned below. Code: |
Invalid DEFINED - string overlay defining attempted.
The DEFINED variable INTRQST_RESP does not fit into
its base variable.
|
Can someone please help me how to solve this. [/img] |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12359 Topics: 75 Location: San Jose
|
Posted: Thu Jan 28, 2016 10:31 am Post subject: |
|
|
sharma ritika,
You need to show us the complete error messages along with message numbers instead of the message text.
Code: |
IBM1299I E 5.1 CHARACTER extent is reduced to 32767.
IBM1385I E 6.1 Invalid DEFINED - string overlay defining attempted.
|
Did you try defining the field as a group? Since the max allowable character definition is limited to 32767 split the filed into a group. something like this ?
Code: |
DCL 1 MQ_INTRQST_IN_REC,
3 MQ_INTRQST_IN_REC_FIELD1 CHAR(32767),
3 MQ_INTRQST_IN_REC_FIELD2 CHAR(4821);
|
And in the program where ever you are referencing the MQ_INTRQST_IN_REC field make sure you have 2 data move statments. _________________ Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
|
|