Robi
18-03-14, 11:26
Hi *all
habe hier ein SQLRPGLE Pgm das sich im Spool wie folgt präsentiert:
C CLEAR I
C*EXEC SQL
C* SET :I =
C* ( SELECT COUNT(*) FROM EPBM1
C* WHERE EPBKATE = :IN_EPAKATE AND
C* EPBADRE = :IN_EPAADRE AND
C* EPBAUF1 = :IN_EPAAUF1 AND
C* EPBLSFR = :IN_EPALSFR AND
C* EPBSTAT <= '0' )
C*END-EXEC
C EVAL SQL_00005 = IN_EPAKATE SQL
C EVAL SQL_00006 = IN_EPAADRE SQL
C EVAL SQL_00007 = IN_EPAAUF1 SQL
C EVAL SQL_00008 = IN_EPALSFR SQL
C Z-ADD -4 SQLER6 SQL 1
C CALL SQLROUTE SQL
C PARM SQLCA SQL
C PARM SQL_00000 SQL
C SQL_00003 IFEQ '1' SQL
C EVAL I = SQL_00009 SQL
C END SQL
C IF I <= 0
Und der Umwandlungsfehler ist, das SQL_00003 nicht definiert ist!
Logischerweise ist KEIN SQL_000... Feld definiert ! War auch noch nie!
Kann mir jemand das PTF nennen, das mir fehlt?
V7R1, letzte 'komplettierung' ca vor 8 Tagen
Danke
Robi
habe hier ein SQLRPGLE Pgm das sich im Spool wie folgt präsentiert:
C CLEAR I
C*EXEC SQL
C* SET :I =
C* ( SELECT COUNT(*) FROM EPBM1
C* WHERE EPBKATE = :IN_EPAKATE AND
C* EPBADRE = :IN_EPAADRE AND
C* EPBAUF1 = :IN_EPAAUF1 AND
C* EPBLSFR = :IN_EPALSFR AND
C* EPBSTAT <= '0' )
C*END-EXEC
C EVAL SQL_00005 = IN_EPAKATE SQL
C EVAL SQL_00006 = IN_EPAADRE SQL
C EVAL SQL_00007 = IN_EPAAUF1 SQL
C EVAL SQL_00008 = IN_EPALSFR SQL
C Z-ADD -4 SQLER6 SQL 1
C CALL SQLROUTE SQL
C PARM SQLCA SQL
C PARM SQL_00000 SQL
C SQL_00003 IFEQ '1' SQL
C EVAL I = SQL_00009 SQL
C END SQL
C IF I <= 0
Und der Umwandlungsfehler ist, das SQL_00003 nicht definiert ist!
Logischerweise ist KEIN SQL_000... Feld definiert ! War auch noch nie!
Kann mir jemand das PTF nennen, das mir fehlt?
V7R1, letzte 'komplettierung' ca vor 8 Tagen
Danke
Robi