|
Well, I don't know if I am doing something wrong or not, but now I get
compiler errors because SQL isn't using the qualified data structure field
names I have in my program. Is this a issue or am I doing it wrong?
I have:
// SQL Fields
D InvCountDS DS 44 Qualified
D CompanyName 30
D CompanyNum 4 0
D POInvFlag 1
D Count 9 0
D POCountDS DS 43 Qualified
D CompanyName 30
D CompanyNum 4 0
D Count 9 0
SQL puts in:
C*Exec SQL
C* FETCH POCOUNT INTO :PoCountDS
C*End-Exec
C Z-ADD -4 SQLER6
C CALL 'QSQROUTE'
C PARM SQLCA
C PARM SQL_00035
C SQL_00038 IFEQ '1'
C EVAL COMPANYNAME = SQL_00040
C EVAL COMPANYNUM = SQL_00041
C EVAL COUNT = SQL_00042
C END
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.