Navigation:  Tartalom > Számviteli modul > Főkönyv > Kontirozás > Gépi kontirozás > Költség számlák havi zárása

 

A költséghelyi számlák költségviselőkre és ráfordításokra történő átvezetésére, illetve a költségviselők anyag és ráfordítás számlákra történő átvezetésére szolgáló funkció.

 

Funkciók:        Karbantartás        Új tétel

Jogosultságkód:        252224                        Help context:        252224

Forrás:                HavKtgZar

 

 

A költségszámlák zárását a költségszámlák átvezetési feltételeinek és cél számláinak definiálására szolgáló költség számla zárás definíciós törzs alapján végzi el a program. A költségszámlák havi zárásakor a definíciós törzs forrás oldalán felsorolt számla – költségjelleg párok havi halmozott forgalmát könyveli át a megadott cél főkönyvi számlára, definiált költségjelleggel.

 

A költségszámlák zárása két lépésben történik.

 

1. Költséghelyek zárása

A költséghelyek zárása a költséghely számlák havi egyenlegének átvezetését jelenti költségviselő vagy ráfordítás számlákra.

 

Pl:        614 számla / 3–as jelleg        ->        7113 számlára / 1-es jelleggel

T7113/1        K699/1

614 számla / 5–ös jelleg        ->        8521 számlára / 0-ás jelleggel

T8521/0        K699/5

 

2. Költségviselők zárása

A költségviselők zárása a költségviselő számlák havi egyenlegének átvezetését jelenti ráfordítás vagy készlet számlákra.

 

Pl:        7114 számla / 1-es jelleggel        ->        83131 számlára

 T83151                K7114/1

 751 számla / 1-es jelleggel        ->        2312 számlára

 T2312                K751

 

A program az adatokat a lekönyvelt főkönyvi mozgásokból gyűjti ki. Ezért a költségviselők zárása előtt a költséghelyek zárása funkcióval kikontírozott mozgásokat le is kell könyvelni, mert ellenkező esetben a 7-es számlaosztályba átvezetett (kontírozott) tételek nem kerülnek tovább ráfordítás vagy anyag számlákra.

 

A program eltárolja azt, hogy egy adott időszak forgalmából melyik főkönyvi számláról milyen összeg került már átvezetésre. Ez azt jelenti, hogyha az átvezetés után még könyvelünk az adott főkönyvi számlára, akkor az átvezetés újbóli elindítása után már csak a különbözetet vezeti tovább a program. Amennyiben egy adott költségszámla egyenlege követel egyenlegű, akkor a program a könyvelést ellentétes jelleggel végzi el, azaz a tartozik és követel oldal felcserélődik.

 

1. Input adatok bekérése

 KezDatX        Kezdő dátum

 BefDatX        Befejező dátum

 

2. Költséghelyek zárása

Alaptábla:        FKtZarDf        Költség zárás definíciós tábla

Where Substring(FKtZarDf.FokKodF,1,1)='6' Do

Begin

FokKodX:= FKtZarDf.FokKodF

KtgJelX:= FKtZarDf.KtgJelF

Select        HaviForg:=Sum(Tartoz – Kovete)

From FFokMoz

Where        FFokMoz.FokKod=FokKodX And

FFokMoz.KtgJel=KtgJelX And

FFokMoz.KnyDat>=KezDatX And

FFokMoz.KnyDat<=BefDatX

 

Select HaviKonv:=Sum(Tartoz – Kovete)

From FFokMoz, FKntFej

Where        FKntFej.BizAzo=FokKodX And                        (614)

FKntFej.SzaSza=KtgJelX And                        (3)

FFokMoz.FokKod=KAzoAda.KthAtv                (699)

FFokMoz.KnyDat>=KezDatX And

FFokMoz.KnyDat<=BefDatX And

FfktFej.NapKod=KAzoAda.HovNapZar                (7ZX)

 

If HaviForg + HaviKonv > Nulla Then

Begin

 SzlJelX:=1 – Tartozik        Átvezetés könyvelés

End

Else

Begin

If HaviForg + HaviKonv < – Nulla Then

Begin

SzlJelX:=2 – Követel        Átvezetés könyvelés

End

Else

Begin

Nincs könyvelés

End

End

Next

End

 

Átvezetés könyvelés:

 

FKntFej - Kontírozási fejadatok

Insert

 

Program által előállított adatok:

Azonosító adatok:        Automatikus

 

Input adatok:

I1.        KontDt                Kontírozás dátuma:        BefDatX

I2.        NapKod                Napló kód:                KAzoAda.HavZarNp

I3.        Bizony                Bizonylatszám:                FokKodX+'/'+KtgJelX                (614/3)

I4.        EloBiz                Előző bizonylatszám:        <0>

I5.        ParKod                Partner kód:                <0>

I6.        SzeKod        Szervezeti egység        <0>

I7.        DolKod                Dolgozó kód                <0>

I8.        Megjeg                Megjegyzés:                'Költséghely számlák havi zárása'

 

Kiegészítő adatok:

K1.        BizAzo                Bizonylat azonosító        FokKodX                        (614)

K2.        SzaSza        Számlaszám:                KtgJelX                                (3)

K3.        KonAzo                Kontírozási azonosító:        <0>

 

Á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                SzlJelX

Á6.        KonTip                Kontírozás típusa:        523 – 'Költséghely számlák havi zárása

 

Napló adatok:                Automatikus

 

FKntTet - Kontírozási tételadatok

Insert

 

A, Költség számla

Azonosító adatok:

A1.        KontEv                Kontírozás éve                <KnyDat-ból>

A2.        KontHo                Kontírozás hónapja        <KnyDat-ból>

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=KnyvAz+'/'+EloNull(KoTeSo,3)

A7.        SzlTip                Számla típus:                1 - Alap

A8.        SzlJel                Számla jelleg:                FKntFej.SzlJel

 

Input adatok:

I1.        FokKod                Főkönyvi számla        FKtZarDf.FokKodC                (7113)

I2.        ParKod                Partner kód:                0

I3.        KtgSzl                Költség számla:                0

I4.        KtgJel                Költség jelleg:                FKtZarDf.KtgJelC                (1)

I5.        KtgTip                Költség típus:                0

I6.        AkdKod        ÁFA besorolás kód:        00

I7.        ProKod                Project kód:                0

I8.        TaenAz        Tárgyi eszköz azon.        0

I9.        MeeKod        Mennyiség egység        0

If SzlJel=1 Then

Begin

I10.        Tartoz                Tartozik összeg:        Abs(HaviForg + HaviKonv)

I11.        Kovete                Követel összeg:                0

End

Else

Begin

I10.        Tartoz                Tartozik összeg:        0

I11.        Kovete                Követel összeg:                Abs(HaviForg + HaviKonv)

End

I12.        Mennyi                Mennyiség                0

 

Kiegészítő adatok:

K1.        KttAzo                Kontírozási tétel azonosító:        0

 

Napló adatok:                Automatikus

 

B, Költséghely átvezetési számla

 

Azonosító adatok:

A7.        SzlTip                Számla típus:                2 - Ellen

A8.        SzlJel                Számla jelleg:                Inverz(FKntFej.SzlJel)

 

Input adatok:

I1.        FokKod                Főkönyvi számla        KAzoAda.KthAtv                (699)

I2.        ParKod                Partner kód:                0

I3.        KtgSzl                Költség számla:                0

I4.        KtgJel                Költség jelleg:                KtgJelX                                (3)

I5.        KtgTip                Költség típus:                0

I6.        AkdKod        ÁFA besorolás kód:        00

I7.        ProKod                Project kód:                0

I8.        TaenAz        Tárgyi eszköz azon.        0

I9.        MeeKod        Mennyiség egység        0

If SzlJel=1 Then

Begin

I10.        Tartoz                Tartozik összeg:        Abs(HaviForg + HaviKonv)

I11.        Kovete                Követel összeg:                0

End

Else

Begin

I10.        Tartoz                Tartozik összeg:        0

I11.        Kovete                Követel összeg:                Abs(HaviForg + HaviKonv)

End

I12.        Mennyi                Mennyiség                0

 

Kiegészítő adatok:

K1.        KttAzo                Kontírozási tétel azonosító:        0

 

Napló adatok:                Automatikus

 

3. Költségviselők zárása

A költségviselők zárása a költségviselő számlák havi egyenlegének átvezetését jelenti ráfordítás vagy készlet számlákra.

 

Pl:        7114 számla / 1-es jelleggel        ->        83131 számlára

T83151                K7114/1

 

Alaptábla:        FKtZarDf        Költség zárás definíciós tábla

Where Substring(FKtZarDf.FokKodF,1,1)='7' Do

Begin

FokKodX:= FKtZarDf.FokKodF

KtgJelX:= FKtZarDf.KtgJelF

Select

 HaviForg:=Tartoz - Kovete

From FFokMoz

Where        FFokMoz.FokKod=FokKodX And

FFokMoz.KtgJel=KtgJelX And

FFokMoz.KnyDat>=KezDatX And

FFokMoz.KnyDat<=BefDatX

 

If HaviForg > Nulla Then

Begin

SzlJelX:=1 – Tartozik        Átvezetés könyvelés

End

Else

Begin

If HaviForg < – Nulla Then

Begin

SzlJelX:=2 – Követel        Átvezetés könyvelés

End

Else

Begin

Nincs könyvelés

End

End

 

Next

End

 

 

Átvezetés könyvelés:

 

FKntFej - Kontírozási fejadatok

Insert

 

Program által előállított adatok:

Azonosító adatok:        Automatikus

 

Input adatok:

I1.        KontDt                Kontírozás dátuma:        BefDatX

I2.        NapKod                Napló kód:                KAzoAda.HavZarNp

I3.        Bizony                Bizonylatszám:                FokKodX+'/'+KtgJelX                (7114/1)

I4.        EloBiz                Előző bizonylatszám:        <0>

I5.        ParKod                Partner kód:                <0>

I6.        SzeKod        Szervezeti egység        <0>

I7.        DolKod                Dolgozó kód                <0>

I8.        Megjeg                Megjegyzés:                'Költséghely számlák havi zárása'

 

Kiegészítő adatok:

K1.        BizAzo                Bizonylat azonosító        FokKodX

K2.        SzaSza        Számlaszám:                KtgJelX

K3.        KonAzo                Kontírozási azonosító:        <0>

 

Á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                SzlJelX

Á6.        KonTip                Kontírozás típusa:        523 – 'Költséghely számlák havi zárása

 

Napló adatok:                Automatikus

 

FKntTet - Kontírozási tételadatok

Insert

 

A, Ráfordítás vagy anyag számla

Azonosító adatok:

A1.        KontEv                Kontírozás éve                <KnyDat-ból>

A2.        KontHo                Kontírozás hónapja        <KnyDat-ból>

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=KnyvAz+'/'+EloNull(KoTeSo,3)

A7.        SzlTip                Számla típus:                1 - Alap

A8.        SzlJel                Számla jelleg:                FKntFej.SzlJel)

 

Input adatok:

I1.        FokKod                Főkönyvi számla        FKtZarDf.FokKodC                (83131)

I2.        ParKod                Partner kód:                0

I3.        KtgSzl                Költség számla:                0

I4.        KtgJel                Költség jelleg:                FKtZarDf.KtgJelC                (0)

I5.        KtgTip                Költség típus:                0

I6.        AkdKod        ÁFA besorolás kód:        00

I7.        ProKod                Project kód:                0

I8.        TaenAz        Tárgyi eszköz azon.        0

I9.        MeeKod        Mennyiség egység        0

If SzlJel=1 Then

Begin

I10.        Tartoz                Tartozik összeg:        Abs(HaviForg)

I11.        Kovete                Követel összeg:                0

End

Else

Begin

I10.        Tartoz                Tartozik összeg:        0

I11.        Kovete                Követel összeg:                Abs(HaviForg)

End

I12.        Mennyi                Mennyiség                0

 

Kiegészítő adatok:

K1.        KttAzo                Kontírozási tétel azonosító:        0

 

Napló adatok:                Automatikus

 

B, Költségviselő számla

 

Azonosító adatok:

A7.        SzlTip                Számla típus:                2 - Ellen

A8.        SzlJel                Számla jelleg:                Inverz(FKntFej.SzlJel)

 

Input adatok:

I1.        FokKod                Főkönyvi számla        FokKodX                        (7114)

I2.        ParKod                Partner kód:                0

I3.        KtgSzl                Költség számla:                0

I4.        KtgJel                Költség jelleg:                KtgJelX                                (1)

I5.        KtgTip                Költség típus:                0

I6.        AkdKod        ÁFA besorolás kód:        00

I7.        ProKod                Project kód:                0

I8.        TaenAz        Tárgyi eszköz azon.        0

I9.        MeeKod        Mennyiség egység        0

If SzlJel=1 Then

Begin

I10.        Tartoz                Tartozik összeg:        Abs(HaviForg)

I11.        Kovete                Követel összeg:                0

End

Else

Begin

I10.        Tartoz                Tartozik összeg:        0

I11.        Kovete                Követel összeg:                Abs(HaviForg)

End

I12.        Mennyi                Mennyiség                0

 

Kiegészítő adatok:

K1.        KttAzo                Kontírozási tétel azonosító:        0

 

Napló adatok:                Automatikus