Hallo in die Runde,

ich habe eine SQL VIEW, welche in einigen Feldern NULL-Werte enthält

Ich möchte diesen VIEW jetzt im RPG mit embedded SQL verarbeiten. Bei den Sätzen mit NULL-Werten kommt der SQLCOD -305 und es stehen keine Werte in der Datenstruktur.

Wie gehe ich in so einem Fall am besten vor? Alle (viele) Felder in der VIEW mit COALESCE umsetzen? Oder gibt's im RPG eine Möglichkeit (ctl-opt)? Oder gibt es noch eine andere Idee?

Das ist mein Programm:
ctl-opt option(*nodebugio:*nounref)
decedit('0.')
main(main);

dcl-s sqlstm char(100)
inz('SELECT * FROM webservice/web01view');

dcl-ds web01view ext inz qualified end-ds ;

dcl-proc main;
exec sql PREPARE prepSQL1 FROM :sqlstm;
exec sql DECLARE crsr1 CURSOR FOR prepSQL1;
exec sql OPEN crsr1;
dou 1 = 0;
exec sql FETCH NEXT FROM crsr1 INTO :WEB01VIEW;
if SQLCOD = 100;
leave;
else;
// Verarbeitung
ENDIF;
enddo;
end-proc;

Vielen Dank.