Sprawdź klauzulę w Cobol

Przez większość czasu masz wymóg połączenia, podziału, wymiany lub wyodrębnienia znaków z ciągu. W COBOL masz różne funkcje, które można użyć do manipulowania łańcuchem zgodnie z Twoim wymaganiem. Spójrzmy na instrukcję inspekcji, która służy przede wszystkim do liczenia i wymiany znaku w polu. Omówimy wszystkie te klauzule (rozkładanie, zastępowanie i przekształcenie) w następującej dyskusji:

Szczegóły składni:

• Klauzula inspekcyjna z klauzulą ​​liczenia służy do zliczenia określonych znaków.
• Klauzula inspekcji z klauzulą ​​zastępującą służy do zastąpienia określonych znaków.
• Klauzula sprawdzania z klauzulami Tally i wymiany jest używana do liczenia i wymiany znaków.

Aspekt inspekcji klauzuli

• Aby policzyć liczbę znaków w określonym ciągu, możesz użyć inspekcji z opcją tally.
• Aby zastąpić określony znak ciągu, możesz użyć klauzuli zastępującej.
• Możesz użyć typów danych alfabetycznych, alfanumerycznych lub liczb. Nie należy go wyświetlać.
• Ostatnią kwestią jest użycie klauzuli zmiennej, sprawdzić z tallying i zastępować opcję liczenia i zastąpienia znaku w określonym ciągu.

Teraz zobaczymy kilka przykładów programowania jeden po drugim.

Programowanie Przykład 1: Sprawdź za pomocą wymiany

Dział identyfikacyjny.
Program programowy. Ff.
Wydział danych.
Sekcja pliku.
Sekcja magazynowania roboczego.
01 WS-DTE PIC X (10) Wartość „13-12-2022”.
Dział procedury.
A000-Main Section.
Sprawdź WS-DTE zastępując wszystkie „-„ przez „/”.
Wyświetl WS-DTE
Zatrzymaj bieg.

Wyjście:

Papan@papan -virtualbox: ~ /Desktop /pp $ COBC -xjf MP.Cbl
13.12.2022
papan@papan-virtualbox: ~ /Desktop /PP $

Wyjaśnienie:
To jest przykład instrukcji inspekcji Cobol z opcją wymiany. To, co zrobiliśmy z nim, to zadeklarowaliśmy zmienną o nazwie WS-DTE, która faktycznie utrzymuje twoją datę, czyli „13-12-2022”. Sekcja procedury i dział procedury mają akapit o nazwie sekcja główna. Tam po prostu użyjesz inspekcji, który jest „sprawdzanie WS-DTE zastępującego„- „przez„/”. Wyjście tego konkretnego stwierdzenia jest według daty, które ma „/” pomimo.

Programowanie Przykład 2: Sprawdź z podnośnikiem

Dział identyfikacyjny.
Program programowy. PODSTAWOWY.
Wydział danych.
Sekcja pliku.
Sekcja magazynowania roboczego.
01 WS-NME PIC X (15) Wartość „Somdeb Nath”.
01 WS-CNT PIC 9 (03) Wartość zera.
Dział procedury.
A000-Main Section.
Sprawdź WS-NME Tallying WS-CNT dla wszystkich przestrzeni.
Wyświetl WS-CNT.
Zatrzymaj bieg.

Wyjście:

Papan@ubuntu: ~/Desktop/Cobol $ COBC -xjf 1.Cbl
005

Wyjaśnienie:
W tym przykładzie użyliśmy dwóch zmiennych w pracy w sekcji pamięci. Pierwszą zmienną jest „WS-NME”, która faktycznie zawiera nazwę o nazwie „Somdeb Nath”. Druga zmienna to „WS-CNT”, która przechowuje liczbę przestrzeni w tym konkretnym ciągu.

Teraz spójrzmy na dział procedury i sekcję. Mówi, że wstaw WS-nme Tallying WS-CNT dla wszystkich przestrzeni. Jako wyjście otrzymujemy liczbę przestrzeni tego konkretnego ciągu.

Programowanie Przykład 3: Sprawdź za pomocą wymiany

Dział identyfikacyjny.
Program programowy. Mm.
Wydział danych.
Sekcja pliku.
Sekcja magazynowania roboczego.
01 WS-NME PIC X (15) Wartość „Dudley Dursley”.
Dział procedury.
A000-Main Section.
Sprawdź WS-NME zastępując wszystkie „D” przez „D” po początkowym „D”.
Wyświetl WS-NME.
Zatrzymaj bieg.

Wyjaśnienie:
Ten przykład programowania to instrukcja COBOL „Sprawdź z zastąpieniem”. W takim przypadku używamy opcji zastąpienia, aby zastąpić literę „D” swoją małą literą „D”. Jeśli widzisz zmienną „WS-NME”, ma to nazwa, która jest „Dudley Dursley”. W tym przypadku mamy trzy litery „D” w „Dudley Dursley”. Tak więc robi to, że zastępuje drugą literę, ponieważ używamy opcji wymiany po początkowym „D”. Tak więc po początkowym „D”, niezależnie od litera „D”, którą napotyka, jest zastępowana „D”.

Programowanie Przykład 4: Sprawdź za pomocą konwertowania

Dział identyfikacyjny.
Program programowy. Dd.
Wydział danych.
Sekcja pliku.
Sekcja magazynowania roboczego.
01 WS-NME PIC X (15) Wartość „Dudley Dursley”.
Dział procedury.
A000-Main Section.
Sprawdź konwersję WS-NME
„Abcdefghijklmnopqrstuvwxyz” do
"ABCDEFGHIJKLMNOPQRSTU VWXYZ".
Wyświetl WS-NME.
Zatrzymaj bieg.

Wyjście:

Papan@ubuntu: ~/Desktop/Cobol $ COBC -xjf 1.Cbl
Dudley Dursley

Wyjaśnienie:
Ostatni, ale nie najmniejszy przykład programowania dotyczy instrukcji COBOL „Sprawdź z konwertowaniem”. Konwertujemy całą nazwę na małe litery. Tak więc zrobiliśmy, że używając zmiennej nazwy COBOL „WS-NME”, podajemy wszystkie alfabety w kodzie, które jest „od A do Z”. Następnie określiliśmy wszystkie odpowiednie małe alfabety od „A” do „Z”. Wyjście to „Dudley Dursley” z drugim słowem we wszystkich niższych przypadkach.

Wniosek

W tym konkretnym artykule omówiliśmy wszystkie aspekty „sprawdzania” w języku programowania COBOL, szczególnie na dyskusji o stwierdzeniu „sprawdzania”, jego szczegółach składniowych i zastosowaniu tego oświadczenia w odniesieniu do programu.