Extras de cont in valuta
Posted: 02 Feb 2015, 14:32
Dupa o idee de Koreh Laszlo.
Se poate aplica in cazuri simple: un Client are facturi intr-o valuta si toate sunt in acceasi bd si pe acelasi cod client.
Implementare
Se defineste operatia si procedura de mai jos in Extras client.
Operare:
Se executa Extragerea in Fise client pe valuta (V )
Se executa operatia de pregatire definita.
Se executa Preluare fise.
Se sterge Fisa client sau se extrage altcvea, operatia de pregatire face prelucrari in Fise prin care devine incooerenta.
Observatii:
Dupa operatia de pregatire din Extras clienti, Fisa clienti nu mai este utilizabila, trebuie stearsa.
Extrasul este in lb.romana, dar de la V8.0 cu Alt V sau vizualizare se poate prelua intr-un editor extern macar tabelul.
Se pot defini operatii pentru mai multe valute si se executa operatiile pe rand pentru fiecare valuta.
Se poate defini similar si pentru Extras furnizori.
Se poate aplica in cazuri simple: un Client are facturi intr-o valuta si toate sunt in acceasi bd si pe acelasi cod client.
Implementare
Se defineste operatia si procedura de mai jos in Extras client.
Operare:
Se executa Extragerea in Fise client pe valuta (V )
Se executa operatia de pregatire definita.
Se executa Preluare fise.
Se sterge Fisa client sau se extrage altcvea, operatia de pregatire face prelucrari in Fise prin care devine incooerenta.
Code: Select all
Operatie de pregatire preluare in Extras clienti
Formule
-fisier : _(X_1:="EUR",gcmd_Exec("C1VAL"))
gcmd: C1VAL
h_UseAlias ("facf")
DBGOTOP()
#WHILE !EOF()
facf->FILTRU := SUBSTR(facf->FILTRU,1,46)+"L"+SUBSTR(facf->FILTRU,48)
#IF facf->MONEDA=X_1
facf->VALFAC := facf->DOLFAC
facf->VALPLA := facf->VALPLA
#ELSE
facf->VALFAC := 0
facf->VALPLA := 0
#ENDIF
DBSKIP()
#ENDDO
h_CloseAlias("facf")
Dupa operatia de pregatire din Extras clienti, Fisa clienti nu mai este utilizabila, trebuie stearsa.
Extrasul este in lb.romana, dar de la V8.0 cu Alt V sau vizualizare se poate prelua intr-un editor extern macar tabelul.
Se pot defini operatii pentru mai multe valute si se executa operatiile pe rand pentru fiecare valuta.
Se poate defini similar si pentru Extras furnizori.