Kerekítési különbségek csoportos elszámolása |
  
|
Kerekítési különbségek csoportos elszámolása |
|
A funkció segítségével a pénzügyileg rendezett számlák, rendezés után megmaradó kis értékű egyenlegét szüntetethetjük meg kerekítési különbözet (nyereség / veszteség) pénzmozgás automatikus generálásával. A kerekítési különbség elszámolása után a számla pénzügyi egyenlege nulla lesz.
A csoportos kerekítési kölönbözet különbözet elszámolás funkcióval a megadott szűrési feltételeknek megfelelő minden olyan számlára (pénzügyi bizonylatra) számolhatunk el kerekítési különbséget, amelynek egyenlege (abszolút értékben) egy megadott értékhatár alatt van.
Jogosultságkód: 242610 Help context: 242610
Forrás: Frm_KerKulCsopElsz
Script: PSzaAla_KerKulElsz.sql
1. PSzaAla.SzAlId Számla azonosító
2. PSzaAla.SzaSza Számlaszám
3. PSzaAla.DevKod Számla devizanem
4. PSzaAla.TelDat Számla teljesítés dátuma
5. PSzaAla.TipusK Számla típus
6. PSzaAla.FormaK Számla formátum
7. PSzaAla.Ralaci Számla reláció
8. PSzaAla.Jelleg Számla jelleg
9. PSzaAla.FimKod Számla fizetési mód
10. PSzaAla.ParKod Számla alap partner
11. PSzaAla.ParSzl Számla partner főkönyvi számla
12. PSzaAla.PeuKod Számla pénzügyi eszköz
13. EgyenlegDev Számla devizás egyenlege
1. PSzaAla.StoKod = ’0’ Nem stornózott, vagy stornó számla
2. PSzaAla.Status = ’1’ Elfogadott státusz
| 3. | Abs(EgyenlegHuf) < ErtHatX A számla könyvelési devizanemű (HUF) egyenlege kisebb a megadott értékhatárnál. |
4. EgyenlegHuf * EgyenlegDev > -1_4 A devizás és könyvelési egyenleg előjele nem tér el.
Csak olyan számlára számolható el automatikusan a kerekítési különbség, amelyeknek devizás és forintos egyenlege egyező előjelű, vagy a devizás egyenleg 0.
Eltérő előjelű egyenlegű számlák egy lépésben nem kerekíthetőek, mivel a két féle előjel miatt két féle pénzügyi mozgáskódra lenne szükség. Ezért az ilyen számlák esetében előbb a devizás egyenleget kell rendezni kézi könyveléssel, majd amikor a devizás egyenleg 0, a forintos egyenleg eltüntethető az automatikus kerekítéssel.
| 5. | Abs(EgyenlegHuf) > 0 OR Abs(EgyenlegDev) > 0 A számla forintos vagy devizás egyenlege nem 0. |
1. DatumX Elszámolás dátuma A nyitott időszakba kell esnie!
A: Now
2. ErtHatX Elszámolási értékhatár
Az ennél kisebb forintos egyenlegű számlákat szűri meg a program.
0 > ErtHatX <= KAzoAda.KieErtHat
3. BtoKodX Pénzmozgás bizonylattömbje
A: KAzoAda.BtoKodKieEgyeb
Választható: KBtoTor.Jelleg = ’PK’
1. Az elszámolás előjelének (EloJelX) meghatározása
If PSzaAla.TipusK = ’1’ Then
Begin {Szállító}
If EgyenlegHuf > 0
Then EloJelX = ’1’ {Kerekítési nyereség}
Else EloJelX = ’2’ {Kerekítési veszteség}
End
Else
Begin {Vevő}
If EgyenlegHuf < 0
Then EloJelX = ’1’ {Kerekítési nyereség}
Else EloJelX = ’2’ {Kerekítési veszteség}
End
2. PSzaKie – Számla kiegyenlítés tábla
Insert
Alap adatok:
A1. SzKiID Szla kiegyenlítés ID pk f(BtoKod,KnyvEv)
A2. SzAlID Számla alap ID fk: PSzaAla.SzAlID
A3. KnyvEv Könyvelés éve <DatumX-ból>
A4. KnyvHo Könyvelés hónapja <DatumX-ból>
A5. TetSor Tétel sorszám
A6. BizAzo Számla bizonylatszám <PSzaAla.BizAzo>
A7. BizaSo Bizonylat sorszám f(BtoKod,KnyvEv)
A8. SzKiIDCs Számla kiegyenlítés ID – Csoportos 0
A9. SzKiIDEl Számla kiegyenlítés ID – Ellen 0
Input adatok:
I1. FimKod Fizetési mód fk: AFimTor.FimKod
<A:0> A kerekítési különbözet elszámolásának nincs egzakt fizetési módja.
I2. PeeKod Pénzeszköz kód – Pénzügyi rendezés fk: PPeeTor.PeeKod
A kiegyenlítés nyereség / veszteség pénzügyi eszköze.
If PSzaAla.TipusK = ’1’ Then
Begin {Szállító}
If EloJelX = ’1’
Then SAzoAda.PeeSzKerNy {Szállító kerekítés nyereség}
Else SAzoAda.PeeSzKerVe {Szállító kerekítés veszteség}
End
Else
Begin {Vevő}
If EloJelX = ’1’
Then SAzoAda.PeeVeKerNy {Vevő kerekítés nyereség}
Else SAzoAda.PeeVeKerVe {Vevő kerekítés veszteség}
End
I3. PeuKod Pénzügyi eszköz kód – Alap fk: PPeeTor.PeeKod
<A:PSzaAla.PeuKod>
I4. PeeJog Pénzeszköz mozgáskód fk: PPeJoDf.PeJoKd
A kerekítési különbözet elszámolásának mozgáskódja.
If PSzaAla.TipusK = ’1’ Then
Begin {Szállító}
If EloJelX = ’1’
Then SAzoAda.MozSzKerNy {Szállító kerekítés nyereség}
Else SAzoAda.MozSzKerVe {Szállító kerekítés veszteség}
End
Else
Begin {Vevő}
If EloJelX = ’1’
Then SAzoAda.MozVeKerNy {Vevő kerekítés nyereség}
Else SAzoAda.MozVeKerVe {Vevő kerekítés veszteség}
End
I5. BToKod Bizonylat tömb <BtoKodX> fk: KBToTor.BtoKod
I6. DevKod Devizanem kód <PSzaAla.DevKod> fk: ADevTor.DevKod
I7. MegJeg Megjegyzés Automatikus kerekítési különbözet elszámolás
I8. MellDb Mellékletek száma <0>
I9. Bizony Bizonylatszám <0>
I10. KonDat Könyvelés dátum <DatumX>
I11. ErtDat Értéknap dátum <DatumX>
A program felajánlja a könyvelés dátumát, amely felülírható.
Deviza adatok:
D1. DevBan Deviza átszámít bank <PSzaAla.DevBan> fk: PBanAzo.BanAzo
D2. DevDat Deviza átszámít dátum <PSzaAla.DevDat>
D3. DevArf Deviza átszámít árf. <PSzaAla.DevArf>
Érték adatok:
É1. JovDev Jóváírás összege DEV <Abs(EgyenlegDev)>
É2. TerDev Terhelés összege DEV <0>
É3. EveDev Értékvesztés összege DEV <0>
É4. EheDev Értékhelyesbítés DEV <0>
É5. EgyDev Egyéb adat DEV <0>
Számított adatok:
S1. JovHuf Jóváírás összege HUF <Abs(EgyenlegHuf)>
S2. TerHuf Terhelés összege HUF <0>
S3. EveHuf Értékvesztés összege HUF <0>
S4. EheHuf Értékhelyesbítés HUF <0>
S5. EgyHuf Egyéb adat HUF <0>
If PpeJoDf(PSzaKie.PeeJog).Jelleg=’1’ Or Jelleg=’2’ Then
Begin
If PSzaAla.TipusK=1 Then {Szállító}
Begin
If PPeJoDf(PSzaKie.PeeJog}.KonTip=’451’ Then {Nyereség}
Begin
S7. KieDev Kiegyenlítés összege DEV =JovDev – TerDev
S6. KieHuf Kiegyenlítés összege HUF =JovHuf – TerHuf
End
Else {Veszteség és egyéb kiegyenlítés}
Begin
S7. KieDev Kiegyenlítés összege DEV =TerDev – JovDev
S6. KieHuf Kiegyenlítés összege HUF =TerHuf – JovHuf
End
End
Else {Vevő}
Begin
If PPeJoDf(PSzaKie.PeeJog}.KonTip=’451’ Then {Nyereség}
Begin
S7. KieDev Kiegyenlítés összege DEV =TerDev – JovDev
S6. KieHuf Kiegyenlítés összege HUF =TerHuf – JovHuf
End
Else {Veszteség és egyéb kiegyenlítés}
Begin
S7. KieDev Kiegyenlítés összege DEV =JovDev – TerDev
S6. KieHuf Kiegyenlítés összege HUF =JovHuf – TerHuf
End
End
End
Else
Begin
S7. KieDev Kiegyenlítés összege DEV = 0
S6. KieHuf Kiegyenlítés összege HUF = 0
End
Állapot adatok:
Á1. PenAll Pénzügyi állapot ARK <0>
Á2. FokAll Főkönyvi állapot FAL <0>
Á3. StoKod Stornó állapot: STO <0>
Á4. MozElj Mozgás előjel <1>
Á5. StornA Stornózott tétel azonosítója – Forrás <0>
Á6. StornB Stornó tétel azonosítója – Cél <0>
Á7. SzNyDb Nyomtatott bizonylat példányszáma <0>
Számviteli adatok:
F1. ProKod Project <0>
F2. SzeKod Szervezeti egység <0>
F3. DolKod Dolgozó <0>
F4. FokKod Főkönyvi számla <X>
F5. KtgSzl Költség főkszla <X>
F6. KtgJel Költség jelleg FKT <0>
F7. KtgTip Költség típus FTP <0>
F8. AktKod Áru katalógus <0>
F9. AruKod Áru kód <0>
F10. ParKod Partner <0>
F11. SzlJel Számla jelleg FSJ <0>
F12. TevKod Tevékenység kód <0>
Napló adatok:
N1. Opekod Rögzítés napló adatok – Operátor kód
N2. Terkod Terminál kód
N3. Rogdat Rögzítés időpontja
3. A kiegyenlítés hatásának átvezetése a kapcsolódó táblákon:
3.1. PSzaAla – Számla alap tábla
Modify
3.2. PPeeTor – Pénzeszköz alap tábla – Pénzeszköz: PSzaKie.PeeKod
Modify
3.3. PPeeTor – Pénzeszköz alap tábla – Pénzügyi eszköz: PSzaKie.PeUKod
Modify