lorenzen
11-12-02, 16:14
SP's die SQL enthalten, gleich ob mit SPL oder externe mit SQLRPGLE, laufen nach zweitem Aufruf vom Client in einer ?Endlosschleife nachdem die Clientexe beendet wurde! Im Job ist keine Aktivität auf Dateiebene zu erkennen und im Joblog steht auch kein Hinweis. Es wurde über OpsNav, mit RUNSQLSTM und interaktiven SQL generiert, ohne Erfolg.
Hat jemand diesen Effect schon einmal unter V5R1 beobachtet?
Beispiel:
CREATE PROCEDURE tcd200md/TEST_AX2
( INOUT p_type CHAR(12),
INOUT p_wert CHAR(12) )
LANGUAGE SQL READS SQL DATA
set option commit = *CHG BEGIN atomic DECLARE c_sql_1 CHAR(512); DECLARE s_EoF INT DEFAULT 0; DECLARE s_return INT DEFAULT 0;
DECLARE not_found CONDITION FOR '02000'; DECLARE csr_1 DYNAMIC SCROLL CURSOR FOR sel_1;
DECLARE CONTINUE HANDLER FOR
not_found SET s_EoF = 1;
SET c_sql_1 =
'Select LFKOLFNR From Tcd200md/LFKOPF Where LFKOMAND = ' || p_type || ' and LFKOLVNR = ' || p_wert ;
PREPARE sel_1 FROM
c_sql_1;
OPEN csr_1;
FETCH csr_1 INTO s_return;
IF s_return > 0
THEN SET p_type = 'OK:';
SET p_wert = Char( s_return );
ELSE SET p_type = 'EoF:';
SET p_wert = '0';
END IF;
CLOSE csr_1;
END
Hat jemand diesen Effect schon einmal unter V5R1 beobachtet?
Beispiel:
CREATE PROCEDURE tcd200md/TEST_AX2
( INOUT p_type CHAR(12),
INOUT p_wert CHAR(12) )
LANGUAGE SQL READS SQL DATA
set option commit = *CHG BEGIN atomic DECLARE c_sql_1 CHAR(512); DECLARE s_EoF INT DEFAULT 0; DECLARE s_return INT DEFAULT 0;
DECLARE not_found CONDITION FOR '02000'; DECLARE csr_1 DYNAMIC SCROLL CURSOR FOR sel_1;
DECLARE CONTINUE HANDLER FOR
not_found SET s_EoF = 1;
SET c_sql_1 =
'Select LFKOLFNR From Tcd200md/LFKOPF Where LFKOMAND = ' || p_type || ' and LFKOLVNR = ' || p_wert ;
PREPARE sel_1 FROM
c_sql_1;
OPEN csr_1;
FETCH csr_1 INTO s_return;
IF s_return > 0
THEN SET p_type = 'OK:';
SET p_wert = Char( s_return );
ELSE SET p_type = 'EoF:';
SET p_wert = '0';
END IF;
CLOSE csr_1;
END