Cobol: Skirtumas tarp puslapio versijų

'''COBOL''' - tokia [[programavimo kalba]], kuri yra viena iš seniausių kalbų, kokios tik yra šias dienas pasiekusios - sukurta dar [[1959]] metais, taip kad nesmarkiai teatsilieka nuo [[Fortran]]. Pavadinimas gi yra santrumpa nuo "COmmon Business Oriented Language", tipo suprask kad esą [[verslas|verslui]] skirta. Kadangi tai tokia [[santrumpa]], tai rašoma paprastai visomis [[didžiosios raidės|didžiosiomis raidėmis]].

Šiais laikais COBOL dažniausiai laikoma seniai mirusia, tačiau išties tai nei velnio ji nemirusi, nes kaip gyvavo, taip ir gyvuoja, o laikas nuo laiko net ir naujos versijos pasirodo, kaip kad netgi objektinius fyčerius turintis COBOL-2002. Tačiau nors ir nemirusi, COBOL jau maždaug 40 metų visokiems programuotojams varo gilų siaubą, nes tie vis palygina COBOL su kitomis kalbomis ir pakraupsta.

Savo daugeliu bruožų COBOL miglotai primena [[Lolcode]], tiktai yra daug prasčiau struktūruota, iš principo nepritaikyta kompiliavimui, turi įsiūtą kodo modifikavimą ir nepaprastai aktyviai toleruoja [[Goto]]. Būtent dėl to Cobol kalboje nesveikai naudoto Goto kažkada koksai tai programuotojas parašė paskui visų programavimo kalbų manifestą, pavadintą "Goto to be considered harmful".

 

Istoriškai COBOL irgi yra reikšminga kalba, nes būtent joje pirmiausiai atsirado į [[Algol]], o paskui ir į kitas kalbas perėję paprasti loginiai sakiniai, kaip kad visokie ten su IF. Dabar daugeliui keistas dalykas, ale priskyrimo operacijos Cobol kalboje yra ne iš dešinės į kairę (lenkiška notacija), o atvirkščiai - iš kairės į dešinę, kaip įprastoje žmonių kalboje. Pavyzdžiui, tipiškas "Y=Y+X", parašius jį COBOL, būtų toks:

Daugelis mitų apie COBOL, kaip kad pasakojimai apie tai, esą tenai nėra lokalių kintamųjų ar kad tekstą reikia formatuoti, tarpų visokių prirašant - visa tai yra mitologija, atėjusi dar iš laikų, gerokai ankstesnių, negu [[1968]] metų COBOL standartas. Trumpai tariant, nepasiduokit durninimui.

Kad ir kaip būtų keikiama, COBOL turi neabejotinų privalumų: jos pramokti nieko nesuprantančiam žmogui yra gerokai lengviau, ji turi labai geras teksto apdirbimo priemones, kai kuriomis duomenų valdymo savybėmis gali lygintis su [[SQL]] (pastarasis atsirado geru dešimtmečiu vėliau už COBOL), o dėl perteklinio verbališkumo yra bene vienintelė kalba, kuria programuojant, praktiškai nereikia komentavimo. Dėl to, kad griežtas COBOL standartas buvo išleistas dar [[1968]] metais, o ir dėl to, kad ji palaiko griežtą duomenų tipizaciją ir neleidžia išsidirbinėti su rodyklėmis, savo portabilumu ši kalba nenusileidžia [[Java]] kalbai (ir beje, nėra kompiuterio, kur ji negalėtų dirbti), tačiau yra daug greitesnė.

Dėl savo seno amžiaus COBOL yra tokia stabili kalba, kad nėra anei jokios tikimybės, kad kokia nors nauja realizacija ims nevirškinti senų programų, o didelėms verslo įmonėms tai yra labai svarbu. Todėl programos, parašytos COBOL prieš 40 metų, vis dar be problemų dirba ir naujuose kompiuteriuose - neretai netgi be minimalių modifikacijų.

Bendrai imant, COBOL daug labiau negu kitos programavimo kalbos primena žmonių kalbą. COBOL naudojamas labai didelis perteklius žodžių, kur lyg ir pakaktų pavienio žodžio, atsiranda daug blevyzgų, tad rašyti teksto tenka daug. Kita vertus, taip rašant, programa būna labai nesunkiai suprantama net ir tiems žmonėms, kurie niekada niekad nieko neprogramavo, o tai kartais yra didelis privalumas. Dar didesnis privalumas yra tame, kad taip žmogiškai atrodančios programos gaunasi save dokumentuojančios.

Gal dėl tokių savybių COBOL ir buvo mėgstama tų, kas programuoti nelabai mėgdavo, tai ir dabar dažniausias variantas, kada COBOL programuoja visai ne kokie programuotojai, o kokie nors [[vadibybininkai]]. Užtat paskui visi dar labiau keikia COBOL.

== Hello World su COBOL ==

COBOL tikrai nėra tokia kraupi, kaip kad galima atrasti internetų pavyzdžiuose, kuriuose paimamas koks nors 1960 metų COBOL kodo gabalas, prikaišiotas visokių baisybių, o pasku sakoma, kad esą tasai puslapį teksto užimantis kodo gabalas - tai čia paprasčiausia "Hello World". Viskas žymiai paprasčiau:

O ir tiesą sakant, įprastame šiuolaikiniame COBOL, tai išvis tebūtų viena eilutė: