Marius Mutu
39c825c1f8
Rundele 1-7: golire campuri valuta la debifare in_valuta (cu suma_doc_val), recalcul din curs pe tot documentul (cu refacere suma_doc/suma_doc_val), spargere document principal in valuta (suma_val doar pe randuri in valuta), TVA repartizat din baza in valuta pe import, iar la recalculeaza()/procente per rand sumele in valuta ale documentelor participante aflate in alta valuta decat a principalei se convertesc prin lei (suma/curs principal), nu se mai aduna direct la baza in valuta (100 USD nu mai devine 100 EUR). Teste UI: test_valuta_dvi_usd (scenariu mixt EUR+USD, 8/8 PASS), test_debifare_invaluta (64/64 PASS), test_repro_valuta_dblclick, mock_caut_valuta; regresie test_scenariu_dvi_complet PASS. Co-Authored-By: Claude Fable 5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_01KXsyJZBek1e9RvyLAQkoCx
9 lines
470 B
Plaintext
9 lines
470 B
Plaintext
* mock_caut_valuta.prg - inlocuieste caut_valuta (ocautare.prg) fara UI/Oracle.
|
|
* Incarcat cu SET PROCEDURE ADDITIVE INAINTE de "ocautare" (castiga primul incarcat, capcana g).
|
|
* Obiectul de rezultat (PUBLIC goMockValuta) e construit INLINE in programul principal
|
|
* (capcana l: CREATEOBJECT/ADDPROPERTY nu merg corect apelate dintr-o procedura in acest runtime).
|
|
FUNCTION caut_valuta
|
|
LPARAMETERS tnPornire, tlDesktop, tlFaraMonedaNationala
|
|
RETURN goMockValuta
|
|
ENDFUNC
|