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

Verificare ANAF: o singura salvare in istoric si antete corecte pe formularele de verificare (SVN r17943)

Browse Source 
VERIFICARE_CIF salva a doua oara in istoric ceea ce traseul ANAF (SalveazaIstoricDinCursor) tocmai
salvase, cu alte valori pentru PLATITORTVAMFIN si DATATVAMFIN, deci o apasare pe verificarea ANAF
lasa doua randuri in ISTORIC_CODURI_FISCALE. Pe traseul ANAF a doua salvare nu se mai face; traseele
MFIN/VIES raman neschimbate. Partea de baza de date: co_2026_08_02_05_COMUN_PACK_ISTORIC_CF.sql (SVN r17942).

Formularul de verificare in masa foloseste azi numai serviciul web ANAF (chkANAF fortat pe .T. in
Init), deci antetele arata sursa corecta: "Platitor TVA ANAF", "Firma ANAF" si "Data verificata"
(coloana arata data pentru care s-a interogat, nu data luarii in evidenta TVA). In fereastra cu
istoricul unui cod fiscal, coloanele DATATVAMFIN si PLATITORTVAMFIN sunt ascunse - dupa modificarea
din pachet raman inghetate.

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_018LkXBVHUNkb7Quq36TfQcs
This commit is contained in:
Marius Mutu
2026-08-02 11:48:47 +03:00
parent f789ace574
commit 189e0a694e
2 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
clase/overificari.vc2
View File

@@ -2019,7 +2019,7 @@ DEFINE CLASS frm_verificare_parteneri AS _frmbase OF "_frm_base.vcx"
ADD OBJECT '_grdbase1.Column16.Header1' AS header WITH ;
Alignment = 2, ;
Caption = "Data TVA MFIN", ;
Caption = "Data verificata", ;
Name = "Header1", ;
WordWrap = .T.
*< END OBJECT: BaseClass="header" />
@@ -2045,7 +2045,7 @@ DEFINE CLASS frm_verificare_parteneri AS _frmbase OF "_frm_base.vcx"
ADD OBJECT '_grdbase1.Column17.Header1' AS header WITH ;
Alignment = 2, ;
Caption = "Platitor TVA MFIN", ;
Caption = "Platitor TVA ANAF", ;
Name = "Header1", ;
WordWrap = .T.
*< END OBJECT: BaseClass="header" />
@@ -2239,7 +2239,7 @@ DEFINE CLASS frm_verificare_parteneri AS _frmbase OF "_frm_base.vcx"
ADD OBJECT '_grdbase1.Column5.Header1' AS header WITH ;
Alignment = 2, ;
Caption = "Firma MFIN", ;
Caption = "Firma ANAF", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
@@ -3183,12 +3183,14 @@ DEFINE CLASS frm_verificare_parteneri_istoric AS _frmbase OF "_frm_base.vcx"
Column10.ControlSource = "datatvamfin", ;
Column10.Name = "cDataTVAMfin", ;
Column10.ReadOnly = .T., ;
Column10.Visible = .F., ;
Column11.ColumnOrder = 4, ;
Column11.ControlSource = "platitortvamfin", ;
Column11.CurrentControl = "_checkbox1", ;
Column11.Name = "cPlatitorTVAMfin", ;
Column11.ReadOnly = .T., ;
Column11.Sparse = .F., ;
Column11.Visible = .F., ;
Column11.Width = 51, ;
Column12.ColumnOrder = 3, ;
Column12.ControlSource = "stare", ;