Michael, 
Here is the select and FD. 
In this example I would copy the source file into the CARDIN file in QTEMP. 
HTH
Jerry Thomas

CL source
CRTPF FILE(QTEMP/CARDIN) RCDLEN(80)
CPYF FROMFILE(QCARDSRC) TOFILE(QTEMP/CARDIN) FROMMBR(CARDMBR)
FMTOPT(*CVTSRC)



COBOL source
FILE-CONTROL.                                
                                             
    SELECT CARD-IN ASSIGN TO DATABASE-CARDIN 
        ORGANIZATION IS SEQUENTIAL.          
                                             
DATA DIVISION.                               
FILE SECTION.                                
FD CARD-IN.                                  
01 CARD-IN-RECORD               PIC X(80).   



-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Rosinger
Sent: Monday, November 13, 2006 4:57 AM
To: cobol400-l@xxxxxxxxxxxx
Subject: Re: [COBOL400-L] advice on best technique for processing
inputparms...

Jerry,

Thanks for the suggestion. What does the SELECT for that file look like in 
the COBOL program?


This thread ...

Replies:

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

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