diff --git a/Clase/ovanzcump.vc2 b/Clase/ovanzcump.vc2
index 1767c88..ee7228d 100644
--- a/Clase/ovanzcump.vc2
+++ b/Clase/ovanzcump.vc2
@@ -39279,7 +39279,7 @@ DEFINE CLASS frm_regcump2010 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		lcCodFiscal = Alltrim(actcv.cod_fiscal)
 		lcDenumire = Alltrim(actcv.denumire)
 		
-		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF')
+		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF; VERIFICA TOTI PARTENERII LA DATA FACTURII - ANAF')
 		
 		If EMPTY(m.lnOptiune)
 			Return
@@ -39306,12 +39306,22 @@ DEFINE CLASS frm_regcump2010 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		
 			lcFilter = Filter("actcv")
 			lcWhere = Iif(m.lnOptiune = 1, "recno() = " + Alltrim(Str(Recno())), Iif(!Empty(m.lcFilter), m.lcFilter, ".T."))
-			Select Distinct cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
-				From actcv ;
-				Where &lcWhere ;
-				Into Cursor crsCoduriFiscale ;
-				Order By denumire, cod_fiscal  ;
-				Readwrite
+			*!* 22.08.2026 marius.mutu: optiunea 3 verifica la data documentului - starea TVA se poate schimba in cursul lunii
+			If m.lnOptiune = 3
+				Select Distinct id_part, cod_fiscal, denumire, dataact As data, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Else
+				Select Distinct id_part, cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Endif
 		
 		
 			Local lcXMLParteneri
@@ -43835,7 +43845,7 @@ DEFINE CLASS frm_regcump2025 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		lcCodFiscal = Alltrim(actcv.cod_fiscal)
 		lcDenumire = Alltrim(actcv.denumire)
 		
-		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF')
+		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF; VERIFICA TOTI PARTENERII LA DATA FACTURII - ANAF')
 		
 		If EMPTY(m.lnOptiune)
 			Return
@@ -43862,12 +43872,22 @@ DEFINE CLASS frm_regcump2025 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		
 			lcFilter = Filter("actcv")
 			lcWhere = Iif(m.lnOptiune = 1, "recno() = " + Alltrim(Str(Recno())), Iif(!Empty(m.lcFilter), m.lcFilter, ".T."))
-			Select Distinct cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
-				From actcv ;
-				Where &lcWhere ;
-				Into Cursor crsCoduriFiscale ;
-				Order By denumire, cod_fiscal  ;
-				Readwrite
+			*!* 22.08.2026 marius.mutu: optiunea 3 verifica la data documentului - starea TVA se poate schimba in cursul lunii
+			If m.lnOptiune = 3
+				Select Distinct id_part, cod_fiscal, denumire, dataact As data, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Else
+				Select Distinct id_part, cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Endif
 		
 		
 			Local lcXMLParteneri
@@ -51028,7 +51048,7 @@ DEFINE CLASS frm_regvanz2010 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		lcDenumire = Alltrim(Nvl(actcv.denumire, ''))
 		lcCodFiscal = Alltrim(Nvl(actcv.cod_fiscal, ''))
 		
-		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF')
+		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF; VERIFICA TOTI PARTENERII LA DATA FACTURII - ANAF')
 		
 		If EMPTY(m.lnOptiune)
 			Return
@@ -51054,12 +51074,22 @@ DEFINE CLASS frm_regvanz2010 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		
 			lcFilter = Filter("actcv")
 			lcWhere = Iif(m.lnOptiune = 1, "recno() = " + Alltrim(Str(Recno())), Iif(!Empty(m.lcFilter), m.lcFilter, ".T."))
-			Select Distinct cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
-				From actcv ;
-				Where &lcWhere ;
-				Into Cursor crsCoduriFiscale ;
-				Order By denumire, cod_fiscal  ;
-				Readwrite
+			*!* 22.08.2026 marius.mutu: optiunea 3 verifica la data documentului - starea TVA se poate schimba in cursul lunii
+			If m.lnOptiune = 3
+				Select Distinct id_part, cod_fiscal, denumire, dataact As data, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Else
+				Select Distinct id_part, cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Endif
 		
 		
 			Local lcXMLParteneri
@@ -54697,7 +54727,7 @@ DEFINE CLASS frm_regvanz2025 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		lcDenumire = Alltrim(Nvl(actcv.denumire, ''))
 		lcCodFiscal = Alltrim(Nvl(actcv.cod_fiscal, ''))
 		
-		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF')
+		lnOptiune = XMENU('VERIFICA... ' + m.lcDenumire + ' - ANAF; VERIFICA TOTI PARTENERII - ANAF; VERIFICA TOTI PARTENERII LA DATA FACTURII - ANAF')
 		
 		If EMPTY(m.lnOptiune)
 			Return
@@ -54723,12 +54753,22 @@ DEFINE CLASS frm_regvanz2025 AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		
 			lcFilter = Filter("actcv")
 			lcWhere = Iif(m.lnOptiune = 1, "recno() = " + Alltrim(Str(Recno())), Iif(!Empty(m.lcFilter), m.lcFilter, ".T."))
-			Select Distinct cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
-				From actcv ;
-				Where &lcWhere ;
-				Into Cursor crsCoduriFiscale ;
-				Order By denumire, cod_fiscal  ;
-				Readwrite
+			*!* 22.08.2026 marius.mutu: optiunea 3 verifica la data documentului - starea TVA se poate schimba in cursul lunii
+			If m.lnOptiune = 3
+				Select Distinct id_part, cod_fiscal, denumire, dataact As data, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Else
+				Select Distinct id_part, cod_fiscal, denumire, Iif(Left(Upper(cod_fiscal), 2) = "RO", "RO", "  ") As ATRIBUT_FISCAL, .T. As IsCIF, .F. As codvalid ;
+					From actcv ;
+					Where &lcWhere ;
+					Into Cursor crsCoduriFiscale ;
+					Order By denumire, cod_fiscal  ;
+					Readwrite
+			Endif
 		
 		
 			Local lcXMLParteneri
diff --git a/changelog_roacont.txt b/changelog_roacont.txt
index cede123..ffd0626 100644
--- a/changelog_roacont.txt
+++ b/changelog_roacont.txt
@@ -1,4 +1,23 @@
 <!--
+22/08/2026
+ROACONT - 2.11.73
+
+:modificare:
+  Verificare coduri fiscale. Lista arata si perioadele de la ANAF (inregistrare in scopuri de TVA, TVA la incasare, inactivare),
+  iar dublu click pe denumire sau cod fiscal deschide partenerul.
+
+:modificare:
+  Verificare cod fiscal individuala. Mesajul cu rezultatul arata si perioadele de inregistrare in scopuri de TVA, TVA la incasare
+  si inactivare.
+
+:nou:
+  Jurnale de TVA. Optiune noua de verificare a codurilor fiscale la data facturii, pentru partenerii care isi
+  schimba starea TVA in cursul lunii.
+
+:eroare:
+  Verificare cod fiscal. Textul primit de la ANAF (starea partenerului, adresa, denumirea) se afisa cu caractere gresite.
+-->
+<!--
 20/08/2026
 ROACONT - 2.11.72