Aufruf SQL Prozedur von SQLRPGLE

[Fuerchau]

Schau mal ins Joblog auf die genauen Meldungen.
Per F9 auf der Meldung kann man sehen, von wo die Nachricht ausgelöst wurde. Ggf. wird sie ja nur durchgereicht.

[Dschainers]

Problem gelöst!

Mein Fehler war, dass ich mit TEST0002 aufgerufen habe, statt mit dem Namen der Prozedur.
Der Name der Prozedur ist "ReWe_FiBu_test".

Hier die Prozedur:

-- erst löschen
call dsg_drop_procedure('xxx', 'ReWe_FiBu_test');
--neu anlegen
create procedure xxx/ReWe_FiBu_test
(
-- Input-Parameter
In $In_MandKenn char(13),
-- OUTPUT
Out $Status char(1)
)
LANGUAGE SQL
SPECIFIC xxx/TEST0002
NOT DETERMINISTIC
MODIFIES SQL DATA
MAIN : BEGIN

declare i_Mandkenn char(13);
--declare O_Error_Nr numeric(4, 0);

Set i_Mandkenn = $In_Mandkenn;

--Delete from D_FYWAB
--where MANDKENN = I_MANDKENN;

set $status = i_mandkenn;

End MAIN;

[Fuerchau]

Daran kann man mal wieder sehen, dass man ja jedes Programm ebenso auch als Prozedur aufrufen kann, wenn man denn die Parameter alle kennt;-).