Vlákno názorů k článku The future's bright… the future's Cobol od mikrom - Velmi pekny clanok, ale kedze COBOL pouzivam profesionalne,...

Velmi pekny clanok, ale kedze COBOL pouzivam profesionalne, mam par poznamok k tomuto tvrdeniu autora: "V programovacím jazyku COBOL lze samozřejmě zapisovat i programové smyčky, ovšem tělo smyčky neobsahuje blok kódu, ale pouze volání nějaké procedury. Pro tento účel se používá fráze PERFORM"

Prikaz PERFORM sluzi na zavolanie procedury, t.j.

PERFORM moja-procedura

kde procedura sa nazyva v COBOLe paragraf a je deklarovana ako:

moja-procedura
  prikazy
  .

Dalej sa PERFORM pouziva aj na cykly, ktore v tele cyklu mozu obsahovat nielen volanie nejakej procedury, ale normalny blok prikazov, tak ako je to bezne v inych jazykoch -napr::
for-cyklus:

for(i=1; i<=n; i++) {
  prikazy
}

je v COBOLe

perform varying i from 1 by 1 until i<=n
  prikazy
end-perform

while cyklus:

while (!podmienka) {
  prikazy
}

je v COBOLe:

perform with test before until podmienka
  prikazy
end-perform

do-while cyklus:

do {
  prikazy
} while (!podmienka)

je v COBOLe:

perform with test after until podmienka
  prikazy
end-perform

Díky moc za doplnění a opravu. S COBOLem jsem už prakticky dvě desetiletí nepřišel do styku a nějak se mi to vypařilo z paměti :-) Spíš jsme dělali v RPG a teď se dívám, že je prakticky stejně starý jako COBOL.

Zaujimave, ze ste pracoval s RPG, ja pouzivam COBOL na IBM iSeries, kde kraluje prave jazyk RPG (= Report Program Generator). COBOL je oproti RPG uplne normalny a intuitivny jazyk. RPG je snad jediny programovaci jazyk, ktory som nechapal az kym som sa nezucastnil skolenia. Dovtedy mi to pripadalo horsie ako assembler. IBM pridava s kazdym novym releasom operacneho systemu OS/400 aka i5 OS nove featury prave do RPG. Najprv to bolo RPG III potom RPG IV a teraz je free form RPG. RPG je de facto systemovy jazyk na IBM iSeries.

To je pravda, že ten jazyk byl takový zmatený. Na jednu stranu trošku assembler, na stranu druhou přímá manipulace s databázovými záznamy. U nás ani tak nešlo o tvorbu nových programů, spíš mírné úpravy a hlavně se nad tím stavěly web servicy - proto jsem se k tomu dostal.