∴   Naptár

             Ünnepnapokkal, hétvégékkel és aktuális nappal

2014.08.18. 17:26

AS400_Calendar.PNG

 

Mivel kicsit most több időm van mint normális esetben lenne, átnéztem régebbi forráskód gyűjteményemet.

Így került kezembe egy pár éve írt kis program, ami azért érdekes, mert tudja hogy melyik napok esnek hétvégére, melyek a magyar ünnepnapok, valamint kijelzi azt is, hogy éppen mi az aktuális dátum. Mivel ezt a programot ma futtattam le, ezért látható is, hogy a 18. van megjelölve mai napnak, 20.-a pedig ünnepnap.

A programnak 3 paramétere van, ami alapból üres. A kiválasztott dátum kerül majd bele az első kettőbe, mint visszatérési érték 6 illetve 8 hosszú numerikus értékként, míg a 3. paraméterbe egy úgynevezett visszatérési érték kerül bele. Ha ez '03', akkor egyszerű kilépés történt, míg ha 'OK', akkor vannak visszaadott adatok.

A program kezel egy fizikai fájlt is, ez a HOLIDAYS, aminek 3 mezője van:

- WORKDATE (ez egy dátum típusú mező)
- DAYDS30 (30 karakter hosszú leírás)
- HOLIWORK ('H' vagy 'W' értéke lehet. Ha 'H', akkor a program ünnepnapnak jeleníti meg)

A forrásokat itt találjátok:

program  képernyő  fájl

 

A bejegyzés trackback címe:

https://as400programozas.blog.hu/api/trackback/id/tr876614881

Kommentek:

A hozzászólások a vonatkozó jogszabályok  értelmében felhasználói tartalomnak minősülnek, értük a szolgáltatás technikai  üzemeltetője semmilyen felelősséget nem vállal, azokat nem ellenőrzi. Kifogás esetén forduljon a blog szerkesztőjéhez. Részletek a  Felhasználási feltételekben és az adatvédelmi tájékoztatóban.

Nincsenek hozzászólások.
süti beállítások módosítása