Hello. The consept exists, indeed: FILE-CONTROL. SELECT TESTFILE01 ASSIGN TO DATABASE-TESTFILE01 ORGANIZATION IS INDEXED ACCESS DYNAMIC FILE STATUS IS FILE-STATUS RECORD KEY EXTERNALLY-DESCRIBED-KEY DATA DIVISION. FILE SECTION. FD TESTFILE01 LABEL RECORDS STANDARD DATA RECORD TESTREC 01 TESTREC. COPY DDS-ALL-FORMATS OF TESTFILE01. This is one example, the file-definitions can be different from this, depending on what you are going to do. This is an indexed file, TESTFILE01, ment to be read by key or sequentually inside the pgm. The 'COPY DDS-ALL-FORMATS' copys the external data structure into the program. Mvh. Geir Kildal TietoEnator AS eMail: geir.kildal@xxxxxxxxxxxxxxx David Gibbs <david@xxxxxxxxxxxx> Sent by: cobol400-l-bounces@xxxxxxxxxxxx 09.08.2005 20:45 Please respond to COBOL Programming on the iSeries/AS400 <cobol400-l@xxxxxxxxxxxx> To cobol400-l@xxxxxxxxxxxx cc Subject [COBOL400-L] External data structures Folks: Nobody in our office has any cobol experience on the 400 (my cobol experience is from way back in '83 when I took a few classes). A co-worker was wondering if anyone would be able give a simple source example of an external data structure definition in OPM COBOL and ILE COBOL ... if the concept even exists. Thanks! david
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.