View previous topic :: View next topic
|
Author |
Message |
rbrt111
New User
Joined: 10 Jun 2006 Posts: 1
|
|
|
|
Hi,
Can anybody help me to solve this IBM1385I E compilation problem?
I have the following declaration:
Code: |
DCL MY_DATA_A CHAR(50),
1 MY_DATA DEF MY_DATA_A,
2 TEXT1 CHAR(5),
2 TEXT2 CHAR(5),
2 SEM_A BIT(1) ALIGNED,
2 MESS CHAR(15),
2 SEM_B FIXED BIN(15) UNAL,
2 MESS_X CHAR(22); |
I shouldn't use these ALIGNED and UNAL attributes? |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
Back to top |
|
|
delly999
New User
Joined: 12 Jan 2007 Posts: 13 Location: Ontario, Canada
|
|
|
|
Try declaring the SEM_A as 8 Bits(1 byte) and unalign the structure. If you need to use only the first Bit in SEM_A, please use the SUBSTR function.
DCL MY_DATA_A CHAR(50),
1 MY_DATA DEF MY_DATA_A UNALIGNED,
2 TEXT1 CHAR(5),
2 TEXT2 CHAR(5),
2 SEM_A BIT(8) ,
2 MESS CHAR(15),
2 SEM_B FIXED BIN(15),
2 MESS_X CHAR(22); |
|
Back to top |
|
|
|