RUNSQLSTM - Problem

[muadeep]

Hab's mal abgändert dann bekomme ich beim Ausführen mit RUNSQLSTM folgenden Fehler:

Satz    *...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8   FLGNR. Letzte Änderung 
      1     insert into jrnanz/SOURCES1                                                                           
      2     SELECT 1 , 1 ,'     A            ' *cat WHFLDI *cat '   ' *cat                                        
      3     case when whfldd=0 then substr(digits(whfldb) , 3 , 3)                                                
      4     else ' ' *cat digits(whfldd) end                                                                      
      5     *cat whfldt *cat                                                                                      
      6     case when whfldp=0 then '  '                                                                          
      7     else substr(digits(WHFLDp) , 1 , 2) end                                                               
      8     *cat '       TEXT('*cat '''' *cat trim(left(WHFTXT , 28)) *cat '''' *cat ')'                          
      9     from jrnanz/fields                                                                                    
                               * * * * *  E N D E  D E R  Q U E L L E * * * * *                                   
SQL0104  30       2  Position 52 Token * ungültig. Gültige Token: , FROM INTO.                                    
                    Nachrichtenzusammenfassung                                                                    
  Gesamt    Info   Warnung      Fehler  Wertigk. Beendigung                                                       
      1        0         0          0        1         0                                                          
Fehler der Wertigkeitsstufe 30 in Quelle gefunden.