Feldinhalt prüfen auf Nummerisch

[E305GL]

Danke,
wie weit ich damit gehen kann weiß ich noch nicht. Der Kunde arbeitet noch mit I- und O-Karten, auch beim Display! Aber ich werde das mal so einbauen. Auf partielles FreeRPG bin ich ja schon gegangen.

nach 55 Jahren RPG-Erfahrung hat sich gezeigt, egal RPG400 ILE/Free/VARPG, dass die sicherste und am einfachsten durchschaubare Methode sich bis heute bewährt hat:
- übertrage(MOVEA) dein alpha-Feld in eine Feldgruppe mit Elementlänge 1(ARR)
- definiere eine Ziffernkonstante '0123456789' (ZIFFER)
- definiere eine DO-Schleife mit Index (X)
- prüfe ARR,X SCAN ZIFFER Bezugszahl auf GLEICH
- weiteren Prüfungen und Logiken sind keine Grenzen gesetzt.
- ENDDO