Re: Processing a List from a command

This might help,

http://www.ibm.com/support/knowledgecenter/ssw_ibm_i_73/rbam6/defdlclhll.htm

Brian.

-----Original Message----- From: Jeff Young
Sent: Friday, January 13, 2017 8:26 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Processing a List from a command

All,
I have a command that defines a list consisting of a maximum of 10 entries
of 4 elements each as follows:
PARM KWD(BOXING) TYPE(BOX_DATA) MAX(10) +
PROMPT('Boxing Data')
BOX_DATA: ELEM TYPE(*CHAR) LEN(20) PROMPT('LUCAS Box Id')
ELEM TYPE(*CHAR) LEN(1) PROMPT('Box Type')
ELEM TYPE(*CHAR) LEN(9) PROMPT('Box Qty') +
CHOICE('ie. "000000100" is 1')
ELEM TYPE(*HEX) LEN(1) CONSTANT(X'25')

In my program, I define it as a 310 byte character field:
c Parm inBoxData 310
When I execute the command with a single entry, I get the following data
returned:
EVAL INBOXDATA :X
00000 00010004 0004F1F2 F4F5F4F5 F4C1C1C1 - ......1245454AAA
00010 40404040 40404040 4040C7F0 F0F0F0F0 - G00000
00020 F0F2F0F0 25404040 40404040 40404040 - 0200.
00030 40404040 40F04040 40404040 40404040 - 0
00040 40404040 40404040 40404040 40404040 -
00050 40404040 40404040 40404040 40404040 -
00060 40404040 40404040 40404040 40404040 -
00070 40404040 40404000 00000000 00000000 - .........

I know that the first 2 bytes are the number of entries, but what are the
next 4 bytes before the start of my data?

TIA


Jeff Young
Sr. Programmer Analyst