Re: Problems accessing the PODATA file from RPG

[Des Porter <desp@xxxxxxxxxx>]

Hi ,
        when i worked on BPCS we had a similar problem with the order entry
file which had two layouts, i.e. two files in this case ecl and ecs. i
have included some sample code to use as a basis for starting.


FECLL02  UF  E           K        DISK                      A 
F                                              KINFDS ECLDS   


 I* Record format read via (IPE500CL, IPE500CS)         
 IECLDS       DS                                        
 I                                     *RECORD  RCDFMT  


RCDFMT    IFEQ 'IPE500CL'  
LID       ANDEQ'CL'        

RCDFMT    IFEQ 'IPE500CS'  
*IN93     ANDEQ*OFF        
          DELETIPE500CS    

RCDFMT    IFEQ 'IPE500CL' 
*IN93     ANDEQ*OFF       
          DELETIPE500CL   

i hope this can help you
Des Porter


**********************************************************************
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager.

This footnote also confirms that this email message has been swept by
MIMEsweeper for the presence of computer viruses.

www.bell.co.za
**********************************************************************
+---
| This is the MAPICS Mailing List!
| To submit a new message, send your mail to MAPICS-L@midrange.com.
| To subscribe to this list send email to MAPICS-L-SUB@midrange.com.
| To unsubscribe from this list send email to MAPICS-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dshaw@spartan.com
+---