DDS

[BenA]

Hallo Forum
Ich habe arge Probleme mit einem DDS file(V5R1M0). Es sind 2 Subfiles enthalten.
Subfile 2 beinhaltet ein Eingabefeld(A LPLATZ 5 I 6111COLOR(WHT)).
Nach Abarbeitung des Subfiles werden die Felder in Rpg abgefragt ob Daten eingegeben wurden. Leider Kommt im Rpg nichts an d.h. das Feld ist immer leer aber alle Ausgabefelder werden zurückgeliefert.
Wo liegt der Fehler und bin für jede Hilfe dankbar

BenA

[RobertMack]

Hmm, etwas wenig Info...

Laß uns mal raten:

1) es handelt sich um eine Subfile (mehrere Zeilen, das Feld kommt also mehrfach vor) die nicht oder falsch (2. Subfile) durchgelesen wird (READC) ...

2) die Subfile wird mit einer Funktionstaste (als CAxx definiert) verlassen (probier 'mal Datenfreigabe vor Funktionstaste) ...

[BenA]

Mit F5 taste gehts weiter


C EXSR SR2ANZ
C EXFMTSUBF2C
C *INKE IFEQ *ON
C Z-ADD1 $1 40
C *IN60 DOUEQ *on
C $1 CHAINSUBF2 60
C *IN60 IFEQ *off
C LPLATZ DSPLY
C LPLATZ IFNE *BLANKS

Das Feld LPLATZ wird immer trotz Eingabe immer leer zurückgeliefert. Alle im Datensatz definierten Ausgabefelder kommen im Programm an nur dieses eine Eingabefeld nicht.


A 111111 13A O 6 6
A 222222 15A O 6 29
A 333333 14A O 6 52
A 444444 6S 0O 6 73
A 555555 15A O 6 91
A LPLATZ 5 I 6111COLOR(WHT)

Hab keine Ahnung warum.

BenA

[RobertMack]

... ändere mal in der DSPF CA05 in CF05

[BenA]

Je einfacher der Fehler umso grösser die Verzweiflung.
Es hat natülich geholfen, wie soll die das Prog wissen, das ich was eingegeben habe.
Danke für die Hilfe
BenA