Inhalt
Index
Support Über uns
Home

2.4.30 SEARCH




 
Format1:
SEARCH Datenfeld1 [VARYING {Datenfeld2 / Index1}] [[AT] END Befehlssequenz1] [WHEN Bedingung1 {Befehlssequenz2 / NEXT SENTENCE] .... [END-SEARCH]


Mit SEARCH können Tabellen durchsucht werden. Wird VARIYING angegeben, wird die Tabelle ab diesem Wert bis zum Ende durchsucht. Der aktuelle Indexwert befindet sich in Datenfeld2 bzw. Index1 beim Durchlaufen der WHEN - Anweisung(en).

Wird VARYING nicht angegen, wird der 1. Index der Tabelle verwendet.


 
Format2:
SEARCH ALL Datenfeld1 WHEN { Datenfeld2 {IS EQUAL [TO] / = } Datenfeld3 / Bedingung1 }

[ AND { Datenfeld4 {IS EQUAL [TO] / = } Datenfeld5 / Bedingung2 } ] ... { Befehlssequenz1/ NEXT SENTENCE } [END-SEARCH]


SEARCH ALL verhält sich wie SEARCH ohne VARYING - Angabe.

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


© 1980-2017 Acc Computertechnik GmbH All rights reserved.