Inhalt
Index
Support Über uns
Home

2.4.33 SORT




 
Format:
SORT Filename1 [ON] {ASCENDING / DESCENDING} [KEY] Datenfeld1 [Datenfeld2 ...] [ {ASCENDING / DESCENDING} [KEY] Datenfeld3 [Datenfeld4 ...]} ... ] [[WITH] DUPLICATES [IN ORDER]]

[ { INPUT PROCEDURE [IS] Pocedurename1 [{THROUGH / THRU} Procedurename2] / USING Filename2 } ]

[ { OUTPUT PROCEDURE [IS] Pocedurename2 [{THROUGH / THRU} Procedurename3] / GIVING Filename3 } ]


Filename1, Filename2 und Filename3 sind Dateien, die bei Aufruf des SORT nicht geöffnet sein dürfen und mit FD im Cobolprogramm beschrieben sein müssen.

Datenfeld1 und folgende müssen dem Datenbereich des Records von Filename1 zugehörig sein.

SORT sortiert die Input-Sätze entsprechend den Angaben und stellt sie dem Output zur Verfügung.

Hierbei kann der Input entweder aus der Datei Filename1 oder Filename2 (bei Angabe von USING) stammen. Bei der Angabe INPUT PROCEDURE Procedurename1 wird intern ein PERFORM Procedurename1 THRU Procedurename2 aufgerufen. Dort werden mit Hilfe des RELEASE -Statements die zu sortierenden Sätze bereitgestellt.

Die Input-Sätze weren sortiert, das Ergebnis der Sortierung wird in der Datei Filename1 abgestellt. Wird die GIVING -Klausel angegeben wird das Ergebnis in der Datei Filename3 abgestellt.

Bei Verwendung der OUTPUT PROCEDURE wird nach der Sortierung intern ein PERFORM Procedurenam3 THRU Procedurename4 aufgerufen. Die sortierten Sätze können dort mittels RETURN eingelesen und verarbeitet werden.

Sollte beim Sortieren ein Systemfehler auftreten, wird dieser in dem Spezial-Register SORT-RETURN, sowie in den ersten 3-Stellen des Datenbereichs von Filename1 abgestellt.

Siehe auch Programm sort.cob

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


© 1980-2017 Acc Computertechnik GmbH All rights reserved.