In dieser Sitzung werden Sie eine Maske entwerfen.

• Felder anlegen und zentrieren

• Felder verschieben

• Felder löschen und Zeilen einfügen

---

Felder anlegen und zentrieren

Um Text-Felder anzulegen:

1. Geben Sie in der ersten Zeile des Editier-Bereichs für MAP001 das Zeilenkommando ..F* ein.

   Geben Sie in der zweiten Zeile den Text PERSONNEL INFORMATION 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---+---- ..F* PERSONNEL INFORMATION Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test Edit -- - + Full < > Let

2. Drücken Sie Enter.

   Der Bildschirm sieht nun folgendermaßen aus:

   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---+---- ******************************************************************************* PERSONNEL INFORMATION Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test Edit -- - + Full < > Let

3. Drücken Sie PF9.

   Der Masken-Editier-Bildschirm wechselt nun in den Vollbild-Anzeigemodus: Die Begrenzungszeichen sind nun ausgeblendet.

4. Geben Sie in der unteren Zeile das Zeilenkommando ..F* ein.

5. Drücken Sie Enter

   Der Bildschirm sieht nun folgendermaßen aus:

   ******************************************************************************* PERSONNEL INFORMATION ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

Um alle in einer Zeile enthaltenen Felder zu zentrieren:

1. Geben Sie in den ersten drei Stellen im Text das Zeilenkommando ..C so wie unten gezeigt ein:

   ******************************************************************************* ..CSONNEL INFORMATION ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

2. Drücken Sie Enter.

   Der Text wird zentriert.

Um Datenfelder anzulegen:

1. Geben Sie Folgendes ein:

   ******************************************************************************* (*DATX PERSONNEL INFORMATION (*TIMX PLEASE Enter CITY::X(20) PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

   *DATX und *TIMX sind Natural-Systemvariablen, die das aktuelle Datum bzw. die aktuelle Zeit anzeigen. Die öffnende Klammer (() ist das Begrenzungszeichen für hervorgehobene Ausgabefelder. Der Doppelpunkt (:) ist das Begrenzungszeichen für hervorgehobene, änderbare Felder. Die Anzahl der X-Zeichen zeigt die Länge des Feldes an.

2. Drücken Sie Enter.

   Der Bildschirm sieht nun folgendermaßen aus:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

Felder verschieben

Um ein einzelnes Feld oder eine ganze Zeile zu verschieben:

1. Geben Sie im Editier-Bereich das Zeilenkommando .M so wie unten gezeigt ein und platzieren Sie den Cursor an die mit [] markierte Stelle. Die beiden eckigen Klammern werden in den folgenden Beispiel-Bildschirmen lediglich dazu verwendet, die Position des Cursors zu kennzeichnen. Diese Klammern sollen nicht eingegeben werden.

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX .MEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX [] ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

2. Drücken Sie Enter.

   Das Text-Feld, in das das Kommando eingegeben wurde, wird zur Position des Cursors verschoben:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX Enter CITY::XXXXXXXXXXXXXXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

3. Geben Sie das Zeilenkommando ..M so wie unten gezeigt ein und platzieren Sie den Cursor an die mit [] markierte Stelle:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX ..M Enter CITY::XXXXXXXXXXXXXXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX []LEASE ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

4. Drücken Sie Enter.

   Die Zeile, in die das Kommando eingegeben wurde, wird in die Zeile nach der Zeile verschoben, in der der Cursor positioniert ist:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

Um Zeilen zusammenzuführen:

1. Geben Sie das Zeilenkommando ..J wie unten gezeigt ein:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ..JASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

2. Drücken Sie Enter.

   Die Zeile, in der das Kommando eingegeben wurde, und die Zeile darunter werden zusammengeführt:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

Um Felder oder Zeilen blockweise zu verschieben:

1. Geben Sie zusätzlichen Text in der gleichen Reihenfolge und an der gleichen Stelle wie unten gezeigt ein:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION OF TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

2. Drücken Sie Enter.

3. Geben Sie das Feld-Kommando .M zweimal ein und platzieren Sie den Cursor an die mit [] markierte Stelle:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX .MIS PORTION OF TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE .MMMANDS [] ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

   Der Block mit den zu verschiebenden Feldern wird durch die .M-Kommandos und die Breite der Felder, für die diese Kommandos gelten, begrenzt. In diesem Beispiel beginnt der Block links oben beim Feld THIS und endet beim letzten Feld COMMANDS. Das breiteste Feld COMMANDS (das sich über zwei oder drei der in der vorangehenden Zeile enthaltenen Felder erstreckt) bestimmt, welche Felder innerhalb des markierten Blocks verschoben werden.

4. Drücken Sie Enter.

   Der Block mit den markierten Feldern wird an die Position des Cursors verschoben und das Feld oben links wird auf dem Cursor platziert.

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX OF TEXT IS DEMONSTRATION THIS PORTION FOR FURTHER OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

5. Geben Sie das Feld-Kommando .M zweimal ein (siehe unten) und positionieren Sie den Cursor an die mit [] markierte Stelle.

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX .M TEXT IS .MMONSTRATION THIS PORTION[] FOR FURTHER OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

6. Drücken Sie Enter.

   Der Block mit den markierten Feldern wird an die Position des Cursors verschoben.

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION OF TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

7. Geben Sie das Feld-Kommando .M dreimal ein (siehe unten) und positionieren Sie den Cursor an die mit [] markierte Stelle:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX [] .MIS PORTION OF TEXT IS FOR FURTHER .MMONSTRATION OF THE MOVE .MMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

8. Drücken Sie Enter.

   Der gesamte mit den Kommandos eingegrenzte Felder-Block wird an die Cursor-Position verschoben:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION OF TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

9. Geben Sie das Zeilenkommando ..M zweimal ein (siehe unten) und platzieren Sie den Cursor an die mit [] markierte Stelle:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ..M THIS PORTION OF TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE ..M COMMANDS [] ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

10. Drücken Sie Enter.

    Der mit den Kommandos eingegrenzte Zeilen-Block wird unterhalb der Zeile eingefügt, in der der Cursor steht. (Der alte Zeilen-Block wird an der früheren Stelle gelöscht.)

    ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION OF TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

Felder löschen und Zeilen einfügen

Um Felder zu löschen:

1. Geben Sie im Editier-Bereich das Feld-Kommando .T so wie unten gezeigt ein:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION .T TEXT IS FOR FURTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

2. Drücken Sie Enter.

   Das Feld, in das das Kommando eingegeben wurde, und die Felder in der restlichen Zeile werden gelöscht:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION FOR FURTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

3. Geben Sie das Feld-Kommando .D so wie unten gezeigt ein:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION FOR .DRTHER DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

4. Drücken Sie Enter.

   Das Feld, in das das Kommando eingegeben wurde, wird gelöscht:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION FOR DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

5. Geben Sie das Zeilenkommando .M ein (siehe unten) und positionieren Sie den Cursor an die mit [] markierte Stelle:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION FOR [] .MMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

6. Drücken Sie Enter.

   Das Feld, in das das Kommando eingegeben wurde, wird an die Cursor-Position verschoben:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX THIS PORTION FOR DEMONSTRATION OF THE MOVE COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

7. Geben Sie das Zeilenkommando ..D zweimal so wie unten gezeigt ein:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ..D THIS PORTION FOR DEMONSTRATION OF THE MOVE ..D COMMANDS ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

8. Drücken Sie Enter.

   Der mit den Kommandos eingegrenzte Zeilen-Block wird gelöscht:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

Um Zeilen einzufügen:

1. Geben Sie das Zeilenkommando ..I4 so wie unten gezeigt ein:

   ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE Enter NAME::XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE Enter CITY::XXXXXXXXXXXXXXXXXXXX ..I4 ******************************************************************************* 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+----

2. Drücken Sie Enter.

   Es werden vier Leerzeilen eingefügt und die untere Linie mit den Sternen wird um vier Zeilen nach unten verschoben.

Sie können nun fortfahren mit Maske testen und speichern.