| 
    
C/EXEC SQL DECLARE MYCUR CURSOR FOR                 
C+  SELECT   field1a ,  field2a ,  field3a,  field4a, field5a           
C+           field5a,  field1b,  field2b, field3b, field4b           
 C+  FROM     FileA , FileB                           
C+  WHERE                 
C+           field1a  = field1b AND                     
C+           field2a  = field2b AND                     
C+           field3a  = field3b    
C+           And field4b  = 'USD'                        
C/END-EXEC 
And in other cases I want to use variables to select transactions with a ceratin customer in var :Custno
C/EXEC SQL DECLARE MYCUR CURSOR FOR                 
C+  SELECT   field1a ,  field2a ,  field3a,  field4a, field5a           
C+           field5a,  field1b,  field2b, field3b, field4b           
 C+  FROM     FileA , FileB                           
C+  WHERE                 
C+           field1a  = field1b AND                     
C+           field2a  = field2b AND                     
C+           field3a  = field3b  
C+           And field3b  = :Custno                        
C/END-EXEC 
am I still able to do the both cases using the same method of dynamic cursor definition, because I tried and I got the SQLCOD -514 (Host variable Custno not defined or not usable. Prepared statement S1 not found). How can I overcome this?
Thanks & best regards
Heba               
| "Phil" <sublime78ska@yahoo.com>
 Feladó: owner-rpg400-l@midrange.com 06/14/01 01:17 AM
  |         
 Címzett: Refaie Heba/ExtContr/K&HInvest/KHB/HU Másolat: Tárgy: RE: embeded SQL question  | 
This:
C/EXEC SQL DECLARE MYCUR CURSOR FOR                 
C+  SELECT   field1a ,  field2a ,  field3a,  field4a, field5a           
C+           field5a,  field1b,  field2b, field3b, field4b           
 C+  FROM     FileA , FileB                           
C+  WHERE                 
C+           field1a  = field1b AND                     
C+           field2a  = field2b AND                     
C+           field3a  = field3b                         
C/END-EXEC                                           
Becomes this:
C select
C when whatever
C eval @select = 'SELECT field1a . . . ' etc.
C when a different condition
C eval @select = 'SELECT field1a. . . ' etc
C when another different condition
C eval @select = 'SELECT field1a . . . ' etc
C endsl
C/exec sql
C+ prepare @select from :@select
C/end-exec
C/exec sql
C+ declare @cursor cursor for @select
C/end-exec
Hth,
Phil
-----Original Message-----
From: owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]On Behalf Of Refaie.Heba@khb.hu
Sent: Wednesday, June 06, 2001 9:17 AM
To: RPG400-L@midrange.com
Subject: embeded SQL question
         
   
                
  
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.