Hallo,
habe mich evtl. nicht korrekt ausgedrückt. ich greife nicht mit SQL auf die Datei zu. Ich möchte mit Read/Chain auf einen Index zugreifen.
In ILE Programmen funktioniert das einwandfrei. Bei RPG3 Programmen bekomme ich die Fehlermeldung.
Code:
FVHL01L1 IF E K DISK
*
*
I SDS
I 1 10 PGM
*
*
C KEY1 KLIST
C KFLD VHLID
*
C*****************************************************************
C* HAUPTSTEUERUNG *
C*****************************************************************
*
C KEY1 SETLLVHL01L1
C KEY1 READEVHL01L1 99
C MOVE '1' *INLR
Bookmarks