A Dokumentum modulban a Dokumentum elintézett állapotát állítja az eljárás, ha az elintézve állapotot automatikusan kell a programnak eldöntenie.
Iktatószám |
A Dokumentum iktatószáma |
Állapot |
|
ElintézveDátum |
|
ElintézveIdő |
|
1 |
A kapott IktatóSzám-ot meg kell keresni az DKDokFej.IktatóSzám-ban. |
2 |
Az 1.pontban kapott rekordból a DKDokFej.GyKód mező értékét meg kell keresni a DKGyűjtFej állományban INDEX [ GyKód ] -on |
3 |
- Ha DKGyűjtFej.ÁllapotBevitel=Van és DKGyűjtFej.ÁllapotElintéz=Automata, akkor DKGyűjtBiz állományban INDEX [ GyKód + DokumElintéz + BizTípus ]-on meg kell keresni azokat a rekordokat, ahol GyKód=A 2.pontban kapott érték DokumElintéz=mindig kötelező|kötelező, ha be van sorolva az alábbiakba
- Ha DKGyűjtFej.ÁllapotBevitel#Van vagy DKGyűjtFej.ÁllapotElintéz#Automata, akkor vége az eljárásnak, nem kell a többi rekordot vizsgálni és a Kimenő adatban Állapot=Marad és ElintézveDátum és ElintézveIdő üres |
4 |
Ebben a pontban az dől el, hogy a 3.pontban kigyűjtött rekordok közül melyek maradnak meg első körben. - Amelyekben DokumElintéz="mindig kötelező" maradnak - Amelyekben DokumElintéz="kötelező, ha be van sorolva az alábbiakba" érték esetén DKGyűjtBiz.DokumBesor-ban található Dokumentum besorolás képletet ki kell értékelni és, ha a Bemenő paraméterként kapott Iktatószám megfelel a képletnek, akkor marad a rekord, egyébként kiesik az eredményből A képlet kiértékelés a DKDokBesor állományban történik a Besorolás mezőre (szűkítve IktatóSzámra) |
5 |
A 4.pont után maradt rekordokat egyenként kell megvizsgálni. A Vizsgálat tárgya az, hogy a rekordban lévő BizTípus értéke megtalálható-e DKDokBiz állományban INDEX [Iktatószám + BizTípus + BizSzám] -on. - Ha talál az éppen vizsgált rekordra egyetlen egy rekordot is a DKDokBiz-ben, ahol az Iktatószám és a BizTípus egyezik, akkor mehet a következő rekordra. Eközben minden DKDokBiz rekordról elteszi FelvDátum+FelvIdő és a MódDátum+MódIdő közül a nagyobbat az Kimenő adat ElintézveDátum+ElintézveIdő értékébe, ha az nagyobb lenne az aktuális értéke ElintézveDátum+ElintézveIdő értékének. - Ha nem talál olyan rekordot a DKDokBiz-ben, ahol az Iktatószám és a BizTípus egyezik, akkor vége az eljárásnak, nem kell a többi rekordot vizsgálni és a Kimenő adatban Állapot=Marad és ElintézveDátum és ElintézveIdő-t ki kell nullázni. - Ha a 4.pont rekordjain végig ment a program és mindre talált bizonylatot, akkor vége az eljárásnak, a Kimenő adatban Állapot=Elintézve. |