SQL Fetch

[Fuerchau]

Bist du sicher, dass auch wirklich SQLCOD = 100 auftritt ?
Vielleicht gabs ja einen anderen SQL-Code ab dem 3. Satz (Konvertierungsproblem, NULL-Anzeiger o.ä.).

Man sollte den SQLCOD schon gezielter abfragen:

exec sql fetch ...;
if SQLCOD <> *zero;
leave;
endif;

Schließlich bedeutet
0 = Daten gelesen
100 = EOF
< 0 = Fehler beim Lesen

[mk]

Hi,

ich schäme mich ja soooooooooooo..............

In einer der weiteren Prozeduren wurde ein delete
abgesetzt und da kein Satz für den delete gefunden wurde
kam der sqlcod 100 und beendete die schleife.

Man sollte sich die Programm doch genauer ansehen. Ich war
davon ausgegangen das die Nr unique ist.

Vielen Dank für den Denkanstoß
Gruß
Michael

[Fuerchau]

Gerade deshalb mache ich das meist so:

dow 1=1;
exec sql fetch ...;
if SQLCOD <> *zero;
leave;
endif;
:
enddo;

Da passiert sowas dann gar nicht.

[mk]

Hi ,

cool

schönen Gruß
Michael

[B.Hauser]

Gerade deshalb mache ich das meist so:

dow 1=1;
exec sql fetch ...;
if SQLCOD <> *zero;
leave;
endif;
:
enddo;

Da passiert sowas dann gar nicht.

Ich würde allerdings nicht auf <> 0 abfragen weil:
1. Ein Fehler ausgegeben werden könnte
2. Eine Warnung ausgegeben werden könnte, bei der der Datensatz ausgegeben wird und verarbeitet werden kann.

Besser ist es auf = 100 und < *Zeros abzufragen:

...

  If SQLCOD = 100;
     Leave;
  ElseIf SQLCOD < *Zeros;
    //Fehlerbehandlung
    Iter/Leave - whatever
  EndIf;
  //Verarbeitung

Schöne Grüße von der Common Conference im sonnigen (wenn auch etwas kühlen) Kalifornien.

Birgitta