romfast/comun
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Verificare ANAF si la caut_partener: achizitie import, finalizare NIR, furnizor pe rulaj

Browse Source 
caut_partener primeste tlVerificaANAF/tdDataDoc (acelasi bloc ca la caut_parteneri) si citeste
tip_persoana din vnom_parteneri, ca banda de stare sa distinga CNP de CIF, nu dupa lungimea codului.

Apelanti pe documente: factura si partenerul DVI din achizitia de import (data din formular,
dDataAct), furnizorul de la finalizarea NIR-ului (data cade pe poAct.dataact) si schimbarea
furnizorului pe rulaj.

verific_partener si verificare_note_contabile (ooperatii_comune.prg) cer verificarea si cand
completeaza partenerul lipsa pe cont, la salvarea documentului.

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01RYbiinqXxdEqXi53x4Ro7K
This commit is contained in:
Marius Mutu
2026-08-02 10:09:12 +03:00
parent 7abec07549
commit 521993bf85
4 changed files with 31 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
clase/rulaje.vc2
View File

@@ -5018,7 +5018,7 @@ DEFINE CLASS frm_rulaje AS _frmbase OF "_frm_base.vcx"
ENDPROC
PROCEDURE pgframe.Page2.but_modifica_furnizor.Click
loCaut = caut_partener()
loCaut = caut_partener(,,,, .T., Thisform.dataact)
IF TYPE('loCaut') = 'O' AND !ISNULL(loCaut)
thisform.partener = ALLTRIM(loCaut.denumire)
thisform.id_partener = loCaut.id_part