achizitie import: TVA DVI cu valuta proprie, discount financiar, cote multiple

- TVA-ul de pe DVI poate avea valuta si curs proprii, diferite de ale facturii
  (rand "protejat": rand_dvi/valuta_proprie pe introdc, sparge_tva_protejat).
- Discount financiar pe factura: rand tip_rand='G' (401 = 767), TVA calculat pe
  baza diminuata, marfa si preturile articolelor pe valoarea integrala.
- Factura multi-cota: randurile S, G si T se sparg pe cotele articolelor, cu
  explicatia TVA din familia coloanei si alinierea T -> S.
- Teste noi in utile/Teste/achizitie_import (discount, DVI, cote, e2e).

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01U9uDgDfUQXbh2Neib36CN8

utile/Teste/vfp_ui_harness.ps1

@@ -130,17 +130,26 @@ function Take-Screenshot([IntPtr]$Hwnd, [string]$Path) {
     $bmp.Dispose()
 }
 
+# omoara doar vfp9 proprii (linia de comanda contine folderul testului), nu instante straine
+function Stop-VfpProprii([string]$Marker) {
+    Get-CimInstance Win32_Process -Filter "Name='vfp9.exe'" -ErrorAction SilentlyContinue | ForEach-Object {
+        if ($_.CommandLine -and $_.CommandLine.ToLower().Contains($Marker.ToLower())) {
+            Stop-Process -Id $_.ProcessId -Force -ErrorAction SilentlyContinue
+        }
+    }
+}
+
 Clear-Dir $SyncDir
 Clear-Dir $ShotsDir
 
 # 1) Precompilare izolata (proces copil complet, ca sa nu otraveasca sesiunea de lansare).
 #    -WindowStyle Hidden pe consola powershell copil (sigur - e consola, nu GUI VFP).
 Write-Host "Precompilez .fxp (izolat): $Precompile -Prg $TestPrg"
-Get-Process vfp9 -ErrorAction SilentlyContinue | Stop-Process -Force -ErrorAction SilentlyContinue
+Stop-VfpProprii $TestDir
 Start-Sleep -Milliseconds 500
 $pc = Start-Process powershell -WindowStyle Hidden -ArgumentList @('-ExecutionPolicy','Bypass','-File', "`"$Precompile`"", '-Prg', "`"$TestPrg`"") -Wait -PassThru
 Start-Sleep -Seconds 2
-Get-Process vfp9 -ErrorAction SilentlyContinue | Stop-Process -Force -ErrorAction SilentlyContinue
+Stop-VfpProprii $TestDir
 Start-Sleep -Seconds 2
 if (-not (Test-Path $TestFxp)) { Write-Warning "Nu s-a generat $TestFxp - compilare esuata." }
 
@@ -175,7 +184,7 @@ foreach ($try in 1..8) {
     if ($started) { break }
     Write-Warning "Incercarea ${try}: testul nu a scris START in 30s (instanta moarta); relansez."
     if ($proc -and -not $proc.HasExited) { try { $proc.Kill() } catch {} }
-    Get-Process vfp9 -ErrorAction SilentlyContinue | Stop-Process -Force -ErrorAction SilentlyContinue
+    Stop-VfpProprii $TestDir
     Start-Sleep -Milliseconds 1500
     $hwnd = [IntPtr]::Zero
 }
@@ -218,5 +227,5 @@ if ($ok) {
 }
 Start-Sleep -Milliseconds 800
 if ($proc -and -not $proc.HasExited) { try { $proc.Kill() } catch {} }
-Get-Process vfp9 -ErrorAction SilentlyContinue | Stop-Process -Force -ErrorAction SilentlyContinue
+Stop-VfpProprii $TestDir
 Write-Host "GATA. Screenshots in $ShotsDir"