A vevői kereskedelmi rendelés adatokból a [Számla generálása] gomb megnyomásával az operátor által kijelölt rendelési tételekből, választás szerint új vevői kézi számlát generálhatunk, vagy egy meglévő számlához kapcsoljuk a létrehozott áru tételeket.

Az értékesítési bizonylat generálásához input adatok megadására van szükség.
I1. BToKodX Bizonylat tömb kód
KBtoTor.JogCim = ’VK’ – Vevő kézi számla
I2. TelDatX Teljesítés dátuma In [KezDatX,BefDatX]
A könyvelési nyitott időszakba kell esnie
A csatolandó számlák kiválasztásának feltételei:
1. A rendelési fej és a számla partnere megegyezik: KRenFej.ParKod = PSzaAla.ParKod
2. Vevő számla: PSzaAla.TipusK = ’2’
3. Gépi vagy kézi számla: PSzaAla.FormaK <> ’3’
4. Végszámla: PSzaAla.Jelleg = ’1’
5. Elfogadott státuszú számla: PSzaAla.Status = ’1’
6. A teljesítés dátuma a könyvelési nyitott intervallumba esik: PSzaAla.TelDat in [KezDatX,BefDatX]
7. A rendelés és a számla devizaneme megegyezik: KRenFej.DevKod = PSzaAla.DevKod
8. Nem stornó vagy stornózott számla: PSzaAla.StoKod = ’0’
9. Még nem kontírozott számla: PSzaAla.FokAll = ’0’
10. A számla még nincs kinyomtatva PSzaAla.SzNyDb = 0
A csatolandó számlák megjelenített adatai – PSzaAla :
A1. SzAlID Számla alap ID
I2. SzaSza Számlaszám
I16. TelDat Teljesítés dátuma
Á7. PenAll Pénzügyi állapot PPA
KKodTar.KodNev Pénzügyi állapot név
É8. DeNtto Számla nettó összege DEV
É9. DeAfaO ÁFA összeg DEV
É10. DeOssz Számla összesen DEV
N1. Opekod Rögzítés napló adatok – Operátor kód
N2. Terkod Rögzítés terminál kód
N3. Rogdat Rögzítés időpontja
F1. KRenFej.EloKod = ’I’ A fej élő
F2. KRenTet.EloKod = ’I’ Élő tétel
A bizonylatnak annyi tétele lesz, ahány élő tétele van a rendelési fejnek.
F3. KRenTet.PenAll = ’0’ Pénzügyi alap állapot
A rendelési tételből még nem készült számla tétel.
F4. KRenTet.VigIga = ’I’ Visszaigazolt rendelési tétel
F5. AAktTor.AruTip = ’2’ Szolgáltatás !!!
KRenTet.AruKodV -> AArutTor.AktKod ->
Csak szolgáltatás típusú árukódból készíthető számla! A termék típusú árukból előbb értékesítési bizonylatot kell készíteni, majd annak alapján állítható elő a vevőszámla.
Az operátor a rendelési tétel sorok elején található jelölőnégyzet kipipálásával, illetve a pipa eltávolításával eldöntheti, hogy melyik rendelési tételt kívánja szerepeltetni a számlán, illetve melyiket nem.
Egy szállítói kereskedelmi rendelésből egy szállítói kézi számla készíthető.
PSzaAla – Számla alap tábla
Insert
Alap adatok:
A1. SzAlID Számla alap ID
SzAlId = PTelAla.BtoKod+EloNull(PTelAla.TelDat.Ev,2)+’/’+EloNull(TetSor,5)
Pl: VKS-10/12345
A2. BizAzo Bizonylat azonosító SzAlId
A3. KnyvEv Könyvelés éve TelDat-ból
A4. KnyvHo Könyvelés hónapja TelDat-ból
A5. TipusK Számla típus: 2 – Vevő
A6. FormaK Számlaforma: 2 – Kézi számla
Számla tipizáló adatok:
T1. Relaci Számla reláció: KRenFej.Relaci
T2. Jelleg Számla jelleg: 1 – Végszámla
T3. Pozici Számla pozíció: 1 – Beérkezett
T4. Status Számla státusz: 1 – Elfogadott
T5. BerMod Számla beérkezési mód 0 – N/A
Input adatok:
I1. BToKod Bizonylat tömb BtoKodX
I2. SzaSza Számlaszám SzAlId
I3. Bizony Bizonylatszám KRenFej.Bizony
I4. ParKod Partner – Számla KRenFej.ParKod
X8. ReheKod Telephely kód KRenFej.TelKod
I23. ParKapID Partner kapcsolati ID KRenFej.ParKapId
I5. CimPar Partner – Címzett KRenFej.ParKod
I6. BanKod Bank kód AParBan.BanKod <- KRenFej.ParKod
I7. BanFol Bank folyószámla AParBan.BanFol <- AParBan.Priori.Min
I8. BanAls Bank alszámla AParBan.BanAls
I9. PeeKod Pénzeszköz kód <- KRenFej.FimKod
I10. PeuKod Pénzügyi eszköz kód <- AParTor.VevSzl
I11. FimKod Fizetési mód KRenFej.FimKod <- KRenFej.ParKod
I12. DevKod Deviza kód KRenFej.DevKod
I13. HivSza Hivatkozási szám KRenFej.BizAzo
I14. IktSza Iktatószám KRenFej BizAzo
I15. BeeDat Beérkezés dátuma TelDatX
I16. TelDat Teljesítés dátuma TelDatX
I17. SzmDat Számla kelte TelDatX
I18. FiHaSz Fizetési határidő – számlán TelDatX + AParTor(ParKod).FizHat
I19. FiHaEl Fizetési határidő – elfogadott TelDatX + AParTor(ParKod).FizHat
I20. AfaDat Áfa teljesítés dátuma TelDatX
I21. MegJeg Megjegyzés KRenFej.Megjeg
I22. BanMeg Megjegyzés – Banki nil
Számviteli adatok:
S1. ParSzl Partner főkönyvi számla száma AParTor.VevSzl <- KRenFej.ParKod !
S2. HelDat Helyesbítő számla teljesítés dátuma nil
S3. AfaLev Áfa levonható N
S4. AlaKod Áfa alany kód AParTor.AlaKod <- KRenFej.ParKod
S5. Kerekit Kerekítési nagyságrend ADevTor.Kerekit <- DevKod
S6. MinCim Minimális címlet ADevTor.MinCim <- DevKod
S7. SzNyFrm Nyomtatott számla formátuma AParTor.SzNyFrm<- KRenFej.ParKod
Deviza adatok – Számvitel:
D1. DevDat Deviza átszámítási dátum TelDatX
D2. DevBan Deviza átszámítási bank KAzoAda.PBanAzo
D3. DevArf Deviza átszámítási árfolyam
usunis.DevArf(DevKod,DevBan,DevDat,KA.ArfTipD)
D4. DevTel Deviza teljesítés dátum TelDatX
Deviza adatok – Áfa:
DA1. DevDatA Deviza átszámítási dátum TelDatX
DA2. DevBanA Deviza átszámítási bank SAzoAda(BanAzoA).Szoveg
DA3. DevArfA Deviza átszámítási árfolyam
usunis.DevArf(DevKod,DevBanA,DevDatA,SA.ArfTipA)
A számla devizanemében tárolt adatok:
É11. DeNtto Számla nettó összege DEV Sum(PSzaAru.TetErt)
É12. DeAfaO ÁFA összeg DEV Sum(PSzaAru.AfaErt)
É13. DeOssz Számla összesen DEV DeNtto + DeAfaO
É14. DeKiOs Kiegyenlítés összesen DEV 0
É15. EveDev Értékvesztés összege DEV 0
É16. EheDev Értékhelyesbítés összege DEV 0
É17. EgyDev Egyéb adat DEV 0
É18. KerDev Kerekítés DEV sp_SzlaFejErtekOsszesenek
Érték adatok:
É1. FtNtto Számla nettó összege HUF Round(DeNtto*DevArf,2)
É2. FtAfaO ÁFA összeg HUF Round(DeAfaO*DevArf,2)
É3. FtOssz Számla összesen HUF FtNtto + FtAfaO
É4. FtKiOs Kiegyenlítés összesen HUF 0
É5. EveHuf Értékvesztés összege HUF 0
É6. EheHuf Értékhelyesbítés összege HUF 0
É7. EgyHuf Egyéb adat HUF 0
É8. KerHuf Kerekítés HUF sp_SzlaFejErtekOsszesenek
Fordulónapi adatok:
F1. DevDatF Deviza átszámítási dátum null
F2. DevBanF Deviza átszámítási bank 0
F3. DevArfF Deviza átszámítási árfolyam 1
F4. MerDev Mérleg érték DEV 0
F5. MerHuf Mérleg érték HUF 0
Előlegszámla adatok:
V1. ElSzDb Előleg számlák darabszáma Vég 0
V2. ElNtto Számla nettó összege Vég 0
V3. ElAfaO ÁFA összeg Vég 0
V4. ElOssz Számla összesen Vég 0
E1. VegSza Végszámla száma Előleg ’0’
E2. ElNttoE Számla nettó összege Előleg 0
E3. ElAfaOE ÁFA összeg Előleg 0
E4. ElOsszE Számla összesen Előleg 0
Hitelkamat adminisztrációs adatok:
H1. HitKam Hitelkamat számítás módszere HKM N
H2. KamElo Kamatszámítási szempontból élő (I/N) N
H3. HiKaKu Hitelkamat kulcs [%] 0
H4. KaKeDat Kamatszámítás kezdő dátuma nil
H5. KaZaDat Kamatszámítás záró dátuma nil
Állapot adatok:
Á1. StoKod Stornó állapot: STO 0 – Alap
Á2. MozElj Mozgás előjel 1
Á3. StornA Stornózott számla száma – Forrás 0
Á4. StornB Stornó számla száma– Cél 0
Á5. SzNyDb Nyomtatott számla példányszáma 0
Á6. BizaDb Csatolt bizonylatok száma 0
Á7. PenAll Pénzügyi állapot PPA 0 – N/A
Á8. FokAll Főkönyvi állapot FAL 0 – Alap
Á9. Allapo Számla állapot PAL 1 – Elővezetett
Á10. ElSzAl Előleg számla állapot: ESA 0
Á11. UtaDol Utalványozó dolgozó KAzoAda.UtaDol
Á12. UtaAll Utalványozási állapot EAL 0
Á13. JovDol Jóváhagyó dolgozó KAzoAda.JovDol
Á14. JovAll Jóváhagyási állapot EAL 0
Á15. FoAfAl Folyamatos szolgáltatás áfa állapot 0 – N/A
Késedelmi kamat adatok
K1. KeskaA Késedelmi kamat számla – Forrás 0
K2. KeskaB Késedelmi kamat számla – Cél 0
K3. KesNap Késedelmi napok száma 0
K4. KesOsz fKésedelmi kamat összege 0
Átadás – Átvételi adatok
X1. Atvetel Átvétel megtörtént N
X2. AOpeKo Átvételi napló adatok – Operátor kód nil
X3. ATerKo Átvételi terminál kód nil
X4. ARogDa Átvételi időpontja nil
X5. ViszVet Visszavétel megtörtént N
X6. VOpeKo Visszavételi napló adatok – Operátor nil
X7. VTerKo Visszavételi terminál kód nil
X8. VRogDa Visszavétel időpont nil
Export számla adatok
X1. FupKod Fuvar paritás kód KRenFej.FupKod
X2. FupHel Fuvar paritás helye KRenFej.FupHel
X3. CiPaCi Címzett partner címke név – magyar nil
X4. CiPaCiA Címzett partner címke név – angol nil
X6. ReheCi Rendeltetési hely címke név – magyar nil
X7. ReheCiA Rendeltetési hely címke név – angol nil
X9. AruMeg Általános áru megnevezés – magyar nil
X10. AruMegA Általános áru megnevezés – angol nil
X11. SzeCi Szerződés címke név – magyar nil
X12. SzeCiA Szerződés címke név – angol nil
X13. SzeSza Szerződés szám nil
X14. SzeDat Szerződés dátuma nil
X15. MegCi Megrendelés címke név – magyar nil
X16. MegCiA Megrendelés címke név – angol nil
X17. MegSza Megrendelés szám nil
X18. MegDat Megrendelés dátuma nil
X19. FizHat Fizetési határidő – magyar nil
X20. FizHatA Fizetési határidő – angol nil
X21. SzaCi Szállító eszköz címke név – magyar nil
X22. SzaCiA Szállító eszköz címke név – angol nil
X23. SzaEsz Szállító eszköz azonosító nil
X24. EuAfaUgy EU áfa ügylet kód EAU 0
X25. KepPar Képviselő partner kód 0
X26. PenKepv Pénzügyi képviselői számla N
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
N4. UOpeKo Utalványozás napló adatok – Operátor kód nil
N5. UTerKo Utalványozás terminál kód nil
N6. URogDa Utalványozás időpontja nil
N7. JOpeKo Jóváhagyás napló adatok – Operátor kód nil
N8. JTerKo Jóváhagyás terminál kód nil
N9. JRogDa Jóváhagyás időpontja nil
Select *
From KRenMeg
Where BizAzo = p_BizAzo (KRenFej.BizAzo)
| and | SzlKell = ’I’ Csak azokat a megjegyzéseket kell átvenni, amelyek a számlán megjelenítendőek! |
Alap adatok:
A1. SzMeID Megjegyzés ID pk generált
A2. SzAlID Alap számla ID PSzaAla.SzAlID
A3. BizAzo Számla bizonylatazonosító PSzaAla.SzAlID
A4. Megjeg Megjegyzés KRenMeg.Megjel
A5. SzlKell Számlában megjelenítendő KRenMeg.SzlKell
A6. SzlFej Számla fejben megjelenítendő KRenMeg.SzlFej
Napló adatok:
N1. Opekod Rögzítés napló adatok – Operátor kód KRenMeg.OpeKod
N2. Terkod Terminál kód KRenMeg.TerKod
N3. Rogdat Rögzítés időpontja KRenMeg.RogDat
Egy rendelési tételből egy számla áru tétel keletkezik.
SzamlazandoI = Számlázandó mennyiség
If KRenTet.VigMen – SzamlazottX > 0 Then KRenTet.VigMen – Szamlazott Else 0
A visszaigazolt és a már kiszámlázott mennyiség pozitív különbözete lesz a számlázandó mennyiség.
Select psa.Arukod, Sum(psa.Mennyi) SzamlazottX
From PSzaAru psa, PSzaAla psz
Where psa.szalid=psz.szalid
and psa.Rensza = p_TetAzo (KRenTet.TetAzo)
and psz.TipusK = ’2’ Vevő számla
and psz.StoKod = ’0’
and psz.Status <= ’1’
EgysÁrI Input visszaigazolási egységár
KRenTet.VigEar A visszaigazolási ár lesz az ajánlott számla egységár.
A számla áru tétel létrehozásának további feltételei:
PSzaAru – Számla áru tábla
Insert
Alap adatok
A1. SzArID Számla áru ID SzAlID+’/’+EloNull(TetSor,4)
A2. SzAlID Számla alap ID PSzaAla.SzAlID
A3. BizAzo Számla bizonylatszám PSzaAla.SzAlID
A4. TetSor Tétel sorszám Inkrementális,
A5. RaMoID Raktári mozgás ID 0
A6. KaSzID Kamat számla ID 0
A7. KaKeDat Kamatszámítás kezdő dátuma nil
A8. KaZaDat Kamatszámítás záró dátuma nil
Input adatok
I1. AruTip Áru típus ART AAktTor.AruTip(AAruTor.AktKod(KRenTet.AruKodV))
I2. AruKod Áru kód KRenTet.AruKodV
I3. AruLei Áru leírás KRenTet.AruSpc
I4. AruMeg Áru megjegyzés KRenTet.IgeMeg
I5. AfaKod Áfa kód f(KRenTet.AruKodV -> AAruTor -> AAktTor) !!!
Case PSzaAla.Relaci When ’2’ {Külföldi} Then AAktTor.VAfaKodExp Else
Case PSzaAla.Relaci When ’3’ {EU} Then AAktTor.VAfaKodEu
{Belföldi} Else AAruTor.AfaKod
I6. AfaKul Áfa kulcs AAfaTor.AfaKul(PSzaAru.AfaKod)
I7. Mennyi Mennyiség SzamlazandoI Számlázandó input mennyiség
I8. MeeKod Mennyiség egység KRenTet.ViMeKd
I9. AtpKod Ártípus kód ATP KRenTet.AtpKod
I10. Egysar Egységár EgysÁrX Input visszaigazolási egységár
I11. TetErt Tétel érték, devizában Round(Mennyi * EgysAr, KerekX)
I12. AfaErt Tétel áfa érték Round(TetErt * AfaKul / 100, KerekX)
I13. TarSul Tára súly 0
I14. Mennyi2 Másodlagos mennyiség 0
I15. NyTilt Kedvezmény adatok nyomtatásának tiltása KRenTet.NyTilt
Állapot adatok
Á1. PenAll Pénzügyi állapot PPA 0 – N/A
Á2. FokAll Főkönyvi állapot FAL 0 – Alap
Á3. StoKod Stornó állapot: STO 0 – Alap
Á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. TaeAll Tárgyi eszköz állapot MAL 0 – N/A
Számviteli adatok – Szállító
S1. KonTip Kontírozás típusa SKT 0
S2. RenSza Rendelés szám KRenTet.TetAzo
S3. TaenAz Tárgyi eszköz 0
S4. ProKod Project KRenTet.ProKod
S5. SzeKod Szervezeti egység KRenFej.SzeKod
S6. DolKod Dolgozó 0
S7. MlpAzo Munkalap azonosító 0
S8. TevKod Tevékenység kód 0
S9. RakKod Raktár kód 0
S10. SFokKod Anyagszámla X
S11. SKtgNem Költségnem számla X
S12. SKtgHel Költséghely számla X
S13. SKtgJel Költség jelleg FKT 0
S14. SKtgTip Költség típus FTP 0
S15. SAfaSzl Szállító ÁFA főkönyvi számla X
S16. SAKdKod Szállító ÁFA kód 0
S17. SArkSzl Árkülönbözet számla X
S18. SEgySzl Egyéb számla X
Számviteli adatok – Vevő
V1. VFokKod Árbevétel főkönyvi számla AAktTor.X <- KRenTet.AruKodV
Az árbevétel főkönyvi számla a számla relációtól függ.
Case PSzaAla.Relaci When ’2’ {Külöldi} Then AAktTor.VFokKodX Else
Case PSzaAla.Relaci When ’3’ {EU} Then AAktTor.VFokKodU
{Belföldi} Else AAktTor.VFokKod
V2. VRafSzl Ráfordítás főkönyvi számla AAktTor.X <- KRenTet.AruKodV
A ráfordítás főkönyvi számla a számla relációtól függ.
Case PSzaAla.Relaci When ’2’ {Külöldi} Then AAktTor.VRafSzlX Else
Case PSzaAla.Relaci When ’3’ {EU} Then AAktTor.VRafSzlU
{Belföldi} Else AAktTor.VRafSzl
V3. VAfaSzl Vevő ÁFA főkönyvi számla AAktTor.VAfaSzl <- KRenTet.AruKodV
V4. VAKdKod Vevő ÁFA kód AAktTor.X <- KRenTet.AruKodV
A vevői áfa besorolás kód értéke a számla relációtól függ.
Case PSzaAla.Relaci When ’2’ {Külöldi} Then AAktTor.VAkdExp Else
Case PSzaAla.Relaci When ’3’ {EU} Then AAktTor.VAkdEu
{Belföldi} Else AAktTor.VAkdKod
V5. VElsSzl Elszámolási főkönyvi számla X
Számviteli adatok – Belső
B1. BFokKod Főkönyvi számla X
Kiegészítő adatok
K1. DevTet Devizás tétel KRenTet.DevTet
K2. DevKod Deviza kód KRenTet.DevKod
K3. EgysarD Egységár – Devizás KRenTet.IgeEarD
K4. DevArf Deviza átszámítási árfolyam KRenTet.DevArf
Áfa adminisztrációs adatok:
F1. KulAfa Különleges áfa adminisztráció AFA
If PSzaAla.Relaci = ’1’ And PSzaAla.DevKod <> KA.AlaDev Then <D> Else <0>
F2. AfaKodEU Adó áfa kód
If KulAfa <> ’0’ Then <AAruTor(PSzaAru.AruKod).AfaKod> Else <X>
F3. AfaKulEU Adó áfa kulcs AAfaTor(AfaKodEU).AfaKul
If KulAfa <> ’0’ Then
Begin
F4. AfaAlaEU Adó áfa alap Round(PSzaAla.DevArfA * PSzaAru.TetErt, KerekitH)
F5. AfaErtEU Adó áfa érték Round(PSzaAla.DevArfA * PSzaAru.AfaErt, KerekitH)
End
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
Select *
From KRenTetMeg
Where TetAzo = p_TetAzo (KRenTet.TetAzo)
| and | SzlKell = ’I’ Csak azokat a megjegyzéseket kell átvenni, amelyek a számlán megjelenítendőek! |
Alap adatok:
A1. SzMeID Megjegyzés ID pk generált
A2. SzArID Számla áru ID PSzaAru.SzArID
A3. Megjeg Megjegyzés KRenTetMeg.Megjeg
A4. SzlKell Számlában megjelenítendő KRenTetMeg.SzlKell
Napló adatok:
N1. Opekod Rögzítés napló adatok – Operátor kód KRenTetMeg.OpeKod
N2. Terkod Terminál kód KRenTetMeg.TerKod
N3. Rogdat Rögzítés időpontja KRenTetMeg.RogDat
Tábla: KRenTet
If SzamlazandoI + Szamlazott + 1E-4 > KRenTet.VigMen Then
Begin
Update KRenTet
Set PenAll = ’1’
Where TetAzo = p_TetAzo
End