sync SVN r18142

AGENTS.md

@@ -16,4 +16,5 @@ skill-ului.
 - garzi pe valori NULL din Oracle in VFP -> skill `roa-vfp-null-guards`
 - `GO` pe un `Recno()` capturat sau primit ca parametru -> skill `roa-vfp-go-recno`
 - procedura PL/SQL cu `SELECT ... INTO` apelata din VFP (randuri pierdute tacut) -> skill `roa-oracle-sqlexec-no-data`
+- inrolezi un calculator nou sau un proiect nou in fluxul git-text / expui skill-urile pe masina / aplici backstop-ul de rutare -> skill `roa-onboarding`
 <!-- roa-skills:end -->

CLAUDE.md

@@ -310,4 +310,5 @@ skill-ului.
 - garzi pe valori NULL din Oracle in VFP -> skill `roa-vfp-null-guards`
 - `GO` pe un `Recno()` capturat sau primit ca parametru -> skill `roa-vfp-go-recno`
 - procedura PL/SQL cu `SELECT ... INTO` apelata din VFP (randuri pierdute tacut) -> skill `roa-oracle-sqlexec-no-data`
+- inrolezi un calculator nou sau un proiect nou in fluxul git-text / expui skill-urile pe masina / aplici backstop-ul de rutare -> skill `roa-onboarding`
 <!-- roa-skills:end -->

Programe/oproceduri_import.prg

@@ -501,7 +501,7 @@ Define Class ExtrasBanca As Custom
 
 		* Solduri facturi deschise (401/4111 + extinderile 404/461/462; 419/4091-4094 doar pentru avans existent)
 		If This.lFactura
-			lcSqlSolduri = [select i.id_part, i.cont, i.acont, i.id_fact, max(i.nract) nract, min(i.dataact) dataact, ] + ;
+			lcSqlSolduri = [select i.id_part, i.cont, Nvl(i.acont, ' ') acont, i.id_fact, max(i.nract) nract, min(i.dataact) dataact, ] + ;
 				[max(i.id_valuta) id_valuta, sum(i.precdeb+i.debit-i.preccred-i.credit) sold ] + ;
 				[from ireg_parteneri i where i.an = ?gnAn and i.luna = ?gnLuna ] + ;
 				[and i.cont in ('401','4111','419','4091','4092','4093','4094','404','461','462') ] + ;
@@ -522,7 +522,7 @@ Define Class ExtrasBanca As Custom
 				Index On id_part Tag id_part
 				Use In (Select("cSolduriBrut"))
 			Endif
-			Create Cursor cAlocTemp (nrec I, npoz I, id_fact I, nract I, cont C(4), acont C(20), suma N(15, 2), csursa C(1))
+			Create Cursor cAlocTemp (nrec I, npoz I, id_fact I, nract I, cont C(4) Null, acont C(20) Null, suma N(15, 2), csursa C(1))
 		Endif
 
 		* Caut/creez parteneri
@@ -1251,8 +1251,8 @@ Procedure AplicaAlocareFactura
 	lnAlocat = Min(m.tnRest, ramas)
 	lnIdFact = id_fact
 	lnNract = nract
-	lcCont = Alltrim(Cont)
-	lcAcont = acont
+	lcCont = Alltrim(Nvl(Cont, ''))
+	lcAcont = Alltrim(Nvl(acont, ''))
 	tnNpoz = m.tnNpoz + 1
 	* campurile sursa (cSolduriFact) copiate in variabile - Insert Into rezolva numele necalificate pe cursorul tinta, nu pe cel curent
 	Insert Into cAlocTemp (nrec, npoz, id_fact, nract, cont, acont, suma, csursa) ;
@@ -2914,8 +2914,8 @@ Define Class ExtrasBanca_General As ExtrasBanca
 		USE IN (SELECT('cXLSXTmp'))
 		
 
-		UPDATE C_TMP_I SET data_v = TRANSFORM(ExcelSerialNumber2Date(INT(VAL(data_v)))) WHERE !('.'$data_v OR '/'$data_v)
-		UPDATE C_TMP_I SET data_t = TRANSFORM(ExcelSerialNumber2Date(INT(VAL(data_t)))) WHERE !('.'$data_v OR '/'$data_t)
+		UPDATE C_TMP_I SET data_v = TRANSFORM(ExcelSerialNumber2Date(INT(VAL(data_v)))) WHERE !('.'$data_v OR '/'$data_v OR '-'$data_v)
+		UPDATE C_TMP_I SET data_t = TRANSFORM(ExcelSerialNumber2Date(INT(VAL(data_t)))) WHERE !('.'$data_t OR '/'$data_t OR '-'$data_t)
 		Select C_TMP_I
 		Scan For !Empty(data_v)
 			Select c_iex

changelog_roacont.txt

@@ -1,3 +1,19 @@
+<!-- 
+16/09/2026
+ROACONT - 2.11.79
+
+:modificare:
+  Registru de banca in valuta. S-au corectat totalurile zilnice in raport.
+-->
+
+<!-- 
+16/09/2026
+ROACONT - 2.11.78
+
+:eroare:
+  Import extrase curieri. S-a corectat o eroare la import - cont analitic null si s-a tratat data din borderou in format aaaa-ll-zz.
+-->
+
 <!--
 15/09/2026
 ROACONT - 2.11.77

roacont.pj2

@@ -25,7 +25,7 @@ _LegalTrademark = ""
 _ProductName = "ROA - Financiar Contabilitate"
 _MajorVer = "2"
 _MinorVer = "11"
-_Revision = "77"
+_Revision = "79"
 _LanguageID = "Romana"
 _AutoIncrement = "0"
 *</DevInfo>