Guten Tag,

Ich habe folgende Problem:
Ein mit PIC 9(3) definiertes numerisches Feld, könnte möglicherweise
durch Fehleingaben auf einen Wert zugewiesen bekommen der
Alphanumerisch ist.
Die Datenbank aus der mein Programm die Daten per Cursor ausliest
darf alle Werte enthalten.

Kennen sie eine Möglichkeit die Inhalte darauf zu prüfen, ob
sie numerisch oder alpahnumerisch sind BEVOR das Programm sie
in das Zielfeld von COBOL schreiben will.
Denn dabei wird ein Programmfehler erzeugt.

Daran wollte ich dann eine Fehlerausgabe knüpfen, wenn ein solcher
falscher Wert erkannt wird.

Ich kenne zwar NUMVAL aber bin nicht sicher ob dieser Befehl
auch Alphanumerische Zeichen verarbeiten kann!

Vielen Dank für ihre Mühe
und Gruß
Hope