Forum HAMOR Soft

Posted: **28 Dec 2015, 13:55**

Modificari hMARFT in upgrade hMARFA V8.6 varianta 8.6A2
=================================================

a.- Modif.nom. articole

Operatia 04 "Traduce TipTVA AS, AR X,A,B" modifica pretul de vanzare (cu TVA) in functie de noua cota, pastrand pretul de livrare (fara TVA) initial, lucru valabil, in general, la comertul cu ridicata.
Daca se doreste pastrarea pretului de vanzare initial si recalcularea pretului de livrare (fara TVA), sunt 3 variante:

a1. prin modif. selectiva preturi,
cu F10 si operatia 31 "Modificare sel. pret vanz->liv"

a2. modificarea operatiei 04 Traduce TipTVA ... astfel:

Code: Select all

      Formule
      -fisier : gcmd_Exec("N1_E2")
      -articol: N1B4:=N1A4
                N1B3:=ROUND(N1B4*100/(100+N1B2),2)
                N1C4:=" "
                N1C3:=IF(N1A3=N1B3," ","D")
      -fisier :

iar eventualele modificari selective a pretului de vanzare se fac cu F10 si operatia 32 "Modificare sel. pret liv->vanz"
Operatia 32 :

Code: Select all

    Denumire: Modificare sel. pret liv->vanz
    Explic. : Pretul de livrare ramane cel initial                                                                 
              din care se calculeaza pretul de vanzare                                                             
              pe baza cotei TVA noua
              Se va executa pentru toate articolele selectate !                                                    
    Formule 
    -articol: _(N1C3:=" ",N1B3:=N1A3,N1B4:=ROUND(N1A3*(100+N1B2)/100,2),N1C4:=IF(N1A4=N1B4," ","D"))                           
              X_1:={||n1->SN1C3:=" ",n1->SN1B3:=n1->SN1A3,n1->SN1B4:=ROUND(n1->SN1A3*(100+n1->SN1B2)/100,2),n1->SN1C4:=IF(n1->SN1A4=n1->SN1B4," ","D")}
              gcmd_Exec("N1_SEL")

a3. modif. individuala preturi (Modificare ...)

b.- Modif.PU/MA cant-val

Operatia 06 "Centralizare, recalcul pu vanz" modifica pretul de vanzare (cu TVA) in functie de noua cota, pastrand pretul de livrare (fara TVA) initial.
Daca se doreste pastrarea pretului de vanzare initial si recalcularea pretului de livare (fara TVA), sunt 3 variante:

b1. modificarea operatiei 06 "Centralizare, recalcul pu vanz" astfel:

Code: Select all

      Denumire: Centralizare, recalcul pu liv
      Formule
      -fisier : OpExport(,"10")
      -articol: _(S3V11:=ROUND(S3V12/S3Q1,2),S3V21:=ROUND(S3V22/S3Q1,2),S3V24:=ROUND(S3V25/S3Q1,2))
                _(S3V13:=S3V12-ROUND(S3Q1*S3V11,2),S3V20:=ROUND((S3V21-S3V11)/S3V11*100,2))
                _(S3V34:=S3V24,art_recalcul())
                S3ZZZZ:="3"
      -fisier :

b2. modif. selectiva preturi,
cu F10 si operatia 31 "Modificare sel. pret vanz->liv" sau operatia 32 "Modificare sel. pret liv->vanz"

Operatia 31 :

Code: Select all

    Denumire: Modificare sel. pret vanz->liv
    Operatii: A
    Explic. : Pretul de vanzare ramane cel initial                                                                 
              din care se calculeaza pretul de livrare                                                             
              pe baza cotei TVA noua
              Se va executa pentru toate articolele selectate !                                                    
    Formule 
    -articol: _(S3V34:=S3V24,S3V31:=S3V34*100/(100+S3A82),S3V30:=(S3V31-S3V11)*100/S3V11)
              X_1:={||s3->SS3V34:=s3->SS3V24,s3->SS3V31:=s3->SS3V34*100/(100+s3->SS3A82),s3->SS3V30:=(s3->SS3V31-s3->SS3V11)*100/s3->SS3V11}
              gcmd_Exec("S3_SEL")

Operatia 32 :

Code: Select all

    Denumire: Modificare sel. pret liv->vanz
    Operatii: A
    Explic. : Pretul de livrare ramane cel initial                                                                 
              din care se calculeaza pretul de vanzare                                                             
              pe baza cotei TVA noua
              Se va executa pentru toate articolele selectate !                                                    
    Formule 
    -articol: _(S3V31:=S3V21,S3V34:=ROUND(S3V21*(100+S3A82)/100,2),S3V30:=(S3V31-S3V11)*100/S3V11)
              X_1:={||s3->SS3V31:=s3->SS3V21,s3->SS3V34:=ROUND(s3->SS3V21*(100+s3->SS3A82)/100,2),s3->SS3V30:=(s3->SS3V31-s3->SS3V11)*100/s3->SS3V11}
              gcmd_Exec("S3_SEL")

Observatie: este nevoie si de scriptul S3_SEL - "Modif.selectiva" (din noul demo)

b3. modif. individuala preturi (Modif. / 05 Pret vanzare)

b. Observatie: S-a mai modificat al treilea rand din formulele de articol in operatiile:

- 07 [Modif.pret cf.Nomencl.hMARFA]

Code: Select all

            _(S3V31:=IF(X_1,nomm->PVIN,S3V31),S3V34:=IF(X_1,nomm->PVINA,...
            art_recalcul()
            S3V3C:=IF(X_1,"Nom-M",S3V3C)

- 08 [Modif.pret cf.Nomencl.hMARFT]

Code: Select all

            _(S3V31:=IF(X_1,ImpI("n1","S305","sn1b3"),S3V31),S3V34:=IF(X_1...
            art_recalcul()
            S3V3C:=IF(X_1,"Nom-T",S3V3C)

deci randul trei s-a schimbat in "art_recalcul()"