A kontírozott kontírozási egységek könyvelése az előtétszűrés képernyőről a [Csoportos könyvelés] gomb megnyomásával csoportosan, vagy egy kiválasztott kontírozási egység tétel füléről a [Könyvelés] gomb lenyomásával a kiválasztott egységre vonatkozóan végezhető el.
A könyvelés mindössze a kontírozott állapotban lévő kontírozási egység feldolgozásának jóváhagyását jelenti. Nincs szükség további input adatok bevitelére. A könyvelést végezhetjük tételesen, azaz a kontírozási egységek képernyőjén megnyomjuk a könyvelés gombot, vagy csoportosan, azaz több kontírozási egységet dolgozunk fel egy menetben. A program a kontírozási egység adataiból automatikusan előállítja a könyvelési mozgás adatokat, amelyek a főkönyvi kimutatások és listák alapjául szolgálnak. A kontírozási és könyvelési jogosultság külön van választva, így megoldható, hogy egyes operátorok csak egyik tevékenységet végezhessék. A program a kontírozást és a könyvelést is naplózza, így visszakereshető, hogy ki volt a kontírozó és a könyvelő.
Funkciók: Karbantartás Új tétel
Jogosultságkód: 252300 Help context: 252300
Forrás: Util.Fok_Konyvel
A könyvelési mozgás és forgalmi tételek előállítása úgy történik, hogy a program kétszer sorra veszi a kontírozási ellenszámla tételeket és ezekből, valamint az alapszámla tétel adatokból és a fejadatokból kiszámítja a könyvelendő adatokat. Első menetben az ellenszámlákkal szemben könyveli az alapszámlát, míg a második menetben az alapszámlával szemben rögzíti az ellenszámlákat.
A program 1:N típusú kontírozást valósít meg. Ez azt jelenti, hogy egy számlával szemben több ellenszámla állhat. Amikor viszont a kontírozott tételek könyvelésre kerülnek nem N+1 könyvelt tétel keletkezik, hanem 2*N. A program ugyanis a könyvelés során a könyvelési számla mellett eltárolja az ellenszámla számát. Ezt csak úgy lehet megvalósítani, hogy az alapszámlát is annyi könyvelési mozgásra bontja, ahány ellenszámla áll vele szemben. A könyvelési tételek számát tovább növeli, ha a könyvelendő számla költségnem (elsődleges költségnem könyvelés esetén). Ekkor a költségnem mellett költséghelynek vagy költségviselőnek is kell szerepelnie. Ebben az esetben a költségátvezetési számlával szemben a költséghelyre / költségviselőre is le könyvelni a kontírozott összeget.
Pl: Szállítói anyag és szolgáltatás számla
1. K454 1.620
2. T2 400
3. T466 100
4. T5/6 1.000
5. T466 120
A fenti kontírozási egység könyvelési lépései:
Sor Jelleg Alapszámla Tartozik Követel Ellenszámla Költségszámla
1. K 454 0 400 2 X
2. K 454 0 100 466 X
3. K 454 0 1 000 5 X
4. K 454 0 120 466 X
5. T 2 400 0 454 X
6. T 466 100 0 454 X
7. T 5 1.000 0 454 6
8. K 59 0 1.000 5 6
9. T 6 1.000 0 59 5
10. T 466 120 0 454 X
Tehát az egy számlából és négy ellenszámlából álló kontírozási egységből tíz könyvelési mozgás keletkezett. Megállapíthatjuk, hogy a könyvelési mozgások számát az ellenszámlák és költségszámlák száma határozza meg.
Jelölések:
EllSzaTet Ellenszámla tételek száma
SzlFajX Számla fajta: 1 – Főkönyvi
2 – Folyó
SzlTipX Számla típus 1 – Alap
2 – Ellen
FokKodX Főkönyvi számla kód
ParKodX Partner
KtgJelX Költség jelleg
KtgTipX Költség típus
AKdKodX ÁFA kód
KnyDatX Könyvelés dátuma
TartozX Tartozik
KoveteX Követel
EllSzlX Ellenszámla száma
EllKtgX Ellen költségszámla száma
ProKodX Project kód
TaenAzX Tárgyi eszköz azonosító
KtgSzlX Költség szla száma
KtgHelX Költséghely kód
FunKodX Funkció kód
MeeKodX Mennyiség egység
MennyiX Mennyiség
KtgAtvSzlX Költségnem átvezetési számla <59>
AlapSzla Alapszámla tétel Kontírozási tételek közül az első
EllSzla[I] Ellenszámla tételek Kontírozási tételek a másodiktól
FokMozRog Főkönyvi mozgásokat és forgalmat rögzítő rutin
1. Menet: Ellenszmla - Számla
SzlTipX=2 Ellenszámla
For I:=1 To EllSzaTe Do
Begin
SzlFajX =EllSzla.FKntTet[I].FokKod >>> FFokTor.SziKod
FokKodX =EllSzla.FKntTet[I].FokKod
ParKodX =EllSzla.FKntTet[I].ParKod
KtgJelX =EllSzla.FKntTet[I].KtgJel
KtgTipX =EllSzla.FKntTet[I].KtgTip
AKdKodX =EllSzla.FKntTet[I].AKdKod
TartozX =EllSzla.FKntTet[I].Tartoz
KoveteX =EllSzla.FKntTet[I].Kovete
EllSzlX =AlapSzla.FKntTet.Fokkod
EllKtgX =AlapSzla.FKntTet.KtgSzl
ProKodX =EllSzla.FKntTet[I].Prokod
TaenAzX =EllSzla.FKntTet[I].TaenAz
KtgSzlX =EllSzla.FKntTet[I].Ktgszl
KtgHelX =EllSzla.FKntTet[I].KtgSzl
FunKodX =EllSzla.FKntTet[I].FunKod
MeeKodX =EllSzla.FKntTet[I].MeeKod
MennyiX =EllSzla.FKntTet[I].Mennyi
FokMozRog
If KtgSzlX>0 Then
Begin
˛/ Könyvelés a költséghelyre /
FokKodX =EllSzla.FKntTet[I].Ktgszl
EllSzlX =KtgAtvSzlX /59/
KtgSzlX =EllSzla.FKntTet[I].FokKod
FokMozRog
/ Könyvelés a költség átvezetési számlára /
FokKodX =KtgAtvSzlX /59/
EllSzlX =EllSzla.FKntTet[I].FokKod
TartozX =EllSzla.FKntTet[I].Kovete
KoveteX =EllSzla.FKntTet[I].Tartoz
KtgSzlX =EllSzla.FKntTet[I].Ktgszl
FokMozRog
End
End
2. Menet Számla - Ellenszámla
SzlTipX=1 Számla
Ellenszámla
For I:=1 To EllSzaTe Do
Begin
SzlFajX =AlapSzla.FKntTet.FokKod >>> FFokTor.SziKod
FokKodX =AlapSzla.FKntTet.FokKod
ParKodX =AlapSzla.FKntTet.ParKod
KtgJelX =AlapSzla.FKntTet.KtgJel
KtgTipX =AlapSzla.FKntTet.KtgTip
AKdKodX =AlapSzla.FKntTet.AKdKod
TartozX =AlapSzla.FKntTet.Kovete
KoveteX =AlapSzla.FKntTet.Tartoz
EllSzlX =EllSzla.FKntTet[I].Fokkod
EllKtgX =EllSzla.FKntTet[I].KtgSzl
ProKodX =AlapSzla.FKntTet.Prokod
TaenAzX =AlapSzla.FKntTet.TaenAz
KtgSzlX =AlapSzla.FKntTet.Ktgszl
KtgHelX =AlapSzla.FKntTet.KtgSzl
FunKodX =AlapSzla.FKntTet.FunKod
MeeKodX =AlapSzla.FKntTet.MeeKod
MennyiX =AlapSzla.FKntTet.Mennyi
FokMozRog
If KtgSzlX>0 Then
Begin
˛/ Könyvelés a költséghelyre /
FokKodX =AlaSzla.FKntTet.Ktgszl
EllSzlX =KtgAtvSzlX /59/
KtgSzlX =AlapSzla.FKntTet.FokKod
FokMozRog
/ Könyvelés a költség átvezetési számlára /
FokKodX =KtgAtvSzlX /59/
EllSzlX =AlapSzla.FKntTet.FokKod
TartozX =AlaSzla.FKntTet.Kovete
KoveteX =AlaSzla.FKntTet.Tartoz
KtgSzlX = AlaSzla.FKntTet.Ktgszl
FokMozRog
End
End
FokMozRog Főkönyvi mozgások rögzítése
FFokMoz - Főkönyvi mozgás
Insert
A kontírozott tételek lekönyveléséből származó mozgások adatait tartalmazó tábla
Azonosító adatok:
A1. KnyvEv Könyvelés éve <KnyDat-ból>
A2. KnyvHo Könyvelés hónapja <KnyDat-ból>
A3. KnyvID Könyvelés tételsorszám
A4. FokoAz Főkönyvi azonosító
A5. TetSor Tételsor. – Mozgás
A6. FoMoAz Mozgás tétel azon. FoMoAz=FoKoAz+'/'+EloNull(TetSor,3)
A7. KoTeAz Kontír tétel azonosító
A8. SzlTip Számla típus <SzlTipX>
A9. SzlFaj Számla fajta <SzlFajX>
Leíró adatok:
L1. FokKod Főkönyvi számla kód <FokKodX>
L2. ParKod Partner <ParKodX>
L3. KtgJel Költség jelleg <KtgJelX>
L4. KtgTip Költség típus <KtgTipX>
L5. AKdKod ÁFA kód <AKdKodX>
L6. KnyDat Könyvelés dátuma <FKntFej.KnyDat>
L7. Tartoz Tartozik <TartozX>
L8. Kovete Követel <KoveteX>
L9. EllSzl Ellenszámla száma <EllSzlX>
L10. EllPar Ellenszámla partner <EllParX>
L11. ProKod Project kód <ProKodX>
L12. TaenAz Tárgyi eszköz azon. <TaenAzX>
L13. KtgSzl Költség szla száma <KtgSzl>
L14. EllKtg Ellenköltség szla <EllKtgX>
L15. MeeKod Mennyiség egység <MeeKodX>
L16. Mennyi Mennyiség <MennyiX>
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
FFokFor - Főkönyvi forgalom
Modify / Insert
A főkönyvi számlák időszakonként összesített forgalmi adatait tartalmazó tábla.
1. KnyvEv Könyvelés éve <FKntFej.KontEv>
2. KnyvHo Könyvelés hónapja <FKntFej.KontHo>
3. SzlFaj Számla fajta <FFokMoz.SzlFaj>
4. FokKod Főkönyvi szla <FFokMoz.FokKod>
5. ParKod Partner <FFokMoz.ParKod>
6. Tartoz Tartozik <Tartoz=Tartoz+ FFokMoz.Tartoz>
7. Kovete Követel <Kovete=Kovete+FFokMoz.Kovete>