PDA

View Full Version : COBOL



Andreas Herzfeldt
14-11-03, 15:13
Hallo Forum,

gibt es im COBOL eine Funktion, mit der man aus einem Alphanumerischen Feld eines Datensatzes ein bestimmtes Literal ermitteln kann - ähnlich der like %WERT% - Funktion im SQL.

z.B. Feld Name = PIC X(30) und nur wenn dort u. a. 'GmbH' steht, möchte ich diesen Datensatz weiterverarbeiten.


Andreas

Fuerchau
14-11-03, 15:34
77 MyCount pic s9(5) comp-3.

INSPECT NAME TALLYING MyCount FOR CHARACTERS BEFORE "GmbH"

Das Feld MyCount+1 ist dann die Position des Suchstrings.

Weiteres siehe auch unter "INSPECT " im COBOL-Handbuch

Andreas Herzfeldt
17-11-03, 06:29
Guten morgen,

Danke für die prompte Beantwortung - hat geklappt.

Andreas