× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: overlay(dsname:*NEXT) question?
  • From: "Kim Clark" <KCLARK@xxxxxxxxxxxxxx>
  • Date: Wed, 03 May 2000 10:07:43 -0600

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 thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.