|
Hi,
I will be retrieving web orders from a data queue. Each order can have up to
30 items in the cart. Each item will have detail information about the item.
A single detail or item has a max size of 61. So 30 items x length of 61
= Max size of possible items in the cart 1830.
We would like to retrieve the orders and place them in a data structure.
Instead of creating a data structure with subfields to hold all the possible 30
items in the cart. I was trying the following and recieved the message
below for the highlighted areas.
D Detail DS
D DtlFlds 61 dim(30)
D DItmSku 26 overlay(DtlFlds)
D DItmErrCd 2 overlay(DtlFlds:*NEXT)
D DDPCIDept 4 overlay(DtlFlds:*NEXT)
D DDPCIClass 4 overlay(DtlFlds:*NEXT)
D DDPCIItem 4 overlay(DtlFlds:*NEXT)
D DUntPrice 9 overlay(DtlFlds:*NEXT)
D DItmSkuSts 1 overlay(DtlFlds:*NEXT)
D DQtyAvlNow 3 overlay(DtlFlds:*NEXT)
D DExpShpDat 8 overlay(DtlFlds:*NEXT)
Message ID . . . . . . : RNF3468 Severity . . . . . . . : 20
Message type . . . . . : Diagnostic
Message . . . . : The second parameter for keyword OVERLAY is not valid;
parameter is ignored.
Cause . . . . . : The second parameter for keyword OVERLAY (if specified)
must be a numeric literal with zero decimal positions or a constant name
that is previously defined as a numeric literal with zero decimal positions.
Recovery . . . : Correct the second parameter for keyword OVERLAY. Compile
again.
Does anyone know why I would receive this message only after the second *NEXT
and not the first two. If I remove *NEXT and replace it with a numeric literal
it works. But that is not what I was looking for. If you know of a work
around or a better way to do this, please let me know.
Thanks in advance for your help.
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.