Myslím, že mohu celkem oprávněně napsat, že programovací jazyk COBOL se pro mě stal nejen pracovní "osudovou profesionalizací", ale do značné míry i hodně osobní "srdeční záležitostí". Musím se přiznat, že v době vlastní soukromě firmy po roce 1989 jsem několikrát zvažoval jinou specializaci, ale vždycky si mě po čase někdo z bývalých zákazníků či nových zájemců znovu našel s lukrativní nabídkou na školení nebo konzultace ...

   Prvním užitečným programem, který jsem samostatně napsal a odladil, byla konverze z kotouče dat na magnetické pásce do jednotného formátu sestav na tiskárně. Skládal se z asi 300 řádků zdrojového textu COBOL Tesla 200 a byl hlavní součástí systémového projektu "Tisková banka VS Ingstav Brno", kterým se od března 1970* na počítači Tesla 200 tiskly ladící a následně i rutinní výstupy. Zmíněný projekt má svůj velice významný příběh, o kterém je řeč v samostatné kapitole.

   Programy se tehdy nejprve napsaly do předtištěného formuláře, ze kterého se pořizovaly děrné štítky - z každého 80-ti znakového řádku jeden. Ty se pak snímaly do počítače pro překlad ze zdrojového jazyka a sestavení do spustitelné formy, která umožňovala ověřování na konkretních datech. Menší programy měly minimálně desítky řádků, běžně to byly stovky a nebylo výjimkou ani několik tisíc. Jeden překlad a sestavení programu o několika stovkách řádků trval 20 až 30 minut i více a při každé formální nebo logické úpravě, vyplývající z ověřování ho bylo nutno opakovat.

   Neumím spočítat, kolik od té doby bylo těch dalších programů - doufám, že se mi v této rubrice postupně podaří blíže popsat některé snad zajímavé projekty, na jejichž realizaci jsem se aktivně podílel. Pro srovnání uvedu ten úplně současný z června 2017*. Představuje asi 160 řádků zdrojového textu v jazyku GnuCOBOL v systému Linux Ubuntu MATE, píše se i spouští samozřejmě na klávesnici s obrazovkou a jeho překlad a sestavení trvá zlomky vteřiny.

   Vytváří obrázkovou mapu náhledů s přímým přístupem k plnému zobrazení v albech na webu. Původně byl vytvořen proto, aby významně usnadnil výběr a prohlížení stovek fotografií* z mnoha desítek akcí folklorního kroužku, se kterým spolupracuji. Ukázalo se však, že varianta programu bude velice prakticky užitečná též pro lokální studium nafotografovaných historických textů v rámci redakční práce na vývoji portálu prog-story.

ČeV - Modřice 19. června 2017

*SOUVISLOSTI:

Přehled realizovaných školení a konzultací k jazyku COBOL v letech 1990 až 2007,
které ovšem čas od času pokračovaly - poslední školení pro Plemdat Hradištko bylo v záři 2013.

 

P90003

   Protokol o kompilaci programu P90003 z roku 1970 - COBOL Tesla 200

 

 

 

 

foto view db1

 

   Protokol o kompilaci programu foto-view-db z roku 2017 - GnuCOBOL Linux

 

 

Jako příklad je zde část HTML stránky, generované programem z r. 2017:

1704-28 - ŽÍTKOVÁ - soustředění <<
* pracovní nácvik pásem

... atd ...

zadání pro výše uvedený výsledek:

1704-28-ZITKOVA-soustredeni *** ŽÍTKOVÁ - soustředění
= &nbsp; &lt;&lt;  
http://img26.rajce.idnes.cz/d2602/14/14161/14161376_316043c416b5d2b87c39555c03d52fb1/images/
* pracovní nácvik pásem
IMG_9534_800.jpg
IMG_9536_800.jpg
DSC_1828.jpg
DSC_2039.jpg
DSC_2036.jpg
IMG_9740_800.jpg

na základě takto zjednodušeného zadání pak výše uvedený program vygeneruje zdrojový text pro HTML stránku - konkretně ke každému obrázku ".jpg" doplní příslušné tagy s odkazem na uložení a zobrazení v novém okně ve formě standardního náhledu ...

ČeV, 2017