A PcBér programban előállított bérfeladások kontírozására szolgáló funkció.
Jogosultságkód: 252223 Help context: 252223
Forrás: BerFelKonPcBer

A kontírozás elvégzésének lépései:
1. A kontírozási input adatállomány ellenőrzése
A program a kontírozás elvégzése előtt ellenőrzi, hogy a kiválasztott input adatállomány sorainak tartalma eleget tesz-e a kontírozási feltételeknek. Amennyiben adódik egy olyan tétel, amely valamilyen oknál fogva nem kontírozható, akkor a program egy bérfeladási tétel kontírozását sem végzi el. A kontírozási szempontból hibás tételeket a program egy hiba listán jeleníti meg.
2. A kontírozás elvégzése
A bérfeladás tábla sorainak kontírozása.
A kontírozás elvégzése előtt a keresés gombot kell megnyomni. A program ekkor ellenőrzi, hogy van-e a megadott feltételeknek megfelelő bérfeladási tétel. A kontírozás gomb csak akkor válik élővé, ha a program talált legalább egy kontírozható bérfeladási tételt.
A kontírozás gomb megnyomása után a program elvégzi a kijelölt bérfeladási tételek kontírozását. Amennyiben adódik egy olyan tétel, amely valamilyen oknál fogva nem kontírozható, akkor a program egy bérfeladási tétel kontírozását sem végzi el. A kontírozási szempontból hibás tételeket a program egy hiba listán jeleníti meg.
Az input adatállomány (Berfeladas_Ev_Sor.Txt) szerkezete:
Sor Kezdő Hossz Típus Megnevezés Leírás Kitölt
1. 1 20 char KonAzoX Kontírozási azonosító Space
Pl: 1234567890__________
KonAzoX := EloNull(Sor,5) !!!
A kontírozási tétel bér rendszerben történő egyedi azonosítására szolgáó mező.
2. 21 15 char KonTipX Kontírozás típuskód Space
Pl: 123____________
A kontírozás típusát (bérfeladás jogcímét) meghatározó adatmező.
3. 36 40 char MegjegX Kontírozás tartalmi leírása Space
Pl: Informatikusok közvetlen bére___________
5. 76 15 char FokSzlaT Főkönyvi számla – Tartozik RightNull,8
Pl: 54110000
6. 91 15 char FokSzlaK Főkönyvi számla – Követel RightNull,8
Pl: 47100000
7. 106 15 float OsszegX Kontírozandó összeg 12I.2D LeftNull
Pl: 000007654321.12 : 7.654.321,12
8. 121 8 char KontDtX Kontírozás dátuma (10)
Pl: 20071121 : 2007.12.21
9. 129 15 char SzeKodX Szervezeti egység kód Space
Pl: 621____________ Kötelező!
10. 144 10 char ProKodX Project kód Space
Pl: 21100123_______ Nem használt!
11. 154 7 char TevKodX Tevékenység kód Space
Pl: 123_______ Nem használt!
12. 161 2 Rekord vége CR/LF
- 162
Fájl vége: EOF
Adatellenőrzési szempontok:
1. A főkönyvi számlaszámok léteznek a főkönyvi törzsben
FokKodT and FokKodK exists in FFokTor
2. A kontírozás dátuma a nyitott időszakba esik
KontDtX In [KezDatX,BefDatX]
3. A szervezet kód létezik a szervezet törzsben
SzeKodX exists in ASzeTor
4. A szervezeti egységek költséghelyei léteznek a főkönyvi törzsben
ASzeTor(SzeKodX).KtgHel exists in FFokTor and KtgHel <> ’X’
A program a bérfeladási adatokból állítja elő a kontírozási adatokat.
FKntFej - Kontírozási fejadatok
Insert
A program a bérfeladási adatokból állítja elő a fejadatokat.
Program által előállított adatok:
Azonosító adatok:
A1. KontEv Kontírozás éve KontEvX
A2. KontHo Kontírozás hónapja KontHoX
A3. KontID Kontírozási tételsor f(’KOX’,KontEv)
A4. KontAz Kontírozási azonosító Program által generált
Input adatok:
I1. KontDt Kontírozás dátuma KontDtX PcBér kontírozás dátum
I2. NapKod Napló kód KAzoAda.BeFeKoN - Bér feladás kontír napló
7BX
I3. Bizony Bizonylatszám KonTipX PcBér kontírozási típus
I4. EloBiz Előző bizonylatszám ProKodX
I5. ParKod Partner kód 0
I6. SzeKod Szervezeti egység SzeKodX
I7. DolKod Dolgozó kód 0 {DolKodX}
I8. Megjeg Megjegyzés MegjegX PcBér megjegyzés
Kiegészítő adatok:
K1. BizAzo Bizonylat azonosító KonAzoX PcBér kontírozási azonosító
K2. SzaSza Számlaszám 0
K3. KonAzo Kontírozási azonosító KonAzoX PcBér kontírozási azonosító
Állapot adatok:
Á1. KonMod Kontírozás típusa 2 – Gépi kontírozás
Á2. FokAll Főkönyvi állapot 1 – Kontírozott
Á3. StoAzA Stornó azonosító A 0
Á4. StoAzB Stornó azonosító B 0
Á5. SzlJel Számla jelleg 1 – Tartozik
Á6. KonTip Kontírozás típusa 521 – Bér feladás kontírozása
Napló adatok:
N1. KOpeKo Kontírozási napló adatok: Operátor kód generált
N2. KTerko Terminál kód generált
N3. KRogda Rögzítés időpontja generált
N4. ROpeKo Könyvelési napló adatok: Operátor kód Üresen marad
N5. RTerko Terminál kód Üresen marad
N6. RRogda Rögzítés időpontja Üresen marad
FKntTet - Kontírozási tételadatok
Insert
1.tétel : Alap számla 1 – Tartozik
2.tétel : Ellen számla 2 – Követel
Program által előállított adatok:
Azonosító adatok:
A1. KontEv Kontírozás éve KontEvX
A2. KontHo Kontírozás hónapja KontEvX
A3. KontID Kontírozási tételsor f(’KOX’,KontEv)
A4. KontAz Kontírozási azonosító: Program által generált
A5. KoTeSo Tételsor. – Kontírozás Inkrementális, a kontírozási csoporton belül 1-ről indul
A6. KoTeAz Kontírozási tétel azonosító
KoTeAz=KontAz+’/’+EloNull(KoTeSo,3)
A7. SzlTip Számla típus: 1 – Alap 2 – Ellen
A8. SzlJel Számla jelleg: 1 – Tartozik 2 – Követel
Input adatok:
I1. FokKod Főkönyvi számla FokKodT FokKodK
I2. ParKod Partner kód 0
I3. KtgSzl Költség számla
If FokKod[1]=’5’ Then ASzeTor(SzeKodX).KtgHel Else X
I4. KtgJel Költség jelleg
If FokKod[1]=’5’ Then ASzeTor(SzeKodX).KtgJel Else 0
I5. KtgTip Költség típus
If FokKod[1]=’5’ Then FFokTor(FokKod).KtgTip Else 0
I6. AkdKod ÁFA besorolás kód: 0
I7. ProKod Project kód: 0 {ProKodX}
I8. TaenAz Tárgyi eszköz azonosító 0
I9. SzeKod Szervezeti egység SzeKodX
I10. DolKod Dolgozó kód 0 {DolKodX}
I11 Tartoz Tartozik összeg OsszegX
I12 Kovete Követel összeg OsszegX
I13. MeeKod Mennyiség egység 0
I14. Mennyi Mennyiség 0
I15. MlpAzo Munkalap azonosító 0
I16. TevKod Tevékenység kód 0 {TevKodX}
Kiegészítő adatok:
K1. KttAzo Kontírozási tétel azonosító: FKntFej.Bizony – Mozgás azonosító
Napló adatok:
N1. Opekod Operátor kód generált
N2. Terkod Terminál kód generált
N3. Rogdat Rögzítés időpontja generált