Funkce malých písmen v Cobolu
Cobol, zkratka pro COmmon Bbezstarostnost Orozzuřený Language, je programovací jazyk na vysoké úrovni pro firemní aplikace. Přestože je Cobol jedním z nejstarších programovacích jazyků, má stále velkou hodnotu, zejména ve finančním a administrativním sektoru. Jednou z důležitých operací manipulace s řetězci ve většině těchto aplikací je převod případů. V této diskusi se zaměříme na implementaci funkce malých písmen.
Pochopení funkce malých písmen
Funkce malých písmen, jak název napovídá, je funkce, která převádí všechny znaky v určitém řetězci na malá písmena. COBOL, na rozdíl od mnoha populárních programovacích jazyků, jako je Python nebo JavaScript, nemá vestavěnou funkci řetězce malých nebo velkých písmen. Této funkce však lze snadno dosáhnout pomocí Cobolova INSPECT slovesa, které zde bude klíčové.
Řešení problému
Pojďme pochopit jednoduchý způsob, jak vyřešit náš problém. V podstatě nahradíme každý velký znak jeho ekvivalentním malým písmenem. Toto řešení vyžaduje použití slovesa INSPECT. Tento přístup znamená, že každé velké písmeno systematicky nahrazuje odpovídající malé písmeno.
01 STRING-VELKÁ PÍSMENA OBRÁZKU X(26) VALUE “ABCDEFGHIJKLMNOPQRSTUVWXYZ”.
01 HODNOTA ŘETĚZCE-NÍZKÁ PIC X(26) „abcdefghijklmnopqrstuvwxyz“.
01 STRING-TO-CONVERT PIC X(100) VALUE “PŘEVEĎTE TOTO NA NÍZKÁ”.
01 I OBRÁZEK 99 HODNOTA 1.
ROZDĚLENÍ POSTUPŮ.
A.
PROVEĎTE B 26KRÁT.
STOP RUN.
B.
ZKONTROLUJTE ŘETĚZCE K PŘEVODU
NAHRAZENÍ VŠECH ŘETĚZCOVÝCH VELKÝCH PÍSMEN (I:I) ŘETĚZCI VELKÝCH PÍSMEN (I:I).
PŘIDAT 1 K I.
Vysvětlení kodexu
Náš ukázkový program Cobol začíná své datové dělení se čtyřmi datovými položkami. STRING-VELKÁ a STRING-LOWERCASE jsou definovány a mají přiřazeno 26 velkých a malých anglických abeced. STRING-TO-CONVERT obsahuje řetězec, který má být převeden na malá písmena. Nakonec máme index, který jsem inicializoval s 1.
Rozdělení procedur je místo, kde sídlí naše logika. Začneme provedením odstavce B 26krát, kde 26 odpovídá délce našich abeced. Uvnitř B používáme sloveso INSPECT na STRING-TO-CONVERT k nahrazení každého výskytu každého velkého písmene jeho malým protějškem. I se zvyšuje s každou iterací pro přechod z jedné abecedy do druhé.
Rozdělení na INSPECT
INSPECT je jedinečný pro COBOL a je to velmi mocné sloveso určené pro manipulaci se řetězci. Sloveso nabízí různé funkce včetně mimo jiné počítání výskytu konkrétního znaku/řetězce, nahrazování znaků/řetězců a počítání. V této souvislosti jsme jej použili k nahrazení každého velkého písmena příslušným malým písmenem.
Stejně jako u neustále se měnících módních trendů se i svět kódování neustále vyvíjí. Zůstat aktuální je zásadní, ale stejně tak je důležité ocenit a pochopit základy těchto programovacích jazyků, jako je COBOL. Pro srovnání v kontextu módy se prvky, jako je koordinace barev a přizpůsobení látek, liší podle období a regionů, ale základní principy zůstávají stejné, podobně jako v kódování.
