Költségnem számlák átvezetése |
  
|
Költségnem számlák átvezetése |
|
A költségnem számlák kiválasztott időszakon belüli idő intervallumának egyenlegét vezeti át a funkció a főkönyvi számla törzsben definiált ráfordítás számlára. Az átvezetésre az összköltség típusú eredmény kimutatás elkészítéséhez van szükség.
A program elindulásához a zárni kívánt időszakot kell megadnunk. Az időszakon belül szűkíthetjük a figyelembe veendő mozgások könyvelésének idő intervallumát. A költségnem számlák egyenlegét a program időintervallum záró dátumával, a rendszerparaméterek között megadott költségnem zárás naplóval a számlák egyenlegének jellegét figyelembe véve átvezeti az a rendszer paraméterek között megadott átvezetési számlával szemben átvezeti a főkönyvi számla törzsben a költségnem számlánál meghatározott ráfordítás számlára.
Pl: 51111 főkönyvi számla megadott időszaki egyenlege: 100 (T).
T811 100
K59 100
Funkciók: Karbantartás Új tétel
Jogosultságkód: 252227 Help context: 252227
Forrás: KtgSzlZar
| 5.2.2.1.1.1 | Időszak választás |
Alap időszak definíciós törzsből történő választás: AIdoTor
KezDatY:= PIdoDef.IdoKez Kezdő dátum
BefDatY:= PIdoDef.IdoBef Befejező dátum
Az átvezetendő időintervallum meghatározása
KezDatX Kezdő dátum
BefDatX Befejező dátum
Adat ellenőrzések:
1. BefDatX >= KezDatX
2. KezDatX >= KezDatY
3. BefDatX <= BefDatY
| 5.2.2.1.1.2 | Számlák egyenlegének átvezetése |
Alaptábla: FFokMoz Főkönyvi mozgás tábla
Where FFokMoz.FokKod = FFokTor.FokKod
And FokMoz.FokKod > '5') And FFokMoz.FokKod < '59'
And FFokTor.KtgSzl <> 'X'
And m.KnyDat >= KezDatX And m.KnyDat<=BefDatX
Begin
FokKodX:= FFokMoz.FokKod
A kijelölt időszak könyvelt forgalma:
Select m.FokKod
Sum(Tartoz – Kovete) IdoForg
From FFokMoz m
Where m.FokKod = FokKodX
And m.KnyDat >= KezDatX And m.KnyDat<=BefDatX
Group by m.FokKod
A kijelölt időszak már átvezetett forgalma:
Select m.FokKod
Sum(Tartoz – Kovete) AtvForg
From FKntFej f, FKntTet t, FFokMoz m
Where f.Bizony = FokKodX
And m.KoTeAz = t.KoTeAz
And t.KontAz = f.KontAz
And m.KnyDat >= KezDatX And m.KnyDat<=BefDatX
m.FokKod = KAzoAda.KtnZarAtv (69900000 / 59100000)
f.NapKod = KAzoAda.KtnZarNp (7ZK)
f.KonTip = '527'
Group by f.BizAzo
If IdoForg + AtvForg > Nulla Then
Begin
SzlJelX:=1 – Tartozik
End
Else
Begin
If IdoForg + AtvForg < – Nulla Then
Begin
SzlJelX:=2 – Követel
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.KtnZarNp (7ZK)
I3. Bizony Bizonylatszám: FokKodX
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égnem zárás'
Kiegészítő adatok:
K1. BizAzo Bizonylat azonosító 0
K2. SzaSza Számlaszám: 0
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: 527 – Költségnem számlák zárása
Napló adatok: Automatikus
FKntTet - Kontírozási tételadatok
Insert
A, Ráfordítás számla
Azonosító adatok:
A7. SzlTip Számla típus: 1 – Alap
A8. SzlJel Számla jelleg: FKntFej.SzlJel
Input adatok:
I1. FokKod Főkönyvi számla FFokTor(FokKodX).KtgSzl
I2. ParKod Partner kód: 0
I3. KtgSzl Költség számla: 0
I4. KtgJel Költség jelleg: 0
I5. KtgTip Költség típus: 0
I6. AkdKod ÁFA besorolás kód: 0
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(IdoForg + AtvForg)
I11. Kovete Követel összeg: 0
End
Else
Begin
I10. Tartoz Tartozik összeg: 0
I11. Kovete Követel összeg: Abs(IdoForg + AtvForg)
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égnem á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.KtnZarAtv (59/699)
I2. ParKod Partner kód: 0
I3. KtgSzl Költség számla: 0
I4. KtgJel Költség jelleg: 0
I5. KtgTip Költség típus: FFokTor(FokKodX).KtgTip
I6. AkdKod ÁFA besorolás kód: 0
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(IdoForg + AtvForg)
I11. Kovete Követel összeg: 0
End
Else
Begin
I10. Tartoz Tartozik összeg: 0
I11. Kovete Követel összeg: Abs(IdoForg + AtvForg)
End
I12. Mennyi Mennyiség 0
Kiegészítő adatok:
K1. KttAzo Kontírozási tétel azonosító: 0
Napló adatok: Automatikus