|
--- Jon Paris <Jon.Paris@partner400.com> wrote: > <snip> The fields in the USING list _must_ be defined > as 01 or 77 levels in the LINKAGE SECTION but do not > have to be in the same sequence as the parms. Um, well, I used the following and this works (am I asking for trouble?): 01 1300RG-PARMS. 05 P1300-COMPANY-IN PIC X(4). 05 P1300-CLIENT-CODE-IN PIC X(5). 05 P1300-JOBNUM-IN PIC X(11). 05 P1300-MODE PIC X(1). 05 P1300-TE-FLAG PIC X(1). 05 P1300-RTN-CODE PIC X(2). 05 P1300-ERR-MSG PIC X(80). <snip> CALL 'PD1300RG' USING P1300-COMPANY-IN P1300-CLIENT-CODE-IN P1300-JOBNUM-IN P1300-MODE P1300-TE-FLAG P1300-RTN-CODE P1300-ERR-MSG. __________________________________________________ Do you Yahoo!? Yahoo! Mail Plus - Powerful. Affordable. Sign up now. http://mailplus.yahoo.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.