Navigation:  Tartalom > Készlet modul > Készletmozgások rögzítése > Egyéb készletnyilvántartási funkciók > Áru értékadatok átértékelése

 

A program funkció az árutörzs értékadatainak átértékelésére szolgál. Az átértékelés azt jelenti, hogy az árutörzs egy kiválasztott egységár mezojét egy megadott szorzószámmal felszorozzuk, egy kiválasztott kerekítési szabályrend szerint kerekítjük, majd az új értéket visszaírjuk (Update) a kiválasztott mezobe.

 

Jogosultságkód:        232246                        Help context:        232246

 

 

1. Előtétszűrés

Az árutörzs kód jellegű adatmezői alapján kiválasztjuk azokat az áru tételeket amelyeknek valamelyik egységárát fel akarjuk szorozni. Az átértékelés előtétszűrési feltételei ugyanazok, mint az árutörzs karbantartásáé.

 

Tábla:        AAruTor        Árutörzs

 

F1.        AruKod                Kód                                        pk

F2.        AruNev                Megnevezés

F3.        AruLei                Leírás

F4.        AruNevA        Megnevezés – angol

 

A1.        EloKod                Élőkód                                        (I/N)        <Élő>

A2.        ABeKod        Áru besorolás kód                        fk: AAbeTor.AbeKod

A3.        ABeSza        Áru besorolás száma

A4.        AKtKod        Áru katalógus kód                        fk: AAKtTor.AKtKod

A5.        CikSza                Cikkszám

A6.        EanSza                EAN-szám ( vonalkód )

A7.        MeeKod        Mennyiség egység                        fk: AMeeTor.MeeKod

A8.        AfaKod                ÁFA-kód                                fk: AAfaTor.AfaKod

 

 

É1.        DevKod        Devizanem                                fk: ADevTor.DevKod

É2.        ArTipu                Ár típus                                        ATP

É3.        ArAfaMod        Ár áfa nyilvántartási mód                NBT

É4.        FelvAr                Vásárlási egységár

É5.        EladAr                Értékesítési egységár

É6.        ListAr                Kedvezményes ár

É7.        ErtNel                Érték nélküliség                                (I/N)        <Mind>

É8.        NyilAr                Nyilvántartási egységár

É9.        EarRes                Árrés

 

K1.        AbcKod                ABC analízis kód

K6.        Relaci                Reláció                                REL

K7.        ParKod                Kapcsolt partner                        fk: AParTor.ParKod

 

T1.        TerKot                Termékdíj köteles áru                        (I/N)        <Mind>

T3.        CsoBes                Csomagolás besorolás kód                CSB

T4.        UjCsom        Csomagolás újdonság kód                CSU

T5.        CsAnBe        Csomagolás anyag beépülés                CSA

 

S2.        Onktg                Önköltség

S3.        ErtVes                Értékvesztés (egységár)

S4.        UtoKal                Utókalkulációs számítás elvégezve        (I/N)        <Mind>

S5.        KalAter                Utókalkulációs átértékelés elvégezve        (I/N)        <Mind>

S6.        KalSzu                Utókalkulációs szükségessége                (I/N)        <Mind>

 

K1.        StyleNo                Stílus szám

K3.        ColorID                Szín azonosító

K4.        SizeID                Méret azonosító

K5.        AgeGenId        Kor – nem azonosító

K6.        SeasonY        Szezon azonosító

K9.        SeasonC        Szezon kód

 

K1.        ArResKep        Árrés képzés                                (I/N)        <Mind>

 

N1.        Opekod                Rögzítés napló adatok

N2.        Terkod                Terminál kód

N3.        Rogdat                Rögzítés időpontja

 

Tábla:        AAktTor        Árukatalógus törzs

AAruTor.AktKod = AAktTor.AktKod

 

A3.        GonKod        Göngyöleg kód                                (I/N)        <Mind>

A4.        TovSzol        Továbbszámlázott szolgáltatás                (I/N)        <Mind>

A6.        AruTip                Áru típus                                ART

A7        EszKod                Eszköz kód                                ESK

 

S1.        SFokKod        Anyagszámla                                fk: FFokTor.FokKod

V1.        VFokKod        Árbevétel főkönyvi számla                fk: FFokTor.FokKod

V2.        VRafSzl        Ráfordítás számla                        fk: FFokTor.FokKod

K1.        FKtgNem        Költségnem szla                        fk: FFokTor.FokKod

 

 

2. Az átértékeléshez szükséges input adatok megadása

 

2.1. Az átértékelési módszer (az átértékelendő mező) kiválasztása:

MezTipX                                                                MezErtX

 

1.        Vásárlási egységár felszorzás                                        FelvAr

2.        Értékesítési egységár felszorzás                                        EladAr

3.        Kedvezményes ár felszorzás                                        ListAr

4.        Nyilvántartási egységár felszorzás                                NyilAr

5.        Akciók törlése                                                        ListAr := EladAr

6.        Eladási ár képzés árrés alapján                                        EladAr

7.        Kedvezményes ár képzés árrés alapján                                ListAr

8.        Akciós időintervallum rögzítése                                        AkcArKez, AkcArBef

9.        Akciós időintervallum rögzítése                                        AkcArKez, AkcArBef null

 

2.2. Az akciós ár időintervallumának megadása:        KezDatX – BefDatX

Csak kedvezményes ár (MezTipX=3) felszorzás illetve akciós időintervallum rögzítés (MezTipX=8) választásakor szükséges.

 

2.3. Átértékelési szorzó megadása:                AtErtSzorX        float        5D

Azt szorzó számot kell beírni, amellyel meg akarjuk szorozni a régi árat az új előállításához.

Pl: 1.2        20 % -os növelés

MezTipX = 1 – 4 esetén kell megadni.

 

2.4. Kerekítési szabályrend kiválasztása                PKerSzaF/T

A kerekítés szabályrend törzsből kiválasztjuk azt, amelyik szabályai szerint kerekíteni akarjuk a felszorzott egységárat. A kiválasztott fej értékhatár tételeit felolvassuk az adatbázisból

MezTipX <> 5 esetén kell megadni.

 

 

3, Az átértékelés elvégzése a szűrt adathalmazon

Az átértékelés elvégzése a szűrési feltételeknek megfelelő áru tételeken egyetlen tranzakció.

 

3.1. Számítás:

MezErtX := f(AAruTor,MezTipX)

Case MezTipX Of

1:        FelvAr := FelvAr * AtErtSzorX

2:        EladAr := EladAr * AtErtSzorX

3:        ListAr := ListAr * AtErtSzorX

4:        NyilAr := NyilAr * AtErtSzorX

5:        ListAr := EladAr

6:        EladAr := NyilAr * ( 1 + AAktTor(AAruTor.AktKod).ArResEla / 100 )

7:        ListAr := NyilAr * ( 1 + AAktTor(AAruTor.AktKod).ArResKed / 100 )

8:        AkcArKez := KezDatX, AkcArBef := BefDatX

9:        AkcArKez := Null, AkcArBef := Null

Else End;

 

3.2. Kerekítés:

MezTipX In [1,2,3,4,6,7] esetén kell elvégezni!

Megkeressük, hogy melyik az a legnagyobb kerekítési értékhatárú tétel, amelyiknél nem nagyobb a már felszorzott érték:

MezErtY <= PKerSzaT.KerHat

 

A kerekítési tétel kerekítési szabálya szerint kerekítjük a felszorzott értéket.

Pl:        PKerSzaT.KerSza = -2        -> MezErtW := Round(MezErtY,2)

Pl:        PKerSzaT.KerSza = +3        -> MezErtW := 1 000 * Round(MezErtY/1 000,0)

 

3.3. Árutörzs UpDate

AAruTor.MezErtX := MezErtW

Napló adatok (OpeKod,TerKod,RogDat) UpDate

Case MezTipX Of

3,8:Begin

AAruTor.AkcArKez := KezDatX

AAruTor.AkcArBef := BefDatX

End

5,9:Begin

AAruTor.AkcArKez := Nil

AAruTor.AkcArBef := Nil

End

End Else;