Szállítói számla generlás (Szállító KerDev)

A szállító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 szállítói kézi számlát generálhatunk, vagy egy meglévő számlához kapcsoljuk a létrehozott áru tételeket.

Jogosultságkód: 222362

clip1391

Új számla készítéséhez szükséges input adatok

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 = ’SK’ – Szállító kézi számla

I2. TelDatX Teljesítés dátuma In [KezDatX,BefDatX]

A könyvelési nyitott időszakba kell esnie,

I3. DevArfAX Deviza árfolyam – áfa

If KRenFej.DevKod <> KA.AlaDev and KRenFej.Relaci = ’1’ Then Input Else 1

A rendelési tételek számlához csatolása

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. Szállítói számla: PSzaAla.TipusK = ’1’

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’

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

A bizonylat generálásának feltételei

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.VisIga = ’I’ Visszaigazolt rendelési tétel

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.

PSzaAla – Számla alap tábla adatainak előállítása

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: SKS-06/12345

A2. BizAzo Bizonylat azonosító SzAlId

A3. KnyvEv Könyvelés éve PTelAla.TelDat-ból

A4. KnyvHo Könyvelés hónapja PTelAla.TelDat-ból

A5. TipusK Számla típus: 1 – Szállító

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

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

I10. PeuKod Pénzügyi eszköz kód <- AParTor.SzaSzl

I11. FimKod Fizetési mód KRenFej.FimKod <- KRenFej.ParKod

I9. PeeKod Pénzeszköz kód <- KRenFej.FimKod

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

I19. FiHaEl Fizetési határidő – elfogadott TelDatX

I20. AfaDat Áfa teljesítés dátuma TelDatX

Számviteli adatok:

S1. ParSzl Partner főkönyvi számla száma AParTor.SzaSzl <- 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

If DevKod <> KA.AlaDev Then DevArf := PDevArf(f(DevKod,DevBan,DevDat,KA.ArfTipD))

Else 1

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 0

DA3. DevArfA Deviza átszámítási árfolyam DevArfAX

A számla devizanemében tárolt adatok:

É8. DeNtto Számla nettó összege DEV Sum(PSzaAru.TetErt)

É9. DeAfaO ÁFA összeg DEV Sum(PSzaAru.AfaErt)

É10. DeOssz Számla összesen DEV DeNtto + DeAfaO

É11. DeKiOs Kiegyenlítés összesen DEV 0

É12. EveDev Értékvesztés összege DEV 0

É13. EheDev Értékhelyesbítés összege DEV 0

É14. EgyDev Egyéb adat DEV 0

É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

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 nil

K2. KeskaB Késedelmi kamat számla – Cél nil

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 0

X2. FupHel Fuvar paritás helye nil

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

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

PSzaAru – Számla áru tábla adatainak előállítása

Egy rendelési tételből egy számla áru tétel keletkezik.

MennyiX = Bevételezendő mennyiség

If SA.SzaRenRakAtv = ’I’ Then IsNull(KRenTet.BeMeIn,0) Else

If KRenTet.VigMen – Bevételezett > 0 Then KRenTet.VigMen – Bevételezett Else 0

Amennyiben a vállalkozásnál a szállító által teljesített szállítói rendelést a raktár veszi át, és raktári átvevő írja be a beérkezett mennyiséget, akkor azt ajánlja be a program. Ellenkező esetben a visszaigazolt és a már beérkezett mennyiség pozitív különbözete lesz a számlázandó mennyiség.

ViszIgEgysÁrX Input visszaigazolási egységár

SA.SzaRenRakAtv = ’I’ Then IsNull(KRenTet.BeEgAr,0)

Else KRenTet.VigEar

Amennyiben a vállalkozásnál a szállító által teljesített szállítói rendelést a raktár veszi át, akkor az átvétel során inputként megadott bevételezési egységárat ajánlja be a program. Ellenkező esetben a visszaigazolási ár lesz az ajánlott számla egységár.

A számla áru tétel létrehozásának feltételei:

KRenFej.Elokod = ’I’ Élő rendelés fej
KRenTet.Elokod = ’I’ Élő rendelési tétel
KRenTet.PenAll = ’0’ A rendelésből még nem készült számla
{KRenTet.VigIga = ’I’ Visszaigazolt rendelési tétel Már nem használt!}
MennyiX > 0 Van bevételezendő mennyiség

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, számlánként 1-től indul.

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 AAruTor.AruLei(KRenTet.AruKodV)

I4. AruMeg Áru megjegyzés AAruTor.AruMeg(KRenTet.AruKodV)

I5. AfaKod Áfa kód f(KRenTet.AruKodV -> AAruTor -> AAktTor) !!!

Case PSzaAla.Relaci When ’2’ {Külöldi} Then <AAktTor.SAfaKodImp> Else

Case PSzaAla.Relaci When ’3’ {EU} Then <AAktTor.SAfaKodEu>

{Belföldi} Else If AAktTor.SFordAdo = ’I’ Then <AAktTor.SAfaKodFord>

Else <AAruTor.AfaKod>

I6. AfaKul Áfa kulcs AAfaTor.AfaKul(PSzaAru.AfaKod)

I7. Mennyi Mennyiség MennyiX Bevételezendő mennyiség

I8. MeeKod Mennyiség egység KRenTet.ViMeKd

I9. AtpKod Ártípus kód ATP KRenTet.AtpKod

I10. Egysar Egységár ViszIgEgysÁ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

Á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. SFokKod Anyagszámla AAktTor.SFokKod <- KRenTet.AruKodV

S10. SKtgNem Költségnem számla X

S11. SKtgHel Költséghely számla X

S12. SKtgJel Költség jelleg FKT 0

S13. SKtgTip Költség típus FTP 0

S14. SAfaSzl Szállító ÁFA főkönyvi számla AAktTor.SAfaSzl <- KRenTet.AruKodV

S15. SAKdKod Szállító ÁFA kód AAktTor.X <- KRenTet.AruKodV !

A szállítói áfa besorolás kód értéke a számla relációtól és az áfa kód költség áfa mivoltától függ.

If AAfaTor(PSzaAru.AfaKod).KtgAfa=’I’ Then <0> Else

Case PSzaAla.Relaci When ’2’ {Külöldi} Then <AAktTor.SAkdImpLe> Else

Case PSzaAla.Relaci When ’3’ {EU} Then <AAktTor.SAkdEuLe>

{Belföldi} Else <AAktTor.SAkdKod>

S16. SArkSzl Árkülönbözet számla AAktTor.SArkSzl <- KRenTet.AruKodV

S17. SEgySzl Egyéb számla X

Számviteli adatok – Belső

B1. BFokKod Főkönyvi számla X

Kiegészítő adatok

K3. DevTet Devizás tétel N

K4. DevKod Deviza kód AAruTor.DevKod <- KRenTet.AruKodV

K5. EgysarD Egységár – Devizás 0

K6. DevArf Deviza átszámítási árfolyam 1

Áfa adminisztrációs adatok:

F1. KulAfa Különleges áfa adminisztráció AFA !!!

If PSzaAla.Relaci = ’1’ And PSzaAla.DevKod <> KA.AlaDev Then

Begin

If AAktTor(PSzaAru.AruKod).SFordAdo = ’N’ Then <D> Else <E>

Belföldi devizás számlák (szállító és vevő) esetében a termék fordított adózásának függvényében a különleges áfa adminisztrációs kód értéke D (Devizás áfa adminisztráció), vagy E (Fordított devizás áfa adminisztráció) lesz.

End;

If PSzaAla.Relaci = ’1’ And PSzaAla.DevKod = KA.AlaDev And PSzaAla.TipusK = ’1’

And AAktTor(PSzaAru.AruKod).SFordAdo = ’I’ Then <F>

Belföldi, nem devizás, szállítói számlák fordított adózású termék tételénél a különleges áfa kód F (Fordított áfa adminisztráció) lesz.

If PSzaAla.Relaci = ’3’ And PSzaAla.TipusK = ’1’

And AAktTor(PSzaAru.AruKod).EszKod In (’2’,’3’,’4’,’5’) Then <E>

EU-ból történő termékbeszerzés esetén a különleges áfa kód E (Fordított devizás áfa adminisztráció) lesz.

F2. AfaKodEU Adó áfa kód

If KulAfa <> ’0’ Then <AAruTor(PSzaAru.AruKod).AfaKod> Else <X>

F3. AfaKulEU Adó áfa kulcs AAfaTor(AfaKodEU).AfaKul

F4. AfaAlaEU Adó áfa alap 0

F5. AfaErtEU Adó áfa érték 0

Számviteli adatok – Vevő

V1. VFokKod Árbevétel főkönyvi számla X

V2. VRafSzl Ráfordítás főkönyvi számla X

V5. VElsSzl Elszámolási főkönyvi számla X

If (PSzaAla.TipusK = ’1’) And (KulAfa in [’E’,’F’]) Then

Begin

V3. VAfaSzl Vevő ÁFA főkönyvi számla

<AAktTor.VAfaSzl> Áru katalógus – Értékesítési adatok – Áfa számla

V4. VAKdKod Vevő ÁFA kód 0

Áru katalógus –Áfa besorolás adatok. Az áfa besorolás kód a számla relációjától függ !!!

Case PSzaAla.Relaci When ’2’ {Külöldi} Then <A:AAktTor.SAkdImpFi> Else

Case PSzaAla.Relaci When ’3’ {EU} Then <A:AAktTor.SAkdEuFi>

{Belföldi} Else <A:AAktTor.SAkdKodFi>

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

Rendelési tétel adatok módosítása

Tábla: KRenTet

Modify

KRenTet.PenAll = ’1’