This literally has me
DS Defined as:
SQL Code:
Fetch:
Sub1 Code:
I'm getting the SQL0312 Error:
"Variable SF1D not defined or not usable."
Any Suggestions???
DS Defined as:
Code:
* Display DS d SF1D e ds ExtName( ED365d : Sub1 : *Output ) d SF1F e ds ExtName( ED365d : Ctl1 : *Input )
Code:
Declare SUP Scroll Cursor For SELECT I.VndNoAP as VndNoAP, I.EDIID as EDIID, SubString( L.Vendor_VName, 1, 20 ) as VndName, SubString( I.EDICont , 1, 20 ) as EDICont, I.EDIVPhone as EDIvPhone, I.Compare as Compare, I.AuthCode as AuthCode FROM InvSup I, DBAPVEN L WHERE Trim( Char( I.VndNoAP ) ) = Trim( L.Vendor ) AND I.VndNoAP = Case When :fF1 <> 0 Then :fF1 Else I.VndNoAP End AND L.Vendor_VName Like Case When :fF2 <> ' ' Then Trim( :fF2 ) Else L.Vendor_VName End AND I.EDICont Like Case When :fF3 <> ' ' Then Trim( :fF3 ) Else I.EDICont End AND I.EDIvPhone Like Case When :fF4 <> 0 Then Trim( :fF4 ) Else I.EDIvPhone End AND I.AuthCode = Case When :fF6 <> ' ' Then :fF6 Else I.AuthCode End AND I.EDIID Like Case When :fF7 <> ' ' Then Trim( :fF7 ) Else I.EDIID End ORDER BY VndNoAP For Fetch Only;
Code:
Exec SQL Fetch Next From SUP into :SF1D;
Code:
A 61 VNDNOAP 5Y 0O 8 8EDTCDE(3) A N61 EDIID 15 O 8 6 A VNDNAME 20 O 8 23 A 62 EDICONT 20 O 8 45 A 62 EDIVPHONE 10Y 0O 8 67EDTWRD(' / - ') A N62 COMPARE 1 O 8 53 A N62 AUTHCODE 3 O 8 65
"Variable SF1D not defined or not usable."
Any Suggestions???
Comment