CLAUDE.md: cautare pe simboluri VFP (vfp_symbols.ps1)

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01A5okKjUKMM5Xk1egq2w81P

.gitignore

@@ -103,3 +103,4 @@ docs/local/
 
 # --- COMUN este gestionat separat, prin propriul sau git (romfast/comun.git) ---
 COMUN/
+docs/diff_runda*.patch

CLAUDE.md

@@ -20,6 +20,19 @@ Git rulează în paralel cu SVN-ul legacy, nu îl înlocuiește. SVN rămâne su
 
 - Eșec cunoscut `git_sync`: `Clase\registry.vcx` (copie FFC din 2008, memo `.vct` corupt — Error 41 la bin→text). Nereferențiat de proiect (`.pj2` folosește `comun\clase\registry.vcx`); rămâne binar netracked, doar `registry.h` e în git.
 - Editare cod în `.vcx`/`.scx`: editezi textul `.vc2`/`.sc2` (format pozițional, byte-preserving — nu Edit/Write UTF-8, doar PowerShell CP1252/raw bytes), apoi write-back cu `txt2vcx.ps1 -TextFile <fișier> -ProjectRoot 'D:\ROA\ROAREGISTRATURA'`. `.frx/.mnx/.lbx/.pjx/.dbc/.dbf` rămân doar-citire (editare în IDE). Ținte sub `COMUN\` cer `-AllowComun` + aprobare explicită. Detalii: `D:\ROA\UTIL\foxbin2prg\CLAUDE.md` și `COMUN\docs\flux-editare-vfp-text.md`.
+- **Cine deține un hit**: Grep nu poate spune din ce clasă/metodă vine un hit din `.vc2` (header-ul clasei poate fi la mii de linii deasupra, iar ~2/3 din fișier e proprietăți/metadate). `vfp_symbols.ps1` indexează intervalul de linii al fiecărei clase/metode/proceduri și etichetează hit-urile cu proprietarul — folosește-l înainte de orice editare `txt2vcx.ps1` ca să afli intervalul exact al metodei pe care o modifici. Valorile implicite țintesc ROAACNPRO, deci trimite mereu căile acestui proiect:
+
+```powershell
+$s = 'D:\ROA\UTIL\foxbin2prg\vfp_symbols.ps1'
+$c = @('-CacheRoot', 'D:\ROA\ROAREGISTRATURA', '-ProjectRoot', 'D:\ROA\ROAREGISTRATURA', '-IndexFile', 'D:\ROA\_vfp_textcache\roaregistratura\_symbols.tsv')
+
+powershell -ExecutionPolicy Bypass -File $s @c -Grep '<expresie>' -CodeOnly   # hit-uri etichetate clasa.metoda, doar cod
+powershell -ExecutionPolicy Bypass -File $s @c -Where '<fisier>.vc2:<linie>'  # cine deține această linie
+powershell -ExecutionPolicy Bypass -File $s @c -Find '<nume>'                 # unde e DEFINIT
+powershell -ExecutionPolicy Bypass -File $s @c -Class '<nume_clasa>'          # lanțul de moștenire + metode
+```
+
+Indexul (`_symbols.tsv`) se reconstruiește singur când textul e mai nou, deci reîmprospătează textul întâi — nu vede editările din IDE neconvertite. Ghid complet: `COMUN\docs\cautare_vcx_vct.md`.
 
 ## Reguli de lucru si testare
 

Clase/ofundal_registratura.vc2

@@ -269,7 +269,7 @@ DEFINE CLASS pg_meniu_princ AS pg_meniu OF "..\comun\clase\ofundal.vcx"
 			podg_link.but_termin1.Click()
 		Endif
 		
-		This.ct_registratura1.do_cauta()
+		This.ct_registratura1.do_cauta(.T.)
 	ENDPROC
 
 	PROCEDURE Page3.Activate
@@ -285,6 +285,12 @@ DEFINE CLASS pg_meniu_princ AS pg_meniu OF "..\comun\clase\ofundal.vcx"
 
 	PROCEDURE Page3.Deactivate
 		Local lnRaspuns
+		*!* 23.07.2026 MM - partener NULL: nu se salveaza, se renunta explicit (P1/P2)
+		If !This.ct_part_nr_data1.llock And (Isnull(goRegistratura.id_part) Or Empty(goRegistratura.id_part))
+			This.ct_part_nr_data1.llock = .T.
+			AMESSAGEBOX('Alegeti partenerul! Modificarile nu au fost salvate.',0+48,'Atentie')
+			This.ct_part_nr_data1.Refresh()
+		Endif
 		If !This.ct_part_nr_data1.llock
 			This.ct_part_nr_data1.llock = .T.
 			lnRaspuns = AMESSAGEBOX('Dori<72>i s<> salva<76>i modific<69>rile f<>cute?',4+32,'Confirmare')

Clase/onom_clienti.vc2

@@ -449,7 +449,6 @@ DEFINE CLASS frm_agenti AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Anchor = 15, ;
 		ColumnCount = 5, ;
 		DeleteMark = .F., ;
-		FontName = "Arial Narrow", ;
 		Height = 336, ;
 		Left = 15, ;
 		Name = "grd_agenti", ;
@@ -461,27 +460,22 @@ DEFINE CLASS frm_agenti AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		ZOrderSet = 6, ;
 		Column1.ColumnOrder = 3, ;
 		Column1.ControlSource = "zona", ;
-		Column1.FontName = "Arial Narrow", ;
 		Column1.Name = "cZona", ;
 		Column1.Width = 172, ;
 		Column2.ColumnOrder = 1, ;
 		Column2.ControlSource = "nume_agent", ;
-		Column2.FontName = "Arial Narrow", ;
 		Column2.Name = "cNume", ;
 		Column2.Width = 205, ;
 		Column3.ColumnOrder = 4, ;
 		Column3.ControlSource = "telefon1", ;
-		Column3.FontName = "Arial Narrow", ;
 		Column3.Name = "cTelefon1", ;
 		Column3.Width = 116, ;
 		Column4.ColumnOrder = 2, ;
 		Column4.ControlSource = "functie", ;
-		Column4.FontName = "Arial Narrow", ;
 		Column4.Name = "cFunctia", ;
 		Column4.Width = 127, ;
 		Column5.ColumnOrder = 5, ;
 		Column5.ControlSource = "telefon2", ;
-		Column5.FontName = "Arial Narrow", ;
 		Column5.Name = "cTelefon2", ;
 		Column5.Width = 116
 		*< END OBJECT: ClassLib="..\..\comun\clase\_grd_base.vcx" BaseClass="grid" />
@@ -489,81 +483,72 @@ DEFINE CLASS frm_agenti AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 	ADD OBJECT 'grd_agenti.cFunctia.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Functie", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_agenti.cFunctia.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_agenti.cFunctia.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_agenti.cNume.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Nume", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_agenti.cNume.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_agenti.cNume.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_agenti.cTelefon1.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Telefon 1", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_agenti.cTelefon1.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_agenti.cTelefon1.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_agenti.cTelefon2.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Telefon 2", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_agenti.cTelefon2.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_agenti.cTelefon2.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_agenti.cZona.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Zona", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_agenti.cZona.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_agenti.cZona.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 	
 	PROCEDURE actualizeaza_grid1
 		Lparameters lcFiltru
@@ -667,6 +652,15 @@ DEFINE CLASS frm_agenti AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 	PROCEDURE do_sterge2
 	ENDPROC
 
+	PROCEDURE grd_agenti.Init
+		DODEFAULT()
+		*!* 23.07.2026 MM - propaga fontul gridului la coloane si headere (P5)
+		This.SetAll('FontName', This.FontName, 'Column')
+		This.SetAll('FontSize', This.FontSize, 'Column')
+		This.SetAll('FontName', This.FontName, 'Header')
+		This.SetAll('FontSize', This.FontSize, 'Header')
+	ENDPROC
+
 ENDDEFINE
 
 DEFINE CLASS frm_agenti_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx" 
@@ -1006,7 +1000,6 @@ DEFINE CLASS frm_clienti AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 	ADD OBJECT 'grd_clienti' AS _grdrow WITH ;
 		ColumnCount = 9, ;
 		DeleteMark = .F., ;
-		FontName = "Arial Narrow", ;
 		Height = 366, ;
 		Left = 15, ;
 		Name = "grd_clienti", ;
@@ -1017,41 +1010,32 @@ DEFINE CLASS frm_clienti AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 		Width = 636, ;
 		ZOrderSet = 6, ;
 		Column1.ControlSource = "nume", ;
-		Column1.FontName = "Arial Narrow", ;
 		Column1.Name = "cNume", ;
 		Column1.Width = 172, ;
 		Column2.ControlSource = "cod_fiscal", ;
-		Column2.FontName = "Arial Narrow", ;
 		Column2.Name = "cCod_fiscal", ;
 		Column2.Width = 91, ;
 		Column3.ControlSource = "telefon", ;
-		Column3.FontName = "Arial Narrow", ;
 		Column3.Name = "cTelefon", ;
 		Column4.ControlSource = "adresa", ;
-		Column4.FontName = "Arial Narrow", ;
 		Column4.Name = "cAdresa", ;
 		Column4.Width = 270, ;
 		Column5.ControlSource = "banca", ;
-		Column5.FontName = "Arial Narrow", ;
 		Column5.Name = "cBanca", ;
 		Column5.Width = 114, ;
 		Column6.ControlSource = "cont_banca", ;
-		Column6.FontName = "Arial Narrow", ;
 		Column6.Name = "cCont_banca", ;
 		Column6.Width = 52, ;
 		Column7.ControlSource = "reg_comert", ;
-		Column7.FontName = "Arial Narrow", ;
 		Column7.Name = "cReg_comert", ;
 		Column7.Width = 133, ;
 		Column8.ColumnOrder = 9, ;
 		Column8.ControlSource = "judet", ;
-		Column8.FontName = "Arial Narrow", ;
 		Column8.Name = "cJudet", ;
 		Column8.Visible = .T., ;
 		Column8.Width = 68, ;
 		Column9.ColumnOrder = 8, ;
 		Column9.ControlSource = "localitate", ;
-		Column9.FontName = "Arial Narrow", ;
 		Column9.Name = "cLocalitate", ;
 		Column9.Width = 127
 		*< END OBJECT: ClassLib="..\comun\clase\_grd_base.vcx" BaseClass="grid" />
@@ -1059,147 +1043,129 @@ DEFINE CLASS frm_clienti AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 	ADD OBJECT 'grd_clienti.cAdresa.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Adresa", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cAdresa.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cAdresa.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cBanca.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Banca", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cBanca.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cBanca.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cCod_fiscal.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Cod fiscal", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cCod_fiscal.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cCod_fiscal.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cCont_banca.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Cont", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cCont_banca.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cCont_banca.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cJudet.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Judet", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cJudet.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cJudet.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		Visible = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cLocalitate.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Localitate", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cLocalitate.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cLocalitate.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cNume.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Nume client", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cNume.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cNume.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cReg_comert.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Nr.Reg.Com.", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cReg_comert.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cReg_comert.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grd_clienti.cTelefon.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Telefon", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grd_clienti.cTelefon.Text1' AS textbox WITH ;
+	ADD OBJECT 'grd_clienti.cTelefon.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 	
 	PROCEDURE actualizeaza_grid1
 		Lparameters lcFiltru
@@ -1292,6 +1258,15 @@ DEFINE CLASS frm_clienti AS _frmbase OF "..\comun\clase\_frm_base.vcx"
 	PROCEDURE do_sterge2
 	ENDPROC
 
+	PROCEDURE grd_clienti.Init
+		DODEFAULT()
+		*!* 23.07.2026 MM - propaga fontul gridului la coloane si headere (P5)
+		This.SetAll('FontName', This.FontName, 'Column')
+		This.SetAll('FontSize', This.FontSize, 'Column')
+		This.SetAll('FontName', This.FontName, 'Header')
+		This.SetAll('FontSize', This.FontSize, 'Header')
+	ENDPROC
+
 ENDDEFINE
 
 DEFINE CLASS frm_clienti_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx" 
@@ -1709,7 +1684,6 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		AutoSize = .T., ;
 		camp_nume = data, ;
 		Caption = "Data", ;
-		FontName = "Arial Narrow", ;
 		Left = 54, ;
 		Name = "Ck_data", ;
 		TabIndex = 1, ;
@@ -1723,7 +1697,6 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		AutoSize = .T., ;
 		camp_nume = data2, ;
 		Caption = "Data2", ;
-		FontName = "Arial Narrow", ;
 		Left = 99, ;
 		Name = "Ck_data2", ;
 		TabIndex = 1, ;
@@ -1738,7 +1711,6 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		camp_nume = nume_val, ;
 		Caption = "Valuta", ;
 		Comment = "*:OnResize=LT", ;
-		FontName = "Arial Narrow", ;
 		Left = 6, ;
 		Name = "Ck_numeval", ;
 		TabIndex = 19, ;
@@ -1774,7 +1746,6 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Anchor = 15, ;
 		ColumnCount = 4, ;
 		DeleteMark = .F., ;
-		FontName = "Arial Narrow", ;
 		Height = 341, ;
 		Left = 8, ;
 		Name = "grid_curs", ;
@@ -1784,21 +1755,17 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Top = 68, ;
 		Width = 258, ;
 		Column1.ControlSource = "nume_val", ;
-		Column1.FontName = "Arial Narrow", ;
 		Column1.Name = "Column1", ;
 		Column1.Width = 74, ;
 		Column2.ControlSource = "curs", ;
-		Column2.FontName = "Arial Narrow", ;
 		Column2.Format = "rk", ;
 		Column2.InputMask = (get_mask(10,gnPCurs)), ;
 		Column2.Name = "Column2", ;
 		Column2.Width = 58, ;
 		Column3.ControlSource = "data", ;
-		Column3.FontName = "Arial Narrow", ;
 		Column3.Name = "Column3", ;
 		Column3.Width = 49, ;
 		Column4.ControlSource = "data2", ;
-		Column4.FontName = "Arial Narrow", ;
 		Column4.Name = "Column4", ;
 		Column4.Width = 51
 		*< END OBJECT: ClassLib="..\..\comun\clase\_grd_base.vcx" BaseClass="grid" />
@@ -1806,66 +1773,58 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 	ADD OBJECT 'grid_curs.Column1.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Nume valuta", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grid_curs.Column1.Text1' AS textbox WITH ;
+	ADD OBJECT 'grid_curs.Column1.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grid_curs.Column2.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Curs", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grid_curs.Column2.Text1' AS textbox WITH ;
+	ADD OBJECT 'grid_curs.Column2.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grid_curs.Column3.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Data", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grid_curs.Column3.Text1' AS textbox WITH ;
+	ADD OBJECT 'grid_curs.Column3.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'grid_curs.Column4.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Data2", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'grid_curs.Column4.Text1' AS textbox WITH ;
+	ADD OBJECT 'grid_curs.Column4.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 	
 	PROCEDURE actualizeaza_grid1
 		LPARAMETERS pcFiltru
@@ -1950,6 +1909,15 @@ DEFINE CLASS frm_curs AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		
 	ENDPROC
 
+	PROCEDURE grid_curs.Init
+		DODEFAULT()
+		*!* 23.07.2026 MM - propaga fontul gridului la coloane si headere (P5)
+		This.SetAll('FontName', This.FontName, 'Column')
+		This.SetAll('FontSize', This.FontSize, 'Column')
+		This.SetAll('FontName', This.FontName, 'Header')
+		This.SetAll('FontSize', This.FontSize, 'Header')
+	ENDPROC
+
 ENDDEFINE
 
 DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx" 
@@ -2007,9 +1975,8 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Top = 1
 		*< END OBJECT: ClassLib="..\..\comun\clase\cmd_butoane.vcx" BaseClass="commandbutton" />
 
-	ADD OBJECT 'Command2' AS commandbutton WITH ;
+	ADD OBJECT 'Command2' AS _commandbutton WITH ;
 		Caption = "", ;
-		FontName = "Arial Narrow", ;
 		Height = 25, ;
 		Left = 168, ;
 		Name = "Command2", ;
@@ -2017,7 +1984,7 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 1, ;
 		Top = 36, ;
 		Width = 28
-		*< END OBJECT: BaseClass="commandbutton" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="commandbutton" />
 
 	ADD OBJECT 'CUS_ODATA_CURS1' AS cus_odata_curs WITH ;
 		Left = 102, ;
@@ -2025,7 +1992,7 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Top = 8
 		*< END OBJECT: ClassLib="onom_clienti.vcx" BaseClass="custom" />
 
-	ADD OBJECT 'Label1' AS label WITH ;
+	ADD OBJECT 'Label1' AS _label WITH ;
 		AutoSize = .T., ;
 		BackStyle = 0, ;
 		Caption = "Nume valuta", ;
@@ -2035,9 +2002,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 8, ;
 		Top = 41, ;
 		Width = 71
-		*< END OBJECT: BaseClass="label" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="label" />
 
-	ADD OBJECT 'Label2' AS label WITH ;
+	ADD OBJECT 'Label2' AS _label WITH ;
 		AutoSize = .T., ;
 		BackStyle = 0, ;
 		Caption = "Curs", ;
@@ -2047,9 +2014,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 9, ;
 		Top = 66, ;
 		Width = 29
-		*< END OBJECT: BaseClass="label" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="label" />
 
-	ADD OBJECT 'Label3' AS label WITH ;
+	ADD OBJECT 'Label3' AS _label WITH ;
 		AutoSize = .T., ;
 		BackStyle = 0, ;
 		Caption = "Data 1", ;
@@ -2059,9 +2026,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 10, ;
 		Top = 91, ;
 		Width = 38
-		*< END OBJECT: BaseClass="label" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="label" />
 
-	ADD OBJECT 'Label4' AS label WITH ;
+	ADD OBJECT 'Label4' AS _label WITH ;
 		AutoSize = .T., ;
 		BackStyle = 0, ;
 		Caption = "Data 2", ;
@@ -2071,9 +2038,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 11, ;
 		Top = 117, ;
 		Width = 38
-		*< END OBJECT: BaseClass="label" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="label" />
 
-	ADD OBJECT 'txtCurs' AS textbox WITH ;
+	ADD OBJECT 'txtCurs' AS _textbox WITH ;
 		ControlSource = "porec.curs", ;
 		Height = 23, ;
 		Left = 91, ;
@@ -2081,9 +2048,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 2, ;
 		Top = 63, ;
 		Width = 100
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
-	ADD OBJECT 'txtData1' AS textbox WITH ;
+	ADD OBJECT 'txtData1' AS _textbox WITH ;
 		ControlSource = "porec.data", ;
 		Height = 23, ;
 		Left = 91, ;
@@ -2091,9 +2058,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 3, ;
 		Top = 88, ;
 		Width = 100
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
-	ADD OBJECT 'txtData2' AS textbox WITH ;
+	ADD OBJECT 'txtData2' AS _textbox WITH ;
 		ControlSource = "porec.data2", ;
 		Height = 23, ;
 		Left = 91, ;
@@ -2101,9 +2068,9 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 4, ;
 		Top = 114, ;
 		Width = 100
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
-	ADD OBJECT 'txtValuta' AS textbox WITH ;
+	ADD OBJECT 'txtValuta' AS _textbox WITH ;
 		ControlSource = "porec.nume_val", ;
 		Height = 23, ;
 		Left = 91, ;
@@ -2111,7 +2078,7 @@ DEFINE CLASS frm_curs_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		TabIndex = 12, ;
 		Top = 36, ;
 		Width = 75
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 	
 	PROCEDURE inainte_de_do_termin
 		Private pnIdCursNou
@@ -2294,7 +2261,6 @@ DEFINE CLASS frm_delegati AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 	ADD OBJECT 'gdelegati' AS _grdrow WITH ;
 		ColumnCount = 6, ;
 		DeleteMark = .F., ;
-		FontName = "Arial Narrow", ;
 		Height = 300, ;
 		Left = 12, ;
 		Name = "gdelegati", ;
@@ -2305,36 +2271,30 @@ DEFINE CLASS frm_delegati AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Top = 72, ;
 		Width = 565, ;
 		Column1.ControlSource = "nume_part", ;
-		Column1.FontName = "Arial Narrow", ;
 		Column1.Name = "Column1", ;
 		Column1.ReadOnly = .T., ;
 		Column1.Width = 168, ;
 		Column2.ControlSource = "nume", ;
-		Column2.FontName = "Arial Narrow", ;
 		Column2.Name = "Column2", ;
 		Column2.ReadOnly = .T., ;
 		Column2.Width = 169, ;
 		Column3.ControlSource = "bi_seria", ;
-		Column3.FontName = "Arial Narrow", ;
 		Column3.Name = "Column3", ;
 		Column3.ReadOnly = .T., ;
 		Column3.Width = 49, ;
 		Column4.ColumnOrder = 5, ;
 		Column4.ControlSource = "eliberatde", ;
-		Column4.FontName = "Arial Narrow", ;
 		Column4.Name = "Column4", ;
 		Column4.ReadOnly = .T., ;
 		Column4.Width = 77, ;
 		Column5.ColumnOrder = 6, ;
 		Column5.ControlSource = "inactiv", ;
-		Column5.FontName = "Arial Narrow", ;
 		Column5.Name = "Column5", ;
 		Column5.ReadOnly = .T., ;
 		Column5.Sparse = .F., ;
 		Column5.Width = 48, ;
 		Column6.ColumnOrder = 4, ;
 		Column6.ControlSource = "bi_numar", ;
-		Column6.FontName = "Arial Narrow", ;
 		Column6.Name = "Column6", ;
 		Column6.ReadOnly = .T., ;
 		Column6.Width = 66
@@ -2343,106 +2303,94 @@ DEFINE CLASS frm_delegati AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 	ADD OBJECT 'gdelegati.Column1.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Client", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'gdelegati.Column1.Text1' AS textbox WITH ;
+	ADD OBJECT 'gdelegati.Column1.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'gdelegati.Column2.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Delegat", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'gdelegati.Column2.Text1' AS textbox WITH ;
+	ADD OBJECT 'gdelegati.Column2.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'gdelegati.Column3.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "BI_seria", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'gdelegati.Column3.Text1' AS textbox WITH ;
+	ADD OBJECT 'gdelegati.Column3.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'gdelegati.Column4.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Eliberat de..", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'gdelegati.Column4.Text1' AS textbox WITH ;
+	ADD OBJECT 'gdelegati.Column4.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
-	ADD OBJECT 'gdelegati.Column5.Check1' AS checkbox WITH ;
+	ADD OBJECT 'gdelegati.Column5.Check1' AS _checkbox WITH ;
 		Alignment = 0, ;
 		Caption = "", ;
 		Centered = .T., ;
-		FontName = "Arial Narrow", ;
 		Height = 17, ;
 		Left = 16, ;
 		Name = "Check1", ;
 		ReadOnly = .T., ;
 		Top = 71, ;
 		Width = 60
-		*< END OBJECT: BaseClass="checkbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="checkbox" />
 
 	ADD OBJECT 'gdelegati.Column5.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "Inactiv", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
 	ADD OBJECT 'gdelegati.Column6.Header1' AS header WITH ;
 		Alignment = 2, ;
 		Caption = "BI_numar", ;
-		FontName = "Arial Narrow", ;
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT 'gdelegati.Column6.Text1' AS textbox WITH ;
+	ADD OBJECT 'gdelegati.Column6.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
-		FontName = "Arial Narrow", ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1"
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 	
 	PROCEDURE actualizeaza_grid1
 		LPARAMETERS pcFiltru
@@ -2544,6 +2492,15 @@ DEFINE CLASS frm_delegati AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Endif
 	ENDPROC
 
+	PROCEDURE gdelegati.Init
+		DODEFAULT()
+		*!* 23.07.2026 MM - propaga fontul gridului la coloane si headere (P5)
+		This.SetAll('FontName', This.FontName, 'Column')
+		This.SetAll('FontSize', This.FontSize, 'Column')
+		This.SetAll('FontName', This.FontName, 'Header')
+		This.SetAll('FontSize', This.FontSize, 'Header')
+	ENDPROC
+
 ENDDEFINE
 
 DEFINE CLASS frm_delegati_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx" 
@@ -2874,14 +2831,14 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Responsabill"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_gnom_responsabili.Column1.Text1' AS textbox WITH ;
+	ADD OBJECT '_gnom_responsabili.Column1.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT '_gnom_responsabili.Column2.Header1' AS header WITH ;
 		Alignment = 2, ;
@@ -2889,16 +2846,16 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_gnom_responsabili.Column2.Text1' AS textbox WITH ;
+	ADD OBJECT '_gnom_responsabili.Column2.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
-	ADD OBJECT '_gnom_responsabili.Column3.Check1' AS checkbox WITH ;
+	ADD OBJECT '_gnom_responsabili.Column3.Check1' AS _checkbox WITH ;
 		Alignment = 0, ;
 		Caption = "", ;
 		Centered = .T., ;
@@ -2908,7 +2865,7 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		ReadOnly = .T., ;
 		Top = 30, ;
 		Width = 60
-		*< END OBJECT: BaseClass="checkbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="checkbox" />
 
 	ADD OBJECT '_gnom_responsabili.Column3.Header1' AS header WITH ;
 		Alignment = 2, ;
@@ -2916,7 +2873,7 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_gnom_responsabili.Column4.Check1' AS checkbox WITH ;
+	ADD OBJECT '_gnom_responsabili.Column4.Check1' AS _checkbox WITH ;
 		Alignment = 0, ;
 		Caption = "", ;
 		Centered = .T., ;
@@ -2926,7 +2883,7 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		ReadOnly = .T., ;
 		Top = 30, ;
 		Width = 60
-		*< END OBJECT: BaseClass="checkbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="checkbox" />
 
 	ADD OBJECT '_gnom_responsabili.Column4.Header1' AS header WITH ;
 		Alignment = 2, ;
@@ -2940,14 +2897,14 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_gnom_responsabili.Column5.Text1' AS textbox WITH ;
+	ADD OBJECT '_gnom_responsabili.Column5.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT 'But_modifica1' AS but_modifica WITH ;
 		Left = 415, ;
@@ -3097,6 +3054,15 @@ DEFINE CLASS frm_responsabili AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		thisform.log("NOM_RESPONSABILI",v_responsabili.id_responsabil)
 	ENDPROC
 
+	PROCEDURE _gnom_responsabili.Init
+		DODEFAULT()
+		*!* 23.07.2026 MM - propaga fontul gridului la coloane si headere (P5)
+		This.SetAll('FontName', This.FontName, 'Column')
+		This.SetAll('FontSize', This.FontSize, 'Column')
+		This.SetAll('FontName', This.FontName, 'Header')
+		This.SetAll('FontSize', This.FontSize, 'Header')
+	ENDPROC
+
 ENDDEFINE
 
 DEFINE CLASS frm_responsabili_nou AS _frmbase OF "..\..\comun\clase\_frm_base.vcx" 
@@ -3305,14 +3271,14 @@ DEFINE CLASS frm_tipc AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_grdrow1.Column1.Text1' AS textbox WITH ;
+	ADD OBJECT '_grdrow1.Column1.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT '_grdrow1.Column2.Header1' AS header WITH ;
 		Alignment = 2, ;
@@ -3320,14 +3286,14 @@ DEFINE CLASS frm_tipc AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_grdrow1.Column2.Text1' AS textbox WITH ;
+	ADD OBJECT '_grdrow1.Column2.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
 
 	ADD OBJECT '_grdrow1.Column3.Header1' AS header WITH ;
 		Alignment = 2, ;
@@ -3335,13 +3301,22 @@ DEFINE CLASS frm_tipc AS _frmbase OF "..\..\comun\clase\_frm_base.vcx"
 		Name = "Header1"
 		*< END OBJECT: BaseClass="header" />
 
-	ADD OBJECT '_grdrow1.Column3.Text1' AS textbox WITH ;
+	ADD OBJECT '_grdrow1.Column3.Text1' AS _textbox WITH ;
 		BackColor = 255,255,255, ;
 		BorderStyle = 0, ;
 		ForeColor = 0,0,0, ;
 		Margin = 0, ;
 		Name = "Text1", ;
 		ReadOnly = .T.
-		*< END OBJECT: BaseClass="textbox" />
+		*< END OBJECT: ClassLib="..\..\comun\clase\_baza.vcx" BaseClass="textbox" />
+	
+	PROCEDURE _grdrow1.Init
+		DODEFAULT()
+		*!* 23.07.2026 MM - propaga fontul gridului la coloane si headere (P5)
+		This.SetAll('FontName', This.FontName, 'Column')
+		This.SetAll('FontSize', This.FontSize, 'Column')
+		This.SetAll('FontName', This.FontName, 'Header')
+		This.SetAll('FontSize', This.FontSize, 'Header')
+	ENDPROC
 
 ENDDEFINE

Clase/outlook2003bar.vc2

@@ -1009,7 +1009,8 @@ DEFINE CLASS panelbutton AS container
 	PROCEDURE do_arata_formular
 		LOCAL loPagina
 		loPagina = goFundal._pgfrmbase1.page3
-		IF !loPagina.ct_part_nr_data1.llock
+		*!* 23.07.2026 MM - partener NULL: fara prompt/salvare, raman in editare (P1/P2)
+		IF !loPagina.ct_part_nr_data1.llock AND !(ISNULL(goRegistratura.id_part) OR EMPTY(goRegistratura.id_part))
 			LOCAL lnRaspuns
 			loPagina.ct_part_nr_data1.llock = .T.
 		
@@ -1134,7 +1135,7 @@ DEFINE CLASS splitter2 AS shape 		&& Up-Down Splitter class. Support ActiveX con
 	*</DefinedPropArrayMethod>
 
 	HIDDEN hiddencontrols
-	PROTECTED Init,MouseDown
+	PROTECTED Init,mousedown
 	*<PropValue>
 		Height = 4
 		MousePointer = 7

Ferestre/fundal.sc2

@@ -341,6 +341,7 @@ DEFINE CLASS form1 AS form
 			.do_initializeaza_cursor()
 			.grid_registratura.SetFocus()
 		Endwith
+		Thisform.WindowState = 2
 	ENDPROC
 
 	PROCEDURE RightClick
@@ -358,6 +359,7 @@ DEFINE CLASS form1 AS form
 		Thisform.lb_utilizator1.Visible=.T.
 		Do lansare_toolbar In oproceduri_comune.prg
 		DO lansare_help IN oproceduri_comune.prg
+		This.WindowState = 2
 	ENDPROC
 
 	PROCEDURE statusbarclick

Programe/oproceduri_roaregistratura.prg

@@ -16,7 +16,7 @@ lcSelect = [select id_reg, id_part, denumire, id_pers, pers_contact, data, numar
 
 lcOrder = []
 lcgroup = []
-lcFiltru = [sters=0]
+lcFiltru = [sters=0 and id_reg=(select max(id_reg) from vregistratura where sters=0)]  && *!* 23.07.2026 MM - initial doar ultimul document (P4)
 lcFiltruOriginal = []
 llModParam = .T.
 llAfiseaza = .F.
@@ -103,12 +103,18 @@ Parameters toRegistratura
 Local loRegistratura
 loRegistratura = toRegistratura
 
+*!* 23.07.2026 MM - garda partener NULL/empty (P2), functia intoarce .T./.F.
+If Isnull(loRegistratura.id_part) Or Empty(loRegistratura.id_part)
+	AMESSAGEBOX("Alegeti partenerul inainte de salvare!",0+48,"Atentie")
+	Return .F.
+Endif
+
 Local lcId_reg, lcId_part, lcId_pers, lcData, lcNumar, lcData_intern, lcNumar_intern, lcDescriere, lcObservatii, lcIdUtil
 Local lnSucces
 lnSucces = -1
 
 lcId_reg = Alltrim(Str(loRegistratura.id_reg))
-lcId_part = Alltrim(Str(loRegistratura.id_part))
+lcId_part = Nvl(Alltrim(Str(loRegistratura.id_part)),'NULL')
 lcId_pers = Nvl(Alltrim(Str(loRegistratura.id_pers)),'NULL')
 lcId_responsabil = Nvl(Alltrim(Str(loRegistratura.id_responsabil)),'NULL')
 lcData = Dtos(loRegistratura.Data)
@@ -120,7 +126,7 @@ lcDescriere = Nvl(Alltrim(loRegistratura.descriere),"")
 lcObservatii = Nvl(Alltrim(loRegistratura.observatii)," ")
 lcId_fdoc = Nvl(Alltrim(Str(loRegistratura.id_fdoc)),'NULL')
 lcId_mediu = Nvl(Alltrim(Str(loRegistratura.id_mediu)),'NULL')
-lcNr_pag = Alltrim(Str(loRegistratura.nr_pag))
+lcNr_pag = Nvl(Alltrim(Str(loRegistratura.nr_pag)),'NULL')
 lcIdUtil = Alltrim(Str(gnIdUtil))
 
 lcSql = [begin pack_registratura.modifica_registratura(] + lcId_reg + [,] + lcId_part + [,] + lcId_pers + [,] + lcId_responsabil + ;
@@ -134,6 +140,7 @@ If lnSucces < 0
 	AMESSAGEBOX(goExecutor.cEroare,0+16,"Eroare")
 Endif
 
+Return (lnSucces >= 0)
 Endproc && modifica_reg_dg
 ***-----------------------------------------------------------------------------------------------------------------------------
 

Teste/build_registratura.prg

@@ -0,0 +1,32 @@
+* build_registratura.prg - M6: recompilare completa a proiectului (headless).
+* Rulare: vfp9.exe -A -T "D:\ROA\ROAREGISTRATURA\Teste\build_registratura.prg"
+* Log:    D:\ROA\ROAREGISTRATURA\Teste\log_build.txt (+ erori de compilare in .err daca apar)
+SET SAFETY OFF
+SET TALK OFF
+PUBLIC gcBuildLog
+gcBuildLog = 'D:\ROA\ROAREGISTRATURA\Teste\log_build.txt'
+STRTOFILE('=== build_registratura ' + TTOC(DATETIME()) + CHR(13)+CHR(10), gcBuildLog)
+
+ON ERROR DO blog WITH '*** EROARE ' + TRANSFORM(ERROR()) + ': ' + MESSAGE() + ;
+	' | ' + MESSAGE(1) + ' | prg=' + PROGRAM() + ' lin=' + TRANSFORM(LINENO())
+
+SET DEFAULT TO D:\ROA\ROAREGISTRATURA
+* Caile stocate in clasele COMUN pentru include-uri (foxpro.h din VFP8, wincrypt.h)
+* nu mai exista; compilatorul cauta fallback pe SET PATH.
+SET PATH TO "C:\Program Files (x86)\Microsoft Visual FoxPro 9";"D:\ROA\ROACRYPT" ADDITIVE
+DO blog WITH 'BUILD EXE roaregistratura.exe FROM roaRegistratura RECOMPILE ...'
+BUILD EXE roaregistratura.exe FROM roaRegistratura RECOMPILE
+DO blog WITH 'Build incheiat. Verificati roaregistratura.err daca exista.'
+IF FILE('D:\ROA\ROAREGISTRATURA\roaregistratura.err')
+	DO blog WITH '--- roaregistratura.err ---'
+	DO blog WITH FILETOSTR('D:\ROA\ROAREGISTRATURA\roaregistratura.err')
+ELSE
+	DO blog WITH 'FARA erori de compilare (.err inexistent).'
+ENDIF
+ON ERROR
+QUIT
+
+PROCEDURE blog
+	LPARAMETERS tcMsg
+	STRTOFILE(TRANSFORM(tcMsg) + CHR(13)+CHR(10), gcBuildLog, 1)
+ENDPROC

Teste/test_init_env_registratura.prg

@@ -0,0 +1,189 @@
+* test_init_env_registratura.prg
+* Init mediu NEINTERACTIV pentru teste headless ROAREGISTRATURA
+* (echivalentul COMUN\utile\Teste\test_init_env_auto.prg, dar pentru acest proiect).
+* SET PATH / CLASSLIB / PROCEDURE preluate din Programe\roaregistratura.prg (a se mentine sincron).
+*
+* Utilizare (dintr-un script apelant):
+*   DO Teste\test_init_env_registratura WITH 'CENTRAL', 'MARIUSM_AUTO', 'parola'
+*   IF gnHandle <= 0 ... eroare conectare
+* ATENTIE: NU se ruleaza pe baza de productie (JCSSERVER / CONTAFIN_ORACLE).
+
+LPARAMETERS tcHost, tcSchema, tcPassword, tnAn, tnLuna
+
+tcHost = IIF(EMPTY(tcHost), 'CENTRAL', tcHost)
+tcSchema = IIF(EMPTY(tcSchema), 'MARIUSM_AUTO', tcSchema)
+tcPassword = IIF(EMPTY(tcPassword), 'ROMFASTSOFT', tcPassword)
+
+SET DELETED ON
+SET ANSI ON
+SET EXACT ON
+SET SAFETY OFF
+CLOSE DATABASES
+SET CENTURY ON
+SET DATE DMY
+SET NULLDISPLAY TO ''
+SET SQLBUFFERING ON
+
+PUBLIC CT_SUCCES, CT_INSUCCES, crlf, gnAn, gnLuna, gnIdUtil, gnIdFirma, gcS, gcFirma, ;
+	gcNumeProgram, gcAppName, buton, gnButon, pnButon, gcAcces, glParametri, glQuit
+CT_SUCCES = 1
+CT_INSUCCES = -1
+crlf = CHR(13) + CHR(10)
+gnAn = IIF(EMPTY(tnAn), YEAR(DATE()), tnAn)
+gnLuna = IIF(EMPTY(tnLuna), MONTH(DATE()), tnLuna)
+gnIdUtil = -3
+gnIdFirma = 110
+gcS = UPPER(ALLTRIM(tcSchema))
+gcFirma = m.gcS
+gcNumeProgram = [ROAREGISTRATURA]
+gcAppName = [ROAREGISTRATURA]
+glParametri = .T.
+glQuit = .F.
+buton = 1
+gnButon = 1
+pnButon = 1
+gcAcces = [1;2;3;4;5;6;7;8;]
+
+* globale cerute de oserii_numere/oinit_optiuni (sincron cu test_init_env_auto.prg)
+PUBLIC gnIdSucursala, gnIdMama, glEMama, gcCondSucursala, glLunaInchisa, gcUserName
+gnIdSucursala = NULL
+gnIdMama = 0
+glEMama = .F.
+gcCondSucursala = []
+glLunaInchisa = .F.
+gcUserName = [MARIUS M]
+* vezi comentariul din test_init_env_auto.prg: PUBLIC, nu Declare
+PUBLIC nror(65000)
+
+PUBLIC gcAppPath, DIRGEN, gcBasePath, gcTempPath, gcGeneralIniFile, gcSettingsFile
+gcAppPath = [D:\ROA\ROAREGISTRATURA\]
+SET DEFAULT TO (gcAppPath)
+LOCAL lcPath
+lcPath = gcAppPath + 'Date;' + ;
+	gcAppPath + 'Include;' + ;
+	gcAppPath + 'FERESTRE;' + ;
+	gcAppPath + 'GRAFICE;' + ;
+	gcAppPath + 'CLASE;' + ;
+	gcAppPath + 'MENIURI;' + ;
+	gcAppPath + 'PROGRAME;' + ;
+	gcAppPath + 'RAPOARTE;' + ;
+	gcAppPath + 'COMUN\CLASE;' + ;
+	gcAppPath + 'COMUN\FERESTRE;' + ;
+	gcAppPath + 'COMUN\PROGRAME;' + ;
+	gcAppPath + 'COMUN\GRAFICE;' + ;
+	gcAppPath + 'COMUN\RAPOARTE;' + ;
+	gcAppPath + 'COMUN\UTILE\CTL32;' + ;
+	gcAppPath + 'COMUN\UTILE\HPDF;' + ;
+	gcAppPath + 'COMUN\UTILE\WEB;' + ;
+	gcAppPath + 'COMUN\UTILE\TESTE;' + ;
+	ADDBS(SUBSTR(gcAppPath,1,RAT([\],gcAppPath,2)))+[COMUNROA\]
+SET PATH TO &lcPath ADDITIVE
+
+*CLASE - sincron cu Programe\roaregistratura.prg
+SET CLASSLIB TO clase\roaregistratura ADDITIVE
+SET CLASSLIB TO CAUT ADDITIVE
+SET CLASSLIB TO ooptiuni ADDITIVE
+SET CLASSLIB TO registry ADDITIVE
+SET CLASSLIB TO decabaza ADDITIVE
+SET CLASSLIB TO cauta_alfa_forms ADDITIVE
+SET CLASSLIB TO ferestre_oracle ADDITIVE
+SET CLASSLIB TO caut_ora ADDITIVE
+SET CLASSLIB TO ferestre_registratura ADDITIVE
+SET CLASSLIB TO onomenclatoare ADDITIVE
+SET CLASSLIB TO Messagebox ADDITIVE
+SET CLASSLIB TO otoolbar ADDITIVE
+SET CLASSLIB TO ferestre_cere_date ADDITIVE
+SET CLASSLIB TO orapoarte_comun ADDITIVE
+SET CLASSLIB TO onom_articole ADDITIVE
+SET CLASSLIB TO serii_numere.vcx ADDITIVE
+SET CLASSLIB TO ferestre_atasamente.vcx ADDITIVE
+SET CLASSLIB TO wwdialogs.vcx ADDITIVE
+SET CLASSLIB TO appwiz.vcx ADDITIVE
+SET CLASSLIB TO accessibility.vcx ADDITIVE
+SET CLASSLIB TO ofundal_registratura.vcx ADDITIVE
+
+*PROCEDURI - sincron cu Programe\roaregistratura.prg
+SET PROCEDURE TO quitapp ADDITIVE
+SET PROCEDURE TO init_program ADDITIVE
+SET PROCEDURE TO oproceduri_comune ADDITIVE
+SET PROCEDURE TO gencursor.prg ADDITIVE
+SET PROCEDURE TO update_nomenclator.prg ADDITIVE
+SET PROCEDURE TO onomenclatoare ADDITIVE
+SET PROCEDURE TO oproceduri_ams ADDITIVE
+SET PROCEDURE TO ocautare ADDITIVE
+SET PROCEDURE TO oinit_optiuni ADDITIVE
+SET PROCEDURE TO osecurity ADDITIVE
+SET PROCEDURE TO oproceduri_roaregistratura ADDITIVE
+SET PROCEDURE TO acces_meniu ADDITIVE
+SET PROCEDURE TO oheader ADDITIVE
+SET PROCEDURE TO oparteneri_contracte ADDITIVE
+SET PROCEDURE TO oproceduri_maintenance.prg ADDITIVE
+SET PROCEDURE TO cauta_alfa ADDITIVE
+SET PROCEDURE TO ini.prg ADDITIVE
+SET PROCEDURE TO oserii_numere ADDITIVE
+SET PROCEDURE TO oproceduri_atasamente ADDITIVE
+SET PROCEDURE TO oexport.prg ADDITIVE
+SET PROCEDURE TO iniacces.prg ADDITIVE
+SET PROCEDURE TO filebringer.prg ADDITIVE
+SET PROCEDURE TO log_mesaje.prg ADDITIVE
+SET PROCEDURE TO wwutils.prg ADDITIVE && ShortPath() folosit de Log_Mesaje.Init
+
+DECLARE INTEGER GetPrivateProfileString IN WIN32API ;
+	STRING, STRING, STRING, STRING @, INTEGER, STRING
+DECLARE INTEGER WritePrivateProfileString IN Win32Api ;
+	STRING, STRING, STRING, STRING
+DECLARE INTEGER PathFileExists IN shlwapi STRING pszPath
+
+PUBLIC poLog, goLog, goApp
+poLog = NEWOBJECT("Log_Mesaje","Log_Mesaje.prg")
+goLog = poLog
+goApp = CREATEOBJECT("wzApplication")
+
+DIRGEN = [D:\ROA\]
+gcBasePath = DIRGEN
+gcGeneralIniFile = DIRGEN + "settings.ini"
+gcSettingsFile = m.gcGeneralIniFile
+gcTempPath = ADDBS(SYS(2023)) + gcS + [\]
+IF !DIRECTORY(gcTempPath)
+	MD (gcTempPath)
+ENDIF
+
+PUBLIC gnHandle, goExecutor, goConn, goFirma, goCalendar
+gnHandle = 0
+goExecutor = CREATEOBJECT("oExecutor")
+goConn = CREATEOBJECT("oConn")
+goConn.Connect(m.tcHost, m.tcSchema, m.tcPassword)
+IF m.gnHandle <= 0
+	RETURN .F.
+ENDIF
+
+LOCAL llSucces, lcSql
+goFirma = NULL
+llSucces = goExecutor.oExecuta("select * from syn_v_nom_firme where schema = ?gcS", "cFirma")
+IF m.llSucces
+	SELECT cFirma
+	gnIdFirma = id_firma
+	gcFirma = ALLTRIM(firma)
+	SCATTER NAME goFirma
+ELSE
+	goFirma = CREATEOBJECT('custom')
+	goFirma.AddProperty('cod_fiscal', '')
+	goFirma.AddProperty('schema', m.gcS)
+	goFirma.AddProperty('firma', m.gcS)
+ENDIF
+USE IN (SELECT('cFirma'))
+
+CREATE CURSOR dual (dummy c(10))
+INSERT INTO dual (dummy) VALUES ("")
+
+* sesiune Oracle (pachetele pot lipsi din unele scheme - nu oprim initul)
+lcSql = [begin pack_sesiune.set_Id_Util(?gnIdUtil); end;]
+llSucces = goExecutor.oExecuta(lcSql)
+lcSql = [begin pack_sesiune.setluna(?gnLuna); pack_sesiune.setan(?gnAn); end;]
+llSucces = goExecutor.oExecuta(lcSql)
+
+* variabilele globale ale aplicatiei folosite de fluxul registratura
+PUBLIC poReg, goRegistratura, podg_dg, podg_referinte, podg_obs, podg_link, goFundal
+STORE '' TO poReg, goRegistratura
+
+RETURN .T.

Teste/test_registratura_adaugare.prg

@@ -0,0 +1,168 @@
+* test_registratura_adaugare.prg
+* Test headless: fluxul de ADAUGARE document in registratura + salvarea datelor generale.
+* Reproduce si bugul cunoscut: modifica_reg_dg cu partener NULL (P2 din
+* docs\analiza_registratura_adaugare_editare.md). Dupa implementarea gardei (M1),
+* pasul 3 trebuie sa devina un refuz elegant (mesaj + return), nu eroare de executie.
+* Rulare:  vfp9.exe -A -T "D:\ROA\ROAREGISTRATURA\Teste\test_registratura_adaugare.prg"
+* Log:     D:\ROA\ROAREGISTRATURA\Teste\log_test_adaugare.txt
+* ATENTIE: ruleaza DOAR pe schema de test (CENTRAL/MARIUSM_AUTO). Documentul de test
+* este sters (soft-delete) la final prin pack_registratura.sterge_registratura.
+
+SET SAFETY OFF
+SET TALK OFF
+
+* mock amessagebox PRIMUL in lista de proceduri (la nume duplicat castiga PRIMUL - testare-ui-vfp.md cap. j)
+SET PROCEDURE TO D:\ROA\ROAREGISTRATURA\COMUN\utile\Teste\mock_amessagebox.prg ADDITIVE
+PUBLIC gnMockRaspuns
+gnMockRaspuns = 6
+
+PUBLIC gcTestLog
+gcTestLog = 'D:\ROA\ROAREGISTRATURA\Teste\log_test_adaugare.txt'
+STRTOFILE('=== test_registratura_adaugare ' + TTOC(DATETIME()) + CHR(13)+CHR(10), gcTestLog)
+
+ON ERROR DO tlog WITH '*** EROARE ' + TRANSFORM(ERROR()) + ': ' + MESSAGE() + ;
+	' | ' + MESSAGE(1) + ' | prg=' + PROGRAM() + ' lin=' + TRANSFORM(LINENO())
+
+DO tlog WITH 'Init mediu...'
+DO D:\ROA\ROAREGISTRATURA\Teste\test_init_env_registratura.prg
+IF TYPE('gnHandle') # 'N' OR gnHandle <= 0
+	DO tlog WITH 'ESEC conectare - STOP'
+	DO tfinal
+ENDIF
+DO tlog WITH 'Conectat, schema=' + gcS
+
+* 0) cursorul listei + goRegistratura
+DO viz_registratura IN oproceduri_roaregistratura.prg
+IF !USED('cRegistratura')
+	DO tlog WITH 'ESEC: nu exista cursorul cRegistratura - STOP'
+	DO tfinal
+ENDIF
+SELECT cRegistratura
+LOCAL lnInregInitial
+lnInregInitial = RECCOUNT()
+SCATTER NAME goRegistratura MEMO BLANK
+DO tlog WITH 'Inregistrari initiale: ' + TRANSFORM(lnInregInitial)
+
+* 1) alocare numar intern (seria 10, ca in ct_registratura.do_adauga)
+DO tlog WITH '--- Pas 1: alocare numar intern (seria 10)'
+LOCAL loGeneratorNumere, lcNumarIntern
+loGeneratorNumere = CREATEOBJECT('oGeneratorNumere')
+loGeneratorNumere.creeaza_cursor_serii(10)
+lcNumarIntern = ALLTRIM(STR(loGeneratorNumere.aloca_numar(10)))
+DO tlog WITH 'Numar intern alocat: ' + lcNumarIntern
+
+* 2) adaugare document gol (pack_registratura.adauga_registratura)
+DO tlog WITH '--- Pas 2: adauga_registratura'
+LOCAL lnId_reg
+lnId_reg = 0
+lnId_reg = adauga_registratura('cRegistratura', lcNumarIntern)
+IF EMPTY(lnId_reg)
+	DO tlog WITH 'ESEC: adauga_registratura a intors ' + TRANSFORM(lnId_reg) + ;
+		' (pack_registratura lipseste din schema de test?) - STOP curat, nimic de sters'
+	DO tfinal
+ENDIF
+DO tlog WITH 'OK document adaugat, id_reg=' + TRANSFORM(lnId_reg)
+
+* pozitionare pe documentul nou + goRegistratura
+DO viz_registratura IN oproceduri_roaregistratura.prg
+SELECT cRegistratura
+LOCATE FOR id_reg = lnId_reg
+IF !FOUND()
+	DO tlog WITH 'ESEC: documentul nou nu apare in vregistratura'
+ELSE
+	SCATTER NAME goRegistratura MEMO
+	DO tlog WITH 'Document nou gasit: nr_intern=' + TRANSFORM(NVL(numar_intern,'')) + ;
+		' id_part=' + TRANSFORM(goRegistratura.id_part)
+ENDIF
+
+* 3) salvare cu partener NULL - reproduce bugul P2
+*    (astazi: eroare "Invalid use of NULL"/sql NULL; dupa fix M1: mesaj + refuz)
+DO tlog WITH '--- Pas 3: modifica_reg_dg cu id_part NULL (se asteapta refuz/eroare)'
+goRegistratura.descriere = 'TEST AUTOMAT - nu folositi'
+DO modifica_reg_dg WITH goRegistratura IN oproceduri_roaregistratura.prg
+DO tlog WITH 'Pas 3 incheiat (vezi mai sus daca a fost eroare de executie = bug P2 nereparat)'
+
+* 4) salvare cu partener valid (refolosesc un partener din alt document existent)
+DO tlog WITH '--- Pas 4: modifica_reg_dg cu partener valid'
+LOCAL llSucces
+llSucces = goExecutor.oExecuta( ;
+	"select id_part, denumire from vregistratura where id_part is not null and rownum = 1", 'cPartTest')
+IF llSucces AND USED('cPartTest') AND RECCOUNT('cPartTest') > 0
+	SELECT cPartTest
+	goRegistratura.id_part = id_part
+	goRegistratura.denumire = denumire
+	USE IN cPartTest
+	goRegistratura.data = DATE()
+	goRegistratura.numar = 'TST-' + lcNumarIntern
+	goRegistratura.ie = 1
+	goRegistratura.nr_pag = 1
+	DO modifica_reg_dg WITH goRegistratura IN oproceduri_roaregistratura.prg
+
+	* verificare: datele au ajuns in baza
+	DO viz_registratura IN oproceduri_roaregistratura.prg
+	SELECT cRegistratura
+	LOCATE FOR id_reg = lnId_reg
+	IF FOUND() AND !ISNULL(id_part) AND ALLTRIM(NVL(numar,'')) == 'TST-' + lcNumarIntern
+		DO tlog WITH 'OK salvare reusita: partener=' + TRANSFORM(NVL(denumire,'')) + ;
+			' numar=' + TRANSFORM(NVL(numar,''))
+	ELSE
+		DO tlog WITH 'ESEC verificare: documentul nu are datele asteptate dupa salvare'
+	ENDIF
+ELSE
+	DO tlog WITH 'SKIP Pas 4: nu exista niciun partener in vregistratura pe schema de test'
+ENDIF
+
+* 5) EDITAREA documentului (fluxul Modifica -> Salveaza): modific campuri si re-salvez
+DO tlog WITH '--- Pas 5: editare document (modificare descriere/nr_pag/data + re-salvare)'
+SELECT cRegistratura
+LOCATE FOR id_reg = lnId_reg
+IF FOUND() AND !ISNULL(id_part)
+	SCATTER NAME goRegistratura MEMO
+	goRegistratura.descriere = 'TEST AUTOMAT - EDITAT'
+	goRegistratura.nr_pag = 5
+	goRegistratura.data = DATE() - 1
+	goRegistratura.ie = 2
+	DO modifica_reg_dg WITH goRegistratura IN oproceduri_roaregistratura.prg
+
+	* verificare: modificarile au ajuns in baza
+	DO viz_registratura IN oproceduri_roaregistratura.prg
+	SELECT cRegistratura
+	LOCATE FOR id_reg = lnId_reg
+	IF FOUND() AND ALLTRIM(NVL(descriere,'')) == 'TEST AUTOMAT - EDITAT' ;
+			AND NVL(nr_pag,0) = 5 AND ie = 2
+		DO tlog WITH 'OK editare reusita: descriere=' + TRANSFORM(NVL(descriere,'')) + ;
+			' nr_pag=' + TRANSFORM(NVL(nr_pag,0)) + ' ie=' + TRANSFORM(ie) + ;
+			' data=' + TRANSFORM(data)
+	ELSE
+		DO tlog WITH 'ESEC verificare editare: documentul nu are valorile modificate'
+	ENDIF
+ELSE
+	DO tlog WITH 'SKIP Pas 5: documentul de test nu are partener (Pas 4 esuat/sarit)'
+ENDIF
+
+* 6) curatenie: soft-delete documentul de test
+DO tlog WITH '--- Pas 6: stergere document de test'
+LOCAL lcSql, lnSucces
+lcSql = [begin pack_registratura.sterge_registratura(] + ALLTRIM(STR(lnId_reg)) + ;
+	[,] + ALLTRIM(STR(gnIdUtil)) + [); end;]
+lnSucces = goExecutor.oExecute(lcSql)
+IF lnSucces < 0
+	DO tlog WITH 'ATENTIE: stergerea a esuat: ' + TRANSFORM(goExecutor.cEroare) + ;
+		' - stergeti manual id_reg=' + TRANSFORM(lnId_reg)
+ELSE
+	DO tlog WITH 'OK document de test sters (soft-delete), id_reg=' + TRANSFORM(lnId_reg)
+ENDIF
+
+DO tlog WITH '=== FINAL test_registratura_adaugare'
+DO tfinal
+
+PROCEDURE tlog
+	LPARAMETERS tcMsg
+	STRTOFILE(TRANSFORM(tcMsg) + CHR(13)+CHR(10), gcTestLog, 1)
+ENDPROC
+
+PROCEDURE tfinal
+	ON ERROR
+	CLOSE ALL
+	QUIT
+ENDPROC

Teste/test_registratura_form.prg

@@ -0,0 +1,111 @@
+* test_registratura_form.prg
+* Test headless: incarcarea listei documentelor (viz_registratura) + instantierea
+* containerului ct_registratura pe un form ascuns (verifica clase/cursoare/grid).
+* Rulare:  vfp9.exe -A -T "D:\ROA\ROAREGISTRATURA\Teste\test_registratura_form.prg"
+* Log:     D:\ROA\ROAREGISTRATURA\Teste\log_test_form.txt
+
+SET SAFETY OFF
+SET TALK OFF
+
+* mock amessagebox PRIMUL in lista de proceduri (la nume duplicat castiga PRIMUL - testare-ui-vfp.md cap. j)
+SET PROCEDURE TO D:\ROA\ROAREGISTRATURA\COMUN\utile\Teste\mock_amessagebox.prg ADDITIVE
+PUBLIC gnMockRaspuns
+gnMockRaspuns = 6
+
+PUBLIC gcTestLog
+gcTestLog = 'D:\ROA\ROAREGISTRATURA\Teste\log_test_form.txt'
+STRTOFILE('=== test_registratura_form ' + TTOC(DATETIME()) + CHR(13)+CHR(10), gcTestLog)
+
+ON ERROR DO tlog WITH '*** EROARE ' + TRANSFORM(ERROR()) + ': ' + MESSAGE() + ;
+	' | ' + MESSAGE(1) + ' | prg=' + PROGRAM() + ' lin=' + TRANSFORM(LINENO())
+
+DO tlog WITH 'Init mediu...'
+DO D:\ROA\ROAREGISTRATURA\Teste\test_init_env_registratura.prg
+IF TYPE('gnHandle') # 'N' OR gnHandle <= 0
+	DO tlog WITH 'ESEC conectare (gnHandle=' + TRANSFORM(IIF(TYPE('gnHandle')='N',gnHandle,-999)) + ') - STOP'
+	DO tfinal
+ENDIF
+DO tlog WITH 'Conectat, gnHandle=' + TRANSFORM(gnHandle) + ' schema=' + gcS
+
+* 1) incarcarea cursorului listei
+DO tlog WITH '--- Test 1: viz_registratura'
+DO viz_registratura IN oproceduri_roaregistratura.prg
+IF USED('cRegistratura')
+	SELECT cRegistratura
+	DO tlog WITH 'OK cursor cRegistratura, inregistrari=' + TRANSFORM(RECCOUNT())
+	IF RECCOUNT() > 0
+		GO BOTTOM
+		DO tlog WITH 'Ultimul document: id_reg=' + TRANSFORM(NVL(id_reg,0)) + ;
+			' nr_intern=' + TRANSFORM(NVL(numar_intern,'')) + ;
+			' data_intern=' + TRANSFORM(data_intern) + ;
+			' partener=' + TRANSFORM(NVL(denumire,''))
+		GO TOP
+		SCATTER NAME goRegistratura MEMO
+	ELSE
+		SCATTER NAME goRegistratura MEMO BLANK
+	ENDIF
+ELSE
+	DO tlog WITH 'ESEC: cursorul cRegistratura NU exista'
+ENDIF
+
+* 2) instantierea containerului listei pe un form ascuns
+DO tlog WITH '--- Test 2: instantiere ct_registratura pe form ascuns'
+LOCAL loForm
+loForm = CREATEOBJECT('Form')
+loForm.Visible = .F.
+loForm.Width = 810
+loForm.Height = 420
+loForm.AddObject('ct1', 'ct_registratura')
+IF VARTYPE(loForm.ct1) = 'O'
+	DO tlog WITH 'OK ct_registratura instantiat; grid RecordSource=' + ;
+		loForm.ct1.grid_registratura.RecordSource + ;
+		' coloane=' + TRANSFORM(loForm.ct1.grid_registratura.ColumnCount) + ;
+		' font=' + loForm.ct1.grid_registratura.FontName + ;
+		' size=' + TRANSFORM(loForm.ct1.grid_registratura.FontSize)
+	DO tlog WITH 'Coloana1: font=' + loForm.ct1.grid_registratura.Columns(1).FontName + ;
+		' ' + TRANSFORM(loForm.ct1.grid_registratura.Columns(1).FontSize) + ;
+		' | header=' + loForm.ct1.grid_registratura.Columns(1).Header1.FontName + ;
+		' ' + TRANSFORM(loForm.ct1.grid_registratura.Columns(1).Header1.FontSize) + ;
+		' | text1=' + loForm.ct1.grid_registratura.Columns(1).Text1.FontName + ;
+		' ' + TRANSFORM(loForm.ct1.grid_registratura.Columns(1).Text1.FontSize)
+	loForm.ct1.Visible = .T.
+	DO tlog WITH 'nireg (contor afisat)=' + TRANSFORM(loForm.ct1.nireg)
+ELSE
+	DO tlog WITH 'ESEC: ct_registratura NU s-a instantiat'
+ENDIF
+loForm.Release()
+
+* 3) instantierea zonei partener/nr/data (ct_part_nr_data)
+DO tlog WITH '--- Test 3: instantiere ct_part_nr_data'
+loForm = CREATEOBJECT('Form')
+loForm.Visible = .F.
+loForm.AddObject('ct2', 'ct_part_nr_data')
+IF VARTYPE(loForm.ct2) = 'O'
+	DO tlog WITH 'OK ct_part_nr_data; llock=' + TRANSFORM(loForm.ct2.llock) + ;
+		' buton="' + loForm.ct2.Command2.Caption + '"' + ;
+		' txtClient.ReadOnly=' + TRANSFORM(loForm.ct2.txtClient.ReadOnly) + ;
+		' font txtClient=' + loForm.ct2.txtClient.FontName + ;
+		' ' + TRANSFORM(loForm.ct2.txtClient.FontSize)
+	* deblocare/blocare campuri - nu ating baza
+	loForm.ct2.deblocheaza_campuri()
+	DO tlog WITH 'dupa deblocheaza_campuri: txtNumar.ReadOnly=' + TRANSFORM(loForm.ct2.txtNumar.ReadOnly)
+	loForm.ct2.blocheaza_campuri()
+	DO tlog WITH 'dupa blocheaza_campuri: txtNumar.ReadOnly=' + TRANSFORM(loForm.ct2.txtNumar.ReadOnly)
+ELSE
+	DO tlog WITH 'ESEC: ct_part_nr_data NU s-a instantiat'
+ENDIF
+loForm.Release()
+
+DO tlog WITH '=== FINAL test_registratura_form'
+DO tfinal
+
+PROCEDURE tlog
+	LPARAMETERS tcMsg
+	STRTOFILE(TRANSFORM(tcMsg) + CHR(13)+CHR(10), gcTestLog, 1)
+ENDPROC
+
+PROCEDURE tfinal
+	ON ERROR
+	CLOSE ALL
+	QUIT
+ENDPROC

Teste/test_registratura_ui.prg

@@ -0,0 +1,193 @@
+* test_registratura_ui.prg
+* Test UI VIZUAL (harness + screenshots): fluxul REAL al utilizatorului in fereastra
+* principala (Ferestre\fundal.scx) - lista documentelor, adaugare cu intrare directa
+* in editare (M3), fara prompt de salvare la bara laterala (M2), refuz elegant la
+* partener NULL (M1/M2), salvare + editare reala, filtrul "ultimul document" (M4),
+* fonturi Arial 10 (M5).
+* Rulare cu capturi:
+*   powershell -File COMUN\utile\Teste\vfp_ui_harness.ps1 -TestPrg Teste\test_registratura_ui.prg ^
+*     -Steps @('lista','adaugare_editare_directa','bara_fara_prompt','salvare_fara_partener','salvare_cu_partener','editare','lista_ultimul')
+* Log:  Teste\test_registratura_ui_log.txt ; PNG: Teste\screenshots\
+* ATENTIE: doar pe schema de test (CENTRAL/MARIUSM_AUTO); documentul de test se sterge la final.
+
+SET SAFETY OFF
+SET TALK OFF
+
+PUBLIC gcUILog, gcSyncDir, gnMockRaspuns, gnPass, gnFail
+gcUILog  = 'D:\ROA\ROAREGISTRATURA\Teste\test_registratura_ui_log.txt'
+gcSyncDir = 'D:\ROA\ROAREGISTRATURA\Teste\uisync\'
+IF !DIRECTORY(gcSyncDir)
+	MD (gcSyncDir)
+ENDIF
+STORE 0 TO gnPass, gnFail
+gnMockRaspuns = 6
+
+* mock amessagebox PRIMUL in lista de proceduri (la nume duplicat castiga PRIMUL)
+SET PROCEDURE TO D:\ROA\ROAREGISTRATURA\COMUN\utile\Teste\mock_amessagebox.prg ADDITIVE
+SET PROCEDURE TO D:\ROA\ROAREGISTRATURA\COMUN\utile\Teste\ui_harness.prg ADDITIVE
+
+STRTOFILE('=== test_registratura_ui ' + TTOC(DATETIME()) + CHR(13)+CHR(10), gcUILog)
+
+ON ERROR DO HarnessLog WITH '*** EROARE ' + TRANSFORM(ERROR()) + ': ' + MESSAGE() + ;
+	' | ' + MESSAGE(1) + ' | prg=' + PROGRAM() + ' lin=' + TRANSFORM(LINENO())
+
+DO HarnessLog WITH 'Init mediu...'
+DO D:\ROA\ROAREGISTRATURA\Teste\test_init_env_registratura.prg
+IF TYPE('gnHandle') # 'N' OR gnHandle <= 0
+	DO HarnessLog WITH 'ESEC conectare - STOP'
+	DO HarnessDone WITH 'esec_conectare'
+	QUIT
+ENDIF
+DO HarnessLog WITH 'Conectat, schema=' + gcS
+
+* globale suplimentare cerute de fundal.scx / Show
+PUBLIC gcUserNameApp, primadata, goCw, goHelp, oTool
+gcUserNameApp = 'MARIUS M'
+primadata = .T.
+STORE '' TO goCw, goHelp, oTool
+
+* ------------- Pas 0: fereastra principala + lista (M4: doar ultimul document)
+DO viz_registratura IN oproceduri_roaregistratura.prg
+* NOSHOW: ocolesc Form.Show -> arata_meniu_fluna -> start_firma (init de aplicatie, nu de test);
+* Visible=.T. afiseaza formularul FARA sa ruleze metoda Show suprascrisa.
+DO FORM D:\ROA\ROAREGISTRATURA\Ferestre\fundal.scx NAME goFundal LINKED NOSHOW
+goFundal._pgfrmbase1.Page2.Ct_registratura1.do_initializeaza_cursor()
+goFundal.Visible = .T.
+goFundal.WindowState = 2
+goFundal._pgfrmbase1.ActivePage = 2
+DO verif WITH USED('cRegistratura') AND RECCOUNT('cRegistratura') = 1, ;
+	'M4: lista initiala contine DOAR ultimul document (reccount=' + TRANSFORM(RECCOUNT('cRegistratura')) + ')'
+SELECT cRegistratura
+GO TOP
+SCATTER NAME goRegistratura MEMO
+DO HarnessLog WITH 'Ultimul document afisat: id_reg=' + TRANSFORM(NVL(id_reg,0))
+LOCAL loGrid
+loGrid = goFundal._pgfrmbase1.Page2.Ct_registratura1.grid_registratura
+DO verif WITH loGrid.FontName == 'Arial' AND loGrid.FontSize = 10, ;
+	'M5: grid font=' + loGrid.FontName + ' ' + TRANSFORM(loGrid.FontSize)
+DO verif WITH loGrid.Columns(1).FontName == 'Arial' AND loGrid.Columns(1).FontSize = 10, ;
+	'M5: coloana1 font=' + loGrid.Columns(1).FontName + ' ' + TRANSFORM(loGrid.Columns(1).FontSize)
+DO verif WITH loGrid.Columns(1).Header1.FontName == 'Arial' AND loGrid.Columns(1).Header1.FontSize = 10, ;
+	'M5: header1 font=' + loGrid.Columns(1).Header1.FontName + ' ' + TRANSFORM(loGrid.Columns(1).Header1.FontSize)
+DO HarnessStep WITH 0, 'lista: doar ultimul document, fonturi Arial 10'
+
+* ------------- Pas 1: adaugare -> intra DIRECT in editare (M3)
+LOCAL lnId_reg, loPnd
+goFundal._pgfrmbase1.Page2.Ct_registratura1.But_nou1.Click()
+lnId_reg = goRegistratura.id_reg
+loPnd = goFundal._pgfrmbase1.Page3.ct_part_nr_data1
+DO verif WITH goFundal._pgfrmbase1.ActivePage = 3, ;
+	'M3: dupa adaugare s-a comutat pe Page3 (ActivePage=' + TRANSFORM(goFundal._pgfrmbase1.ActivePage) + ')'
+DO verif WITH !loPnd.llock, 'M3: documentul nou este DIRECT in editare (llock=' + TRANSFORM(loPnd.llock) + ')'
+DO verif WITH loPnd.Command2.Caption == 'Salveaza', ;
+	'M3: butonul arata "Salveaza" (caption=' + loPnd.Command2.Caption + ')'
+DO verif WITH !EMPTY(lnId_reg), 'Adaugare: id_reg nou=' + TRANSFORM(NVL(lnId_reg,0))
+DO verif WITH loPnd.txtClient.FontName == 'Arial' AND loPnd.txtClient.FontSize = 10, ;
+	'M5: txtClient font=' + loPnd.txtClient.FontName + ' ' + TRANSFORM(loPnd.txtClient.FontSize)
+DO HarnessStep WITH 1, 'adaugare: direct in editare, buton Salveaza'
+
+* ------------- Pas 2: click pe bara laterala cu partener NULL -> FARA prompt de salvare (M2)
+LOCAL lcLogInainte
+lcLogInainte = FILETOSTR(gcUILog)
+goFundal._pgfrmbase1.Page3.ct_date_generale1.outlook2003bar1.Panel.button3.Click()
+LOCAL lcLogNou
+lcLogNou = SUBSTR(FILETOSTR(gcUILog), LEN(lcLogInainte) + 1)
+DO verif WITH !('Doriti sa salvati' $ lcLogNou), ;
+	'M2: barei laterale NU i-a aparut promptul "Doriti sa salvati..." cu partener NULL'
+DO verif WITH !loPnd.llock, 'M2: raman in editare dupa click pe bara (llock=' + TRANSFORM(loPnd.llock) + ')'
+DO HarnessStep WITH 2, 'bara laterala: fara prompt, raman in editare'
+
+* ------------- Pas 3: Salveaza cu partener NULL -> refuz elegant (M1/M2)
+lcLogInainte = FILETOSTR(gcUILog)
+loPnd.Command2.Click()
+lcLogNou = SUBSTR(FILETOSTR(gcUILog), LEN(lcLogInainte) + 1)
+DO verif WITH ('Alegeti partenerul' $ lcLogNou), 'M2: mesaj "Alegeti partenerul!" la salvare fara partener'
+DO verif WITH !loPnd.llock AND loPnd.Command2.Caption == 'Salveaza', ;
+	'M2: campurile raman DEBLOCATE dupa refuz (llock=' + TRANSFORM(loPnd.llock) + ', caption=' + loPnd.Command2.Caption + ')'
+DO HarnessStep WITH 3, 'salvare fara partener: refuz, raman in editare'
+
+* ------------- Pas 4: aleg partener + Salveaza -> salvare reusita (M1/M2)
+LOCAL llSucces
+llSucces = goExecutor.oExecuta( ;
+	"select id_part, denumire from vregistratura where id_part is not null and rownum = 1", 'cPartTest')
+IF llSucces AND USED('cPartTest') AND RECCOUNT('cPartTest') > 0
+	SELECT cPartTest
+	goRegistratura.id_part = id_part
+	goRegistratura.denumire = denumire
+	USE IN cPartTest
+	goRegistratura.data = DATE()
+	goRegistratura.numar = 'TSTUI'
+	goRegistratura.descriere = 'TEST UI AUTOMAT'
+	goRegistratura.nr_pag = 1
+	loPnd.Refresh()
+	loPnd.Command2.Click()
+	DO verif WITH loPnd.llock AND loPnd.Command2.Caption == 'Modifica', ;
+		'M2: dupa salvare campurile sunt blocate (llock=' + TRANSFORM(loPnd.llock) + ', caption=' + loPnd.Command2.Caption + ')'
+	* verificare in baza
+	llSucces = goExecutor.oExecuta("select numar, descriere from vregistratura where id_reg = " + ;
+		ALLTRIM(STR(lnId_reg)), 'cVerif')
+	IF llSucces AND USED('cVerif') AND RECCOUNT('cVerif') > 0
+		SELECT cVerif
+		DO verif WITH ALLTRIM(NVL(numar,'')) == 'TSTUI', ;
+			'M1: salvarea a ajuns in baza (numar=' + TRANSFORM(NVL(numar,'')) + ')'
+		USE IN cVerif
+	ELSE
+		DO verif WITH .F., 'verificare in baza dupa salvare'
+	ENDIF
+ELSE
+	DO HarnessLog WITH 'SKIP Pas 4: niciun partener disponibil pe schema de test'
+ENDIF
+DO HarnessStep WITH 4, 'salvare cu partener: reusita, campuri blocate'
+
+* ------------- Pas 5: editare (Modifica -> schimb descriere -> Salveaza)
+loPnd.Command2.Click()   && Modifica -> deblocare
+DO verif WITH !loPnd.llock, 'Editare: campuri deblocate (llock=' + TRANSFORM(loPnd.llock) + ')'
+goRegistratura.descriere = 'TEST UI AUTOMAT - EDITAT'
+goRegistratura.nr_pag = 3
+loPnd.Command2.Click()   && Salveaza
+llSucces = goExecutor.oExecuta("select descriere, nr_pag from vregistratura where id_reg = " + ;
+	ALLTRIM(STR(lnId_reg)), 'cVerif2')
+IF llSucces AND USED('cVerif2') AND RECCOUNT('cVerif2') > 0
+	SELECT cVerif2
+	DO verif WITH ALLTRIM(NVL(descriere,'')) == 'TEST UI AUTOMAT - EDITAT' AND NVL(nr_pag,0) = 3, ;
+		'Editare: modificarile au ajuns in baza (descriere=' + ALLTRIM(NVL(descriere,'')) + ', nr_pag=' + TRANSFORM(NVL(nr_pag,0)) + ')'
+	USE IN cVerif2
+ELSE
+	DO verif WITH .F., 'verificare in baza dupa editare'
+ENDIF
+DO HarnessStep WITH 5, 'editare document: re-salvare verificata in baza'
+
+* ------------- Pas 6: inapoi pe lista -> tot ultimul document (M4 pe do_cauta/Page2.Activate)
+goFundal._pgfrmbase1.ActivePage = 2
+DO verif WITH RECCOUNT('cRegistratura') = 1, ;
+	'M4: revenirea pe lista pastreaza filtrul ultimului document (reccount=' + TRANSFORM(RECCOUNT('cRegistratura')) + ')'
+SELECT cRegistratura
+GO TOP
+DO verif WITH id_reg = lnId_reg, 'M4: ultimul document afisat este cel de test (id_reg=' + TRANSFORM(id_reg) + ')'
+DO HarnessStep WITH 6, 'lista dupa: doar documentul de test'
+
+* ------------- curatenie
+LOCAL lcSql, lnSucces
+lcSql = [begin pack_registratura.sterge_registratura(] + ALLTRIM(STR(lnId_reg)) + ;
+	[,] + ALLTRIM(STR(gnIdUtil)) + [); end;]
+lnSucces = goExecutor.oExecute(lcSql)
+DO HarnessLog WITH IIF(lnSucces < 0, ;
+	'ATENTIE: stergerea documentului de test a esuat - stergeti manual id_reg=' + TRANSFORM(lnId_reg), ;
+	'Curatenie OK: document de test sters (soft-delete), id_reg=' + TRANSFORM(lnId_reg))
+
+DO HarnessLog WITH '=== REZULTAT: PASS=' + TRANSFORM(gnPass) + ' FAIL=' + TRANSFORM(gnFail)
+DO HarnessDone WITH IIF(gnFail = 0, 'done', 'fail')
+ON ERROR
+CLOSE ALL
+QUIT
+
+PROCEDURE verif
+	LPARAMETERS tlOk, tcMsg
+	IF tlOk
+		gnPass = gnPass + 1
+		DO HarnessLog WITH 'PASS: ' + tcMsg
+	ELSE
+		gnFail = gnFail + 1
+		DO HarnessLog WITH 'FAIL: ' + tcMsg
+	ENDIF
+ENDPROC

Teste/test_repro_grid_firma_goala.prg

@@ -0,0 +1,79 @@
+* test_repro_grid_firma_goala.prg - repro headless: cursor cRegistratura pe firma goala
+* Rulare: vfp9.exe -A -T "D:\ROA\ROAREGISTRATURA\Teste\test_repro_grid_firma_goala.prg"
+LPARAMETERS tcParam
+PUBLIC gcLog
+gcLog = 'D:\ROA\ROAREGISTRATURA\Teste\log_repro_grid.txt'
+STRTOFILE('=== repro grid firma goala ' + TTOC(DATETIME()) + CHR(13)+CHR(10), gcLog)
+
+ON ERROR DO tlog WITH '*** EROARE ' + TRANSFORM(ERROR()) + ': ' + MESSAGE() + ;
+	' | prg=' + PROGRAM() + ' lin=' + TRANSFORM(LINENO())
+
+DO D:\ROA\ROAREGISTRATURA\Teste\test_init_env_registratura.prg
+IF TYPE('gnHandle') <> 'N' OR gnHandle <= 0
+	DO tlog WITH 'FAIL conectare'
+	QUIT
+ENDIF
+DO tlog WITH 'Conectat, handle=' + TRANSFORM(gnHandle)
+
+* faza 1: exact filtrul initial din viz_registratura, dar fortat GOL (simulare firma fara inregistrari)
+DO fa_cursor WITH [1=0], 'FAZA1(gol)'
+
+* faza 2: firma cu inregistrari (filtrul real initial)
+DO fa_cursor WITH [sters=0 and id_reg=(select max(id_reg) from vregistratura where sters=0)], 'FAZA2(plin)'
+
+* faza 3: din nou gol, apoi iar plin - stabilitate
+DO fa_cursor WITH [1=0], 'FAZA3(gol)'
+DO fa_cursor WITH [sters=0], 'FAZA4(toate)'
+
+ON ERROR
+QUIT
+
+PROCEDURE fa_cursor
+	LPARAMETERS tcFiltru, tcEticheta
+	DO tlog WITH '--- ' + tcEticheta + ' filtru: ' + tcFiltru
+	DO viz_registratura_test WITH tcFiltru
+	DO tlog WITH tcEticheta + ' USED=' + TRANSFORM(USED('cRegistratura')) + ;
+		' RECC=' + TRANSFORM(IIF(USED('cRegistratura'), RECCOUNT('cRegistratura'), -1)) + ;
+		' DBF=' + IIF(USED('cRegistratura'), DBF('cRegistratura'), '<inchis>')
+	IF USED('cRegistratura')
+		* capcana USE DBF() AGAIN pe cursor gol (folosita in decabaza.afisare)
+		LOCAL lcTmp
+		lcTmp = SYS(2015)
+		USE DBF('cRegistratura') IN 0 AGAIN SHARED ALIAS (lcTmp)
+		DO tlog WITH tcEticheta + ' USE-AGAIN=' + TRANSFORM(USED(lcTmp))
+		IF USED(lcTmp)
+			USE IN (lcTmp)
+		ENDIF
+	ENDIF
+	DO tlog WITH tcEticheta + ' poReg=' + TYPE('poReg')
+ENDPROC
+
+PROCEDURE viz_registratura_test
+	* copia lui viz_registratura cu filtru parametrizat
+	LPARAMETERS tcFiltru
+	LOCAL lcSchema, lcSelect, lcOrder, lcFiltru, lcFiltruOriginal, llAfiseaza, lcgroup, llModParam
+	lcSchema = [id_reg n(8), id_part n(10), denumire c(70), id_pers n(10), pers_contact c(70), data d, numar c(20), numar_intern c(20), data_intern d, ]+;
+		[descriere c(100), ie N(1), observatii M, ]+;
+		[id_fdoc n(5), fel_document c(30), id_mediu n(5), mediu_transmisie c(30), avizat n(1), ]+;
+		[util c(30), dataora t , ]+;
+		[utils c(30), dataoras t , ]+;
+		[util_avizat c(30), dataora_avizat t, are_obs N(1), are_link n(1), ]+;
+		[id_responsabil n(10), nresp c(70), nr_pag N(4), sters n(1),id_proiect n(10),proiect v(200)]
+	lcSelect = [select id_reg, id_part, denumire, id_pers, pers_contact, data, numar, numar_intern, data_intern, ]+;
+		[ descriere, ie, observatii, id_fdoc, fel_document, id_mediu, mediu_transmisie, avizat, ]+;
+		[ util, dataora, utils, dataoras, util_avizat, dataora_avizat, are_obs, are_link, id_responsabil, nresp, nr_pag, sters,id_proiect,proiect  ]+;
+		[from vregistratura]
+	lcOrder = []
+	lcgroup = []
+	lcFiltru = tcFiltru
+	lcFiltruOriginal = []
+	llModParam = .T.
+	llAfiseaza = .F.
+	gencursor('poReg','cRegistratura', lcSelect, lcFiltru, lcSchema, lcOrder, llAfiseaza,  lcgroup, llModParam, lcFiltruOriginal)
+	poReg.ca_baza1.afisare()
+ENDPROC
+
+PROCEDURE tlog
+	LPARAMETERS tcMsg
+	STRTOFILE(TRANSFORM(tcMsg) + CHR(13)+CHR(10), gcLog, 1)
+ENDPROC

changelog_roaRegistratura.txt

@@ -1,4 +1,20 @@
 <!-- 
+23/07/2026
+ROAREGISTRATURA - 2.0.5
+
+:modificare:
+  Dupa "Adauga", documentul nou intra direct in editare.
+
+:modificare:
+  Lista documentelor se deschide pe ultimul document inregistrat; lista completa se incarca la cautare.
+
+:modificare:
+  Fonturi uniformizate in lista documentelor, datele documentului si nomenclatorul de parteneri.
+
+:eroare:
+  Corectare erori la salvarea unui document fara partener ales.
+-->
+<!-- 
 27/02/2014
 ROAREGISTRATURA - 2.0.4
 

docs/analiza_registratura_adaugare_editare.md

@@ -0,0 +1,165 @@
+# Analiza: adaugare/editare document in registratura + lista documentelor + fonturi
+
+Data: 23.07.2026. Analiza pe surse (fara modificari de cod). Referintele de linie sunt in
+fisierele text FoxBin2Prg (`.vc2`), sincronizate cu binarele la data analizei.
+
+## 1. Fluxul actual (cum functioneaza azi)
+
+Fereastra principala (`ofundal_registratura.vc2`, clasa `pg_meniu_princ`):
+- **Page2 "Lista documentelor"** = `ct_registratura` (grid pe cursorul `cRegistratura`,
+  incarcat de `viz_registratura` din `Programe\oproceduri_roaregistratura.prg`).
+- **Page3 "Datele documentului"** = `ct_part_nr_data` (Partener / Nr. doc / Data doc +
+  butonul **Modifica/Salveaza** cu lacat) + `ct_date_generale` (bara outlook cu butoanele
+  Date generale / Referinte / Observatii / Documente atasate, care deschid formulare
+  separate `podg_dg`, `podg_referinte`, `podg_obs`, `podg_link`).
+- Starea editarii este `ct_part_nr_data.llock` (`.T.` = blocat). Butonul `Command2`
+  comuta: la deblocare afiseaza "Toate modificarile au efect imediat!", la a doua apasare
+  ("Salveaza") apeleaza `modifica_reg_dg`.
+- Salvarea reala e `modifica_reg_dg` (`oproceduri_roaregistratura.prg:100`) -> apel PL/SQL
+  `pack_registratura.modifica_registratura`.
+- Adaugarea (`ct_registratura.do_adauga`, `ferestre_registratura.vc2:1206`): aloca numar
+  intern (`oGeneratorNumere`, seria 10), insereaza un rand GOL prin
+  `pack_registratura.adauga_registratura`, apoi sare pe Page3. Documentul nou are
+  **id_part NULL** pana alege utilizatorul partenerul.
+
+## 2. Problemele identificate (cauze exacte)
+
+### P1. Prompt "Doriti sa salvati modificarile facute?" aparut "din senin"
+Doua locuri intreaba automat cand `llock = .F.`:
+- `outlook2003bar.vc2:1009` (`do_arata_formular`): **orice click pe un buton din bara
+  laterala** (Date generale, Referinte, Observatii, Documente atasate) intreaba si, la Da,
+  ruleaza `modifica_reg_dg`.
+- `ofundal_registratura.vc2:286` (`Page3.Deactivate`): la parasirea paginii, la fel.
+
+Deci scenariul raportat: utilizatorul apasa **Modifica** (deblocare), apoi navigheaza
+(ex. deschide sectiunea Date generale ca sa completeze campuri sau vrea partenerul) ->
+prompt de salvare -> Da -> eroare, pentru ca documentul nou are partener NULL.
+
+### P2. Eroarea la partener NULL
+`modifica_reg_dg`, linia 111:
+```
+lcId_part = Alltrim(Str(loRegistratura.id_part))   && fara NVL!
+```
+`Str(.NULL.)` -> NULL, concatenarea in `lcSql` propaga NULL -> `goExecutor.oExecute(NULL)`
+-> eroare. Aceeasi problema potentiala: `lcNr_pag` (linia 123, fara NVL) si `Dtos()` pe
+date NULL (liniile 114/116 dau sir gol la NULL — tratat in IIF, ok).
+
+Validarea de partener exista **doar** in `Command2.Click` (ramura Salveaza,
+`ferestre_registratura.vc2:332`), dar:
+- ruleaza DUPA ce campurile au fost deja blocate si caption-ul pus pe "Modifica"
+  (stare inconsistenta: mesaj "Alegeti partenerul!", dar formularul ramane blocat si
+  nesalvat);
+- celelalte doua puncte de salvare (P1) NU au deloc validarea.
+
+### P3. Flux confuz Modifica/Salveaza
+- Mesajul de la deblocare ("Toate modificarile au efect imediat!") e fals: modificarile de
+  date generale se salveaza doar la "Salveaza"/prompt; doar `ck_avizat.Valid` scrie imediat.
+- Dupa adaugare (`do_adauga`) documentul nou apare pe Page3 **blocat**: utilizatorul mai
+  trebuie sa apese Modifica inainte sa poata alege partenerul — pas inutil si sursa
+  promptului din P1.
+- Raspunsul "Nu" la prompt arunca modificarile fara re-citirea datelor originale:
+  `goRegistratura` ramane cu valorile editate (afisare inselatoare pana la refresh).
+
+### P4. Lista documentelor: incarcare integrala + pozitionare pe primul
+- `viz_registratura` incarca TOATE inregistrarile cu `sters=0` din `vregistratura`
+  (fara filtru initial pe ultimul document), apoi `Go Top` -> se vede inceputul bazei.
+- `Page2.Activate` apeleaza `do_cauta()` la fiecare activare; fara bife, filtrul devine
+  `STERS=0` -> reincarcare integrala la fiecare revenire pe lista.
+
+### P5. Fonturi
+- Clasele COMUN de baza (`_baza.vcx`: `_textbox`, `_label`, `_checkbox`, `_grid` etc.)
+  au deja **Arial 10** — controalele derivate din ele sunt OK.
+- In proiect insa:
+  - `ferestre_registratura.vc2`: **75 aparitii** `FontName = "Arial Narrow"` (gridul
+    `grid_registratura` + toate coloanele/headerele/text-urile, checkbox-urile de filtru);
+  - `onom_clienti.vc2`: **79 aparitii**;
+  - `ct_part_nr_data`, `ct_date_generale` si mare parte din `frm_dg_date_generale` folosesc
+    controale **baseclass VFP** (textbox/label/checkbox/commandbutton fara clasa COMUN)
+    fara FontName -> mostenesc fontul formului sau raman pe default (Arial 9).
+
+### P6. Alte observatii (fragilitate, de semnalat)
+- `Ck_tipdoc` e legat de classlib `..\..\roacont\comun\clase\caut_ora.vcx` (referinta
+  cross-proiect catre ROACONT, nu COMUN-ul propriu) — `ferestre_registratura.vc2:589`.
+- `cmdFel_document`/`cmdNresp`/etc. au Picture din `..\..\roacontracte\grafice\find.bmp`
+  (alt proiect).
+- Proiectul nu a mai fost recompilat de mult cu COMUN-ul curent -> build necesar in VFP9
+  IDE dupa aplicarea modificarilor.
+
+## 3. Modificari propuse (minime, in ordinea prioritatii)
+
+### M1. `modifica_reg_dg` — garda si NVL (oproceduri_roaregistratura.prg)
+- La inceput: daca `Isnull(toRegistratura.id_part) Or Empty(toRegistratura.id_part)` ->
+  `AMESSAGEBOX('Alegeti partenerul inainte de salvare!')` si `Return .F.`.
+- `lcId_part`/`lcNr_pag` cu `Nvl(...)`; functia sa intoarca `.T./.F.` (succes), ca apelantii
+  sa poata reactiona.
+
+### M2. Punct unic de salvare + prompt doar cand exista partener
+- In `do_arata_formular` (outlook2003bar) si `Page3.Deactivate`: daca `llock=.F.` si
+  `id_part` NULL -> mesaj "Alegeti partenerul!" si **fara** apel `modifica_reg_dg`
+  (raman in editare in cazul barei laterale; la Deactivate se renunta explicit).
+- In `Command2.Click` (Salveaza): validarea partenerului INAINTE de `blocheaza_campuri()`;
+  se blocheaza doar dupa salvarea reusita.
+
+### M3. Dupa adaugare, intra direct in editare
+In `do_adauga` / la comutarea pe Page3 pentru document nou: `llock=.F.`,
+`deblocheaza_campuri()` (inclusiv pe formularele podg_* deschise) si focus pe
+`cmdDenumire` -> utilizatorul alege direct partenerul, fara pasul Modifica.
+Se elimina si mesajul fals "Toate modificarile au efect imediat!" (sau se inlocuieste cu
+"Apasati Salveaza pentru a pastra modificarile").
+
+### M4. Lista: initial doar ultimul document
+- `viz_registratura` primeste filtrul initial:
+  `sters=0 and id_reg = (select max(id_reg) from vregistratura where sters=0)`
+  (de validat sintaxa cu gencursor la implementare; alternativ ordonare desc + `rownum=1`).
+- `do_cauta`: daca nicio bifa de filtru nu e activa, pastreaza filtrul "ultimul document"
+  in loc de `STERS=0` (incarcare integrala doar la cautare explicita).
+- Dupa incarcare: pozitionare pe ultimul (unicul) rand -> martor pentru ultimul numar
+  de inregistrare.
+
+### M5. Fonturi Arial 10 — prin rebazare pe clasele din `_baza.vcx` (decizie Marius)
+- Controalele **baseclass VFP** din proiect se rebazeaza pe clasele COMUN care au deja
+  Arial 10: `textbox` -> `_textbox`, `label` -> `_label`, `checkbox` -> `_checkbox`,
+  `commandbutton` -> `_commandbutton`, `optiongroup` -> `_optiongrup`
+  (toate `OF "..\comun\clase\_baza.vcx"`). Vizate: `ct_part_nr_data` (txtClient,
+  txtNumar, txtData_ctr, cmdDenumire, Command2, Label3/4/9), `frm_dg_date_generale`
+  (txt*, cmd*, Label*, ck_avizat, optIE) si textele/checkbox-urile din coloanele
+  gridului `grid_registratura`.
+- Se ELIMINA suprascrierile explicite `FontName = "Arial Narrow"` (75 in
+  `ferestre_registratura.vc2`, 79 in `onom_clienti.vc2`), astfel incat controalele sa
+  mosteneasca Arial 10 din clasele de baza; gridul (`_grdrow` din `_grd_base.vcx`)
+  ramane pe mostenirea lui odata scoase suprascrierile.
+- Controalele deja derivate din COMUN (`_lbbase`, `but_*`, `clb_tx_simplu`,
+  `ck_filtru_*` etc.) raman neatinse.
+- Atentie la latimi: Arial e mai lat ca Arial Narrow — de verificat vizual coloanele
+  gridului si etichetele dupa schimbare (conventie_ux_formulare.md).
+- Nota tehnica: rebazarea se face in textul `.vc2` (schimbarea `AS <clasa>` +
+  `ClassLib` in markerul `END OBJECT`), cu fidelity-check la write-back; e o
+  modificare mai invaziva decat schimbarea de font per control — de testat intai pe
+  un singur control, apoi extins.
+
+### M6. Recompilare
+Dupa aplicarea M1–M5: BUILD proiect in VFP9 IDE (recompilare cu COMUN-ul curent),
+apoi `git_sync` si commit (dupa aprobarea diff-urilor).
+
+## 4. Testare
+
+Scripturi noi in `Teste\` (rulare headless `vfp9.exe -A -T`, log in `Teste\log_*.txt`,
+mediu CENTRAL / MARIUSM_AUTO conform reguli_lucru.md):
+- `test_init_env_registratura.prg` — init mediu neinteractiv pentru ROAREGISTRATURA
+  (SET PATH/CLASSLIB/PROCEDURE preluate din `Programe\roaregistratura.prg`).
+- `test_registratura_form.prg` — incarca cursorul listei (`viz_registratura`),
+  verifica existenta cursorului, numarul de inregistrari si pozitionarea pe ultimul
+  document; instantiaza containerul `ct_registratura` pe un form ascuns.
+- `test_registratura_adaugare.prg` — fluxul de adaugare SI editare: alocare numar intern,
+  `adauga_registratura`, apoi `modifica_reg_dg` cu partener NULL (se asteapta eroare/refuz
+  — reproduce bugul P2), cu partener valid (se asteapta succes), apoi EDITAREA
+  documentului (modificare descriere/nr_pag/data + re-salvare + verificare in baza —
+  fluxul Modifica -> Salveaza).
+
+NOTA: scripturile NU se ruleaza pe baza de productie (JCSSERVER/CONTAFIN_ORACLE).
+Daca schema de test nu contine `pack_registratura`, testele de adaugare logheaza eroarea
+si se opresc curat (fara scrieri partiale).
+
+## 5. Ce urmeaza
+Dupa aprobare, implementarea se livreaza ca diff-uri pe fisierele text
+(`docs\diff_runda1_*.patch`), write-back cu `txt2vcx.ps1` doar dupa OK.

roaRegistratura.pj2

@@ -25,7 +25,7 @@ _LegalTrademark = ""
 _ProductName = " ROA - Registratura"
 _MajorVer = "2"
 _MinorVer = "0"
-_Revision = "4"
+_Revision = "5"
 _LanguageID = "Romana"
 _AutoIncrement = "0"
 *</DevInfo>
@@ -49,53 +49,47 @@ MODIFY PROJECT 'roaRegistratura.pjx' NOWAIT NOSHOW NOPROJECTHOOK
 loProject = _VFP.Projects('roaRegistratura.pjx')
 
 WITH loProject.FILES
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_app.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\bottom.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_app.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\bottom.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\browse.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_crypt.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\browse.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_gdiplus.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\copy.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_menu.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\copy.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_reports.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\cut.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_reports.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\cut.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_table.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\filter.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_table.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\filter.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_ui.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\help.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\_ui.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\new.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\ffc\setobjrf.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\next.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\_framewk.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\next.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\_framewk.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\open.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\bottom.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\paste.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\bottom.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\paste.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\browse.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\previous.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\browse.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\previous.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\copy.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\print.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\copy.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\revert.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\cut.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\revert.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\cut.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\save.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\filter.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\save.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\filter.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\sortasc.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\help.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\sortasc.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\help.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\sortdes.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\new.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\sortdes.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\next.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\top.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\next.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('c:\program files (x86)\microsoft visual foxpro 9\wizards\graphics\top.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\open.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_app.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\paste.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_app.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\paste.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\previous.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_framewk.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\previous.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_framewk.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\print.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_reports.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\print.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_reports.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\revert.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_table.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\revert.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_table.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\save.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_ui.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\save.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('clase\_ui.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\sortasc.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\sortasc.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\sortdes.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\sortdes.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\top.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('c:\program files\microsoft visual foxpro 9\wizards\graphics\top.msk')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('clase\ferestre_registratura.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('clase\ofundal_registratura.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('clase\outlook2003bar.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
@@ -108,6 +102,7 @@ WITH loProject.FILES
 	.ADD('comun\clase\_ca_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_cb_base.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_cmd_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\clase\_crypt.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_ct_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_cus_odata_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_de_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
@@ -118,6 +113,7 @@ WITH loProject.FILES
 	.ADD('comun\clase\_gdiplus.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_grd_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_lb_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\clase\_menu.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_pf_base.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_therm.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\_tx_base.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
@@ -129,6 +125,7 @@ WITH loProject.FILES
 	.ADD('comun\clase\caut_ora.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\cauta_alfa_forms.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\cautare.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\clase\chatbot.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\clase\cmd_butoane.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\crypto.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\clase\decabaza.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
@@ -189,11 +186,13 @@ WITH loProject.FILES
 	.ADD('comun\grafice\excel_jos.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\excel_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\exclam.ico')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('comun\grafice\factura1.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\find_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\foxqstrt.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\furn1.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\furn2.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\grafic_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('comun\grafice\help.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\help\_disabled_help.ico')		&& *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\help_jos.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\help_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
@@ -266,6 +265,7 @@ WITH loProject.FILES
 	.ADD('comun\grafice\pericol.ico')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\precedent1.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\precedent2.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('comun\grafice\print.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\rc1.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\rc2.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\refac_jos.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
@@ -277,6 +277,7 @@ WITH loProject.FILES
 	.ADD('comun\grafice\renunt_jos.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\renunt_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\reset_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="1250" Timestamp="0" ID="0" ObjRev="0" User="" />
+	.ADD('comun\grafice\retur1.bmp')		&& *< FileMetadata: Type="x" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\rv1.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\rv2.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\grafice\save_sus.bmp')		&& *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
@@ -328,6 +329,7 @@ WITH loProject.FILES
 	.ADD('comun\programe\oproceduri_maintenance.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\oproceduri_parteneri.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\orap_terti_comun.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\programe\orapoarte.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\orefaceri.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\oscrie_in_fisiere.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\osecurity.prg')		&& *< FileMetadata: Type="P" Cpid="1250" Timestamp="0" ID="0" ObjRev="544" User="" />
@@ -339,11 +341,20 @@ WITH loProject.FILES
 	.ADD('comun\programe\proceduri_excel.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\procese.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\quitapp.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\programe\setobjrf.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\update_roadef_sal.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\updateserver.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\version.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\xmlaccess.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\programe\xmlparser.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_api.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_classes.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_contextmenu.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_functions.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_progressbar.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_structures.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
+	.ADD('comun\utile\ctl32\ctl32_vfp2c32.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\utile\hpdf\_libpdf.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\utile\hpdf\build_err_msgs.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\utile\hpdf\hpdf_consts.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
@@ -351,7 +362,6 @@ WITH loProject.FILES
 	.ADD('comun\utile\hpdf\pdflistener.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\utile\hpdf\pdflistener.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\utile\hpdf\reportoutput\_reportoutputconfig.dbf')		&& *< FileMetadata: Type="D" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" />
-	.ADD('comun\utile\hpdf\reportoutput\ctl32_progressbar.vcx')		&& *< FileMetadata: Type="V" Cpid="0" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\utile\hpdf\reportoutput\foxpro_reporting.h')		&& *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
 	.ADD('comun\utile\hpdf\reportoutput\frxoutput.prg')		&& *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
 	.ADD('comun\utile\hpdf\reportoutput\listener.vcx')		&& *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
@@ -447,11 +457,11 @@ WITH loProject.FILES
 	*</ExcludedFiles>
 
 	*<TextFiles>
-	.ITEM("c:\program files\microsoft visual foxpro 9\ffc\_app.h").Type = 'T'
+	.ITEM("clase\_app.h").Type = 'T'
-	.ITEM("c:\program files\microsoft visual foxpro 9\ffc\_reports.h").Type = 'T'
+	.ITEM("clase\_framewk.h").Type = 'T'
-	.ITEM("c:\program files\microsoft visual foxpro 9\ffc\_table.h").Type = 'T'
+	.ITEM("clase\_reports.h").Type = 'T'
-	.ITEM("c:\program files\microsoft visual foxpro 9\ffc\_ui.h").Type = 'T'
+	.ITEM("clase\_table.h").Type = 'T'
-	.ITEM("c:\program files\microsoft visual foxpro 9\wizards\_framewk.h").Type = 'T'
+	.ITEM("clase\_ui.h").Type = 'T'
 	.ITEM("comun\clase\reportlisteners.h").Type = 'T'
 	.ITEM("comun\include\security.h").Type = 'T'
 	.ITEM("comun\utile\hpdf\hpdf_consts.h").Type = 'T'