COBOL -Substring

COBOL -Substring ist ein leistungsstarkes Merkmal der COBOL -Programmiersprache, mit dem die Programmierer bestimmte Teile einer Datenschnur problemlos extrahieren können. Mit diesem Substring kann verschiedene Operationen wie String -Manipulation, Musteranpassung, Berechnungen und Datenanalysen durchgeführt werden. COBOL -Substring kann verwendet werden, um die Programme effizienter, flexibler und wartbarer zu gestalten. COBOL-Substring ist eine integrierte Funktion der COBOL-Sprache und wird verwendet, um ein Substring aus einer bestimmten Zeichenfolge zu extrahieren.

Was macht die Substr -Funktion in COBOL??

COBOL bietet die Substr -Funktion, um einen Teil einer Zeichenfolge zu extrahieren, indem die Quellzeichenfolge, die Startposition und die Länge des gewünschten Substrings bereitgestellt werden. Diese Funktionalität ermöglicht eine effiziente Behandlung von String -Daten in der COBOL -Programmierung.

Die Substr -Funktion extrahiert einen Teil einer Zeichenfolge, die vom n -ten Zeichen und mit einer bestimmten Länge durch den Benutzer beginnt. Wenn das extrahierte Substring eine geringere Länge als die angegebene Länge hat, ist es mit dem gewünschten Zeichen gepolstert.

Wenn der Wert von n die Länge der Eingangszeichenfolge überschreitet, besteht das Ergebnis, das aus der Substr -Funktion erhalten wird.

Wenn Sie keinen Wert für die Länge angeben, gibt die Funktion den Rest der Zeichenfolge aus der Startposition zurück. Standardmäßig ist das verwendete Pad -Zeichen ein Leerzeichen.

Syntax:

Substr (Quell-STR, Startposition, Substr-len)

Die Quellstring ist die Zeichenfolge, aus der Sie das Substring extrahieren möchten. Die „Startposition“ ist der Startindex des Substrings in der „Quell-STR“. Und „Substr-len“ ist die Länge des Substrings, die Sie extrahieren möchten.

Programmierbeispiel 1:

Identifikationsabteilung.
Programm-ID. Substring-Beispiel.
Datenabteilung.
Abschnitt Working-Storage.
01 Quell-String-Bild X (20) Wert 'Hallo Welt' '.
01 Final-String-Bild X (5).
Verfahrensabteilung.
Haupt-Logic.
String-Quell-String-String durch "in die endgültige String.
Zeigen Sie den endgültigen String an: 'Final-String.
Stop Run.

Ausgang:

Papan@Ubuntu: ~/Desktop $ COBC -xjf 1.CBL
Letzte Zeichenfolge: Hallo

Erläuterung:

In diesem Programm definieren wir eine Quellenzeichenfolge von 20 und eine endgültige Länge von 5. Wir initialisieren die Quellzeichenfolge mit dem Wert "Hello World". Wir verwenden dann die String -Funktion, um das erste Wort „Hallo“ aus der Quellzeichenfolge zu extrahieren und in der endgültigen Zeichenfolge zu speichern. Anschließend zeigen wir die endgültige Zeichenfolge mit der Anzeigeanweisung an.

Programmierbeispiel 2:

Identifikationsabteilung.
Programm-ID. Substrings.
Datenabteilung.
Abschnitt Working-Storage.
01 Quell-String-Bild x (20) Wert 'Abcde' '.
01 Substring-Len PIC 9 (2) Wert 1.
01 Start-Index Bild 9 (2) Wert 1.
01 End-Index Bild 9 (2).
01 Sub-String-Bild X (20).
Verfahrensabteilung.
Haupt-Logic.
Führen Sie eine unterschiedliche Substring-Len von 1 bis 1 durch
Bis Substring-len> 20
Führen Sie eine unterschiedliche Startindex von 1 bis 1 durch
Bis Start-Index + Substring-Len-1> 20
Berechnen Sie End-Index = Start-Index + Substring-Len-1
String Quell-String (Startindex: Substring-Len)
Durch die Größe in die Unterstringgröße eingrenzt
Anzeige 'Substring:' Sub-String
Endleistung
Endleistung
Stop Run.

Ausgang:

papan@ubuntu: ~/desktop/cbl $ cobc -xjf 2.CBL
Substring: ABCDE
Substring: BCDE
Substring: CDE
Substring: de
Substring: e

Erläuterung:

Dieses Programm generiert alle möglichen Substrings einer bestimmten Quellzeichenfolge unter Verwendung von zwei verschachtelten Schleifen, um alle möglichen Substringlängen und Ausgangspositionen zu iterieren. Es speichert die Quellzeichen- und Substring-Länge in Quellstring- bzw. Substring-Len. Dann verwendet es den Startindex und das Endindex, um die aktuellen Start- und Endpositionen im Auge zu behalten. Das Programm extrahiert dann das aktuelle Substring mithilfe der String -Anweisung und der Substring -Funktion und zeigt sie mit der Anzeigeanweisung an.

Programmierbeispiel 3:

Identifikationsabteilung.
Programm-ID. Initialenprogramm.
Datenabteilung.
Abschnitt Working-Storage.
01 WS-Full-name Bild x (30) Wert 'Subash Chandra Bose' '.
01 WS-First-Name Bild X (10).
01 WS-Middle-name Bild X (10).
01 WS-S-Surname Bild X (10).
01 WS-DOT PIC X-Wert '.''.
Verfahrensabteilung.
Haupt-Logic.
Zeigen Sie 'Eingabenname an:' WS-Full-Name.
Berechnen Sie WS-First-Name = Function Substring (WS-Full-Name, 1, Index (WS-Full-Name, ")-1).
Berechnen Sie WS-Middle-name = Function Substring (WS-Full-Name, Index (WS-Full-Name, ") + 1, Index (WS-Full-Name, Index (WS-Full-Name", ") + 1) - INDEX (WS -VOLL -NAME, ") - 1).
Berechnen Sie ws-surname = function substring (ws-full-name, index (ws-full-name ", last-index (ws-full-name,")) + 1).
Anzeige 'Output:' WS-First-Name (1: 1) WS-DOT WS-Middle-Name (1: 1) WS-DOT WS-Surne.
Stop Run.

Ausgang:

Papan@Ubuntu: ~/Desktop/Cbl $ COBC -xjf 3.CBL
Eingabenname: Subash Chandra Bose
Ausgabe: s.C. Bose

Erläuterung:

In diesem Programm enthält die Variable WS-Ful-Name den vollständigen Namen der Person. Die Variablen von WS-First-Namen, WS-Middle-Namen und WS-S-Surennamen enthält den Vornamen, den zweiten Vornamen und den Nachnamen der Person. Die Funktionen für Index und Last-Index werden verwendet, um die Positionen der ersten und letzten Räume in der Variablen WS-Full-Names zu ermitteln. Dann drucken wir die Initialen des ersten und zweiten Vornamens, gefolgt vom Nachnamen, getrennt durch einen Zeitraum.

Abschluss

Wir haben die Substr -Funktion in COBOL untersucht und einige Beispiele dafür geliefert, wie sie in praktischen Anwendungen verwendet werden können. Die Substr -Funktion ist eine nützliche Funktion in Geschäftsanwendungen, bei denen die Daten häufig manipuliert oder transformiert werden müssen. Mit der Substr -Funktion können die Programmierer die Substrings leicht aus größeren Zeichenfolgen extrahieren und sie zur weiteren Verarbeitung verwenden. Hoffentlich lieferte dieser Artikel eine nützliche Einführung in die Substr -Funktion in COBOL und demonstrierte einige seiner praktischen Beispiele ordnungsgemäß.