sandeep prajapati
New User
Joined: 23 Mar 2020
Posts: 19
Location: India
|
|
|
|
in one of BMS Mapset, i am getting CC 0004 during assemble, Below is the BMS mapset and spool message
| Code: |
PCODE1 DFHMDF POS=(11,1), X
LENGTH=10, X
ATTRB=(NORM,UNPROT), X
COLOR=TURQUOISE, X
INITIAL='__________'
DFHMDF POS=(11,12), X
LENGTH=1, X
ATTRB=ASKIP
QTY1 DFHMDF POS=(11,13), X
LENGTH=5, X
ATTRB=(NORM,NUM), X
COLOR=TURQUOISE, X
INITIAL='_____'
DFHMDF POS=(11,19), X
LENGTH=1, X
ATTRB=ASKIP
DESC1 DFHMDF POS=(11,20), X
LENGTH=20, X
ATTRB=(NORM,PROT), X
COLOR=TURQUOISE |
| Code: |
QTY1 DFHMDF POS=(11,13),
LENGTH=5,
ATTRB=(NORM,NUM),
COLOR=TURQUOISE,
INITIAL='_____'
4,FIELDS OVERLAPPING WITH MODE = IN OR INOUT.
PUNCH ' 02 QTY1L COMP PIC S9(4). '
PUNCH ' 02 QTY1F PICTURE X.'
PUNCH ' 02 FILLER REDEFINES QTY1F.'
PUNCH ' 03 QTY1A PICTURE X.'
PUNCH ' 02 FILLER PICTURE X(2).'
PUNCH ' 02 QTY1I PIC X(5).'
DFHMDF POS=(11,19),
LENGTH=1,
ATTRB=ASKIP
DESC1 DFHMDF POS=(11,20),
LENGTH=20,
ATTRB=(NORM,PROT),
COLOR=TURQUOISE
4,FIELDS OVERLAPPING WITH MODE = IN OR INOUT. |
please help. |
|
Garry Carroll
Senior Member
Joined: 08 May 2006
Posts: 1207
Location: Dublin, Ireland
|
|
|
|
You haven't allowed for the attribute bytes. The second field POS=(11,12), starts on row 11 in column 12 and is 2 bytes long if you count the attribute, so the third field defined as starting on row 11, column 13 is overlapping the last byte of the second field.
Garry. |
|
