Hallo Specialists!

Ich als COBOL-Newbie will wie in RPG ein DSPF mit Programm-System-Übergabefelder im DSPF arbeiten. Das DSPF ist soweit OK. Das Attribut zu setzen (Hidden und Protect) funktioniert auch. Nur beim Drücken der ENTER Taste verschiebt sich der Feldinhalt um 2 Byte - vermutlich ein Fehler im Bildschirmbuffer???

Es gibt sicher Spezialisten die hierfür eine Idee haben!

Codeausschnitte:
PROCESS MAP DATETIME VARCHAR NOMONOPRC
.
.
SELECT MSKERLEFM
ASSIGN TO WORKSTATION-MSKERLEFM
ORGANIZATION IS TRANSACTION
ACCESS MODE IS SEQUENTIAL
CONTROL-AREA IS MSKERLEFM-CONTROL.
.
.
FD MSKERLEFM.
01 MSKERLE1.
COPY DDS-ALL-FORMATS OF MSKERLEFM.

* Setzen DSPF Attribute
MOVE ATRHIDDEN TO XERLPOST OF MSKERLE1-O.
MOVE ATRPROTHIDD TO XERLPOS OF MSKERLE1-O.
*
PERFORM AUSWAHL.
CLOSE MSKERLEFM.

GOBACK.

* MASKENSTEUERUNG UND GÜLTIGKEITSPRÜFUNG
AUSWAHL SECTION.
AUS-0.

WRITE MSKERLE1 FORMAT "MSKERLE1"
INDICATORS ARE SCREEN-INDICATORS.
MOVE ZEROES TO SCREEN-INDICATORS
READ MSKERLEFM FORMAT "MSKERLE1".
.
.
.
Ich kann Daten in die Maske eintragen. Doch beim Drücken der ENTER Taste werden die Feldinhalte immer um 2 Byte verschoben!.
Was muss ich berücksichtigen, damit COBOL die Zeichen in der Maske richtig darstellt?

Vielen Dank im Voraus

Hermann