Automatische satzfreigabe

[Robi]

Moin zusammen,

ich habe hier ein Bildschirm Pgm, das viele Prüfungen / autofüllungen wärend der Eingabe machen soll.
Leider ist der Aufbau etwa 'durcheinander'

Automatische Satzfreigabe war bisher auch selten gefragt.

Kann ich erkennen welches Feld (autom.Satzfreigabe) das Enter ausgelöst hat?
Cursor pos des Folgefeldes fällt mir ein, aber funktioniert das?

der Nachteil an dieser Methode wäre, das ich ein Enter auf dem Folgefeld falsch interpretieren würde.


Robi

[RobertMack]

Wenn ich das richtig in Erinnerung habe, kann das DDS Schlüsselwort RTNCSRLOC() auch einen Feldnamen zurückgeben.

[Fuerchau]

Deine Erinnerung täuscht nicht:
https://www.ibm.com/docs/de/i/7.5?topic=80-rtncsrloc-return-cursor-location-keyword-display-files

[Robi]

Ja nee, das ist Klar.

so habe ich es z.zt
beim automatisch enter steht sogar der Feldname und nicht der nächste Feldname drin

Aber ich kann nicht unterscheiden, ob der User in dem Feld stand und enter gedrückt hat oder das enter durch autm. Satzfreigabe augelöst wurde

[camouflage]

Du kannst doch die Entertasten abfragen


dcl-c Enter const( x'f1' );
dcl-c AutoEnter const( x'50' );

[Robi]

Danke, sowas habe ich gesucht
AutoEnter = x'50', danke!

[Pikachu]

Enter AID Codes IBM 5250

Enter or Record Adv X'F1'
Auto Enter SLP (Selector Light Pen) X'3F'
Auto Enter FET (Forward Edge Trigger) X'50'