Program által előállított adatok:
PSzaKie
A mozgás elmentésekor a program a pénzügyi kiegyenlítési mozgás tábla hiányzó (nem input) mezőit az alábbi módon tölti ki.
Alap adatok:
A1. SzKiID Szla kiegyenlítés ID <BizaSo> pk
A2. SzAlID Számla alap ID 0
A3. KnyvEv Könyvelés éve <KonDat-ból>
A4. KnyvHo Könyvelés hónapja <KonDat-ból>
A5. TetSor Tétel sorszám 0
A6. BizAzo Számla bizonylatszám 0
A pénzügyi eszközön rögzített mozgás nem kapcsolódik pénzügyi bizonylathoz (számlához).
A7. BizaSo Bizonylat sorszám f(BtoKod,KnyvEv)
Input adatok:
I1. PeeKod Pénzeszköz kód <PPeeTor.PeeKod>
Az alap (elsődleges) pénzügyi eszköz kódja.
I6. DevKod Devizanem kód <PPeeTor.DevKod>
Számított adatok:
S1. JovHuf Jóváírás összege HUF JovDev *DevArf
S2. TerHuf Terhelés összege HUF TerDev *DevArf
S3. KieDev Kiegyenlítés összege DEV =Abs(JovDev-RenDev)
S4. KieHuf Kiegyenlítés összege HUF =Abs(JovHuf-RenHuf)
S6. EveHuf Értékvesztés összege HUF EveDev *DevArf
S8. EheHuf Értékhelyesbítés összege HUF EheDev *DevArf
S10. EgyHuf Egyéb adat HUF EgyDev *DevArf
Állapot adatok:
Á1. PenAll Pénzügyi állapot PAL <0>
Á2. FokAll Főkönyvi állapot FAL <0>
Á3. StoKod Stornó állapot: STO <0>
Á4. MozElj Mozgás előjel Ha StoKod=2 akkor –1 egyébként +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:
F8. AktKod Áru katalógus AruKod -> AAruTor.AktKod
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
PPeeTor – Pénzeszköz alap tábla – Pénzeszköz: PSzaKie.PeeKod
Modify
A mozgás könyvelésének hatását át kell vezetni annak a pénzeszköznek az értékadatain, amelyiken a mozgást rögzítettük.
Program által előállított adatok:
Érték adatok:
É5. JovHuf Jóváírás összege HUF <JovHuf=JovHuf+PSzaKie.JovHuf>
É6. TerHuf Terhelés összege HUF <TerHuf=TerHuf+PSzaKie.TerHuf>
If PSzaKie.DevKod=PPeeTor.DevKod Then
Begin
É2. JovDev Jóváírás összege DEV <JovDev=JovDev+PSzaKie.JovDev>
É3. TerDev Terhelés összege DEV <TerDev=TerDev+PSzaKie.TerDev>
End
Else
Begin
If PPeeTor.DevKod='HUF' Then
Begin
É2. JovDev Jóváírás összege DEV <JovDev=JovDev+PSzaKie.JovHuf>
É3. TerDev Terhelés összege DEV <TerDev=TerDev+PSzaKie.TerHuf>
End
Else
Begin
Message: A számla és a pénzeszköz devizaneme nem egyezik!
Abort
End
End
Ha mozgás rögzítésekor input adatként megadtunk másodlagos (input) pénzügyi eszközt is (PSzaKie.PeUKod<>0), akkor a mozgás könyvelésének hatását át kell vezetni az input pénzügyi eszköz értékadatain is..
If PSzaKie.PeUKod<>0 Then
Begin
EsFoJeE:=PPeeTor.EsFoJe(PeeKod)
EsFoJeU:=PPeeTor.EsFoJe(PeUKod)
PPeeTor – Pénzeszköz alap tábla – Pénzügyi eszköz: PSzaKie.PeUKod
Modify
Program által előállított adatok:
Érték adatok:
If EsFoJeE=EsFoJeU Then
Begin
É5. JovHuf Jóváírás összege HUF <JovHuf=JovHuf+PSzaKie.TerHuf>
É6. TerHuf Terhelés összege HUF <TerHuf=TerHuf+PSzaKie.JovHuf >
If PSzaKie.DevKod=PPeeTorU.DevKod Then
Begin
É2. JovDev Jóváírás összege DEV <JovDev=JovDev+PSzaKie.TerDev>
É3. TerDev Terhelés összege DEV <TerDev=TerDev+PSzaKie.JovDev>
End
Else
Begin
If PPeeTorU.DevKod='HUF' Then
Begin
É2. JovDev Jóváírás összege DEV <JovDev=JovDev+PSzaKie.TerHuf>
É3. TerDev Terhelés összege DEV <TerDev=TerDev+PSzaKie.JovHuf>
End
Else
Begin
Message: A számla és a pénzÜGYIeszköz devizaneme nem egyezik!
Abort
End
End
End
Else
Begin
É5. JovHuf Jóváírás összege HUF <JovHuf=JovHuf+PSzaKie.JovHuf>
É6. TerHuf Terhelés összege HUF <TerHuf=TerHuf+PSzaKie.TerHuf>
If PSzaKie.DevKod=PPeeTorU.DevKod Then
Begin
É2. JovDev Jóváírás összege DEV <JovDev=JovDev+PSzaKie.JovDev>
É3. TerDev Terhelés összege DEV <TerDev=TerDev+PSzaKie.TerDev>
End
Else
Begin
If PPeeTorU.DevKod='HUF' Then
Begin
É2. JovDev Jóváírás összege DEV <JovDev=JovDev+PSzaKie.JovHuf>
É3. TerDev Terhelés összege DEV <TerDev=TerDev+PSzaKie.TerHuf>
End
Else
Begin
Message: A számla és a pénzÜGYIeszköz devizaneme nem egyezik!
Abort
End
End
End
End Else
Napló adatok:
N1. Opekod Rögzítés napló adatok – Operátor kód generált
N2. Terkod Terminál kód generált
N3. Rogdat Rögzítés időpontja generált