In dieser Sitzung definieren Sie die Eigenschaften eines Feldes.
Um die Eigenschaften eines Feldes zu definieren:
Geben Sie im Feld Code im Menü
Edit Map ein E
und im Feld
Name den Maskennamen MAP001
ein (falls der
nicht schon eingegeben ist).
Der Masken-Editier-Bildschirm erscheint und die Maske
MAP001
wird im Editier-Bereich angezeigt.
Geben Sie zusätzlichen Text so wie unten gezeigt ein:
Ob _ Ob D CLS ATT DEL CLS ATT DEL . . T D Blnk T I ? . . A D _ A I ) . . A N ¬ M D & . . M I : O D + . . O I ( . . 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+---- ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX TYPE IN?. TO STOP OR?? FOR HELP. Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test Edit -- - + Full < > Let |
Das fett markierte Fragezeichen (?) ist das Begrenzungszeichen (Delimiter) für hervorgehobene Textfelder.
Geben Sie das Feld-Kommando .E
so wie
unten gezeigt ein:
Ob _ Ob D CLS ATT DEL CLS ATT DEL . . T D Blnk T I ? . . A D _ A I ) . . A N ¬ M D & . . M I : O D + . . O I ( . . 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+---- ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME:.EXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX TYPE IN?. TO STOP OR?? FOR HELP. Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test Edit -- - + Full < > Let |
Drücken Sie Enter.
Der erweiterte Feld-Editier-Bereich zu dem Feld, in dem das Kommando eingegeben wurde, erscheint:
Fld #NAME Fmt A40 ------------------------------------------------------------------------------- AD= MIT'_'____ ZP= SG= HE= _____________________ Rls 2 AL= _____ CD= __ CV= ________________________________ Mod User PM= __ DF= DY= ______________________________ EM= __________________________ SB= ________________________________ 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+---- ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME:.EXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX TYPE IN?. TO STOP OR?? FOR HELP. Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- HELP Mset Exit <--- ---> -- - + < > Let |
Ersetzen Sie im Feld Fmt den aktuellen Wert
durch A20
, und geben Sie im Feld HE= den Wert
'HELP001'
(in Hochkommas) so wie unten gezeigt ein:
Fld #NAME Fmt A20 ------------------------------------------------------------------------------- AD= MIT'_'____ ZP= SG= HE= 'HELP001'____________ Rls 2 AL= _____ CD= __ CV= ________________________________ Mod User PM= __ DF= DY= ______________________________ EM= __________________________ SB= ________________________________ 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+---- ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME:.EXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX TYPE IN?. TO STOP OR?? FOR HELP. Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- HELP Mset Exit <--- ---> -- - + < > Let |
Drücken Sie Enter.
Der erweiterte Feld-Editier-Bereich verschwindet.
HELP001
(die noch zu erstellen ist) wird als
Helproutine/Hilfe-Maske zu dem Feld zugewiesen und die Feldlänge wird auf 20
verringert:
Ob _ Ob D CLS ATT DEL CLS ATT DEL . . T D Blnk T I ? . . A D _ A I ) . . A N ¬ M D & . . M I : O D + . . O I ( . . 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+---- ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX TYPE IN?. TO STOP OR?? FOR HELP. Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test Edit -- - + Full < > Let |
Drücken Sie PF3 zweimal.
Das Menü Edit Map erscheint.
Katalogisieren und speichern Sie die Maske MAP001
,
indem Sie die Funktion ausführen.
Sie können nun fortfahren mit Hilfe-Maske erstellen und testen.