Hallo,
Ich führe in einem PGM ein Embedded SQL Statement (ich arbeite mit eienm Cursor) aus,
das mir leider kein Ergebnis zurückliefert.

Code:
 
SqlStm =  'SELECT PROGPW, AUSFPW, IDNRPL, ANGBPL, 
PNAMPW, HOLZPW, KZ05PW, KZ06PW, AUSNPW, AUSDPW, DTNEPW 
From RBPFILE/PRGSTP 
Inner Join PRGLEP On PROGPW = PROGPL
     And AUSFPW = AUSFPL
Where STATPW = ''A'' 
Order by PROGPW, AUSFPW, IDNRPL, ANGBPL 
For read only'
Hier möchte ich gerne dynamische Selektierungen einbauen:

Code:
DPROG             S            100    Inz(' and PROGPW  = :PROGD0')
DAUSF             S            100    Inz(' and AUSFPW  = :AUSFD0')
DIDNR             S            100    Inz(' and IDNRPL  = :IDNRD0')
DANGB             S            100    Inz(' and ANGBPL  = :ANGBD0')


if        PROGD0 <>  '   '       
eval      cmd = %trim(cmd) + PROG
endif                            
if        AUSFD0 <> '    '       
eval      cmd = %trim(cmd) + AUSF
endif                            
if        IDNRD0 <> 0            
eval      cmd = %trim(cmd) + IDNR
endif                            
if        ANGBD0 <>  '   '       
eval      cmd = %trim(cmd) + ANGB
endif
Das SqlStm habe ich entsprechend geändert:

Code:
 
...
Where STATPW = ''A'' '
+ ':cmd' +
'Order by
...
Es klappt ohne den cmd-Teil, aber warum nicht mit?
Kann mir jemand helfen?