Inhalt
Index
Support Über uns
Home

2.4.31 SEND




 
Format:
SEND [SCREEN] [USING] {Datenfeld1 / Konstante1} [{Datenfeld2 / Konstante2} ...]


Die SEND - Anweisung dient zur Consolenausgabe mit der Möglichkeit Bildschirmmasken zu verwenden.

Die SEND - Anweisung ohne USING - Zusatz verhält sich wie der DISPLAY - Befehl.

Die Angabe SCREEN bewirkt, daß am Ende des SEND - Befehls der Cursor nicht auf den Beginn der nächsten Zeile positioniert wird.

Die SEND - Anweisung mit USING - Zusatz beinhaltet in Datenfeld1 bzw. Konstante1 entweder eine Format-Anweisung oder eine zuvor abgespeicherte Maske (CALL MKSAV).


Bei SEND USING werden alle angegebenen Datenfelder bis zur kleinsten Stufe aufgelöst, d.h. die Angabe eines Gruppenfeldes (Oberstufe) verhält sich so wie die Angabe aller Unterstufen.

Beispiel:
              01 KUNDENSATZ.
               05 K-NAME        PIC X(30).
               05 K-PLZ         PIC 9(6).
               05 K-ORT         PIC X(30).
               05 K-STRASSE     PIC X(30).


       SEND USING 
           '10:05"Name"20*11:05"Plz/Ort"13#20*12:05"Strasse"20*'
                              KUNDENSATZ.


       ist identisch mit


       SEND USING 
           '10:05"Name"20*11:05"Plz/Ort"13#20*12:05"Strasse"20*'
              K-NAME K-PLZ K-ORT K-STRASSE.                        






Zurück zu Acc-Cobol Search Statement    Hoch zu Procedure Divison in COBOL    Weiter zu SET
Entwickler Portal Impressum AGB Kontakt


© 1980-2017 Acc Computertechnik GmbH All rights reserved.