Rezolvat: mesajul "Cautarea nu a intors rezultate!" reaparea la nesfarsit pe firma fara inregistrari

do_cauta primeste plQuiet; apelul automat din Page2.Activate e silentios, mesajul ramane doar la cautarea explicita. Changelog 2.0.5 rescris minimal.

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_018H9za5A9Tk6wcLFof6seds
This commit is contained in:
2026-07-23 20:16:50 +03:00
parent 0c0bef5435
commit e54c230af6
4 changed files with 47 additions and 15 deletions

View File

@@ -0,0 +1,36 @@
diff --git a/Clase/ferestre_registratura.vc2.pre_runda2.bak b/Clase/ferestre_registratura.vc2
index d38ff69..3c34fd1 100644
--- a/Clase/ferestre_registratura.vc2.pre_runda2.bak
+++ b/Clase/ferestre_registratura.vc2
@@ -1170,6 +1170,7 @@ DEFINE CLASS ct_registratura AS _ctfrmbase OF "..\comun\clase\_ct_base.vcx"
ENDPROC
PROCEDURE do_cauta
+ Lparameters plQuiet
Local lcFiltru
lcFiltru = ""
@@ -1212,7 +1213,9 @@ DEFINE CLASS ct_registratura AS _ctfrmbase OF "..\comun\clase\_ct_base.vcx"
This.actualizeaza_grid1(lcFiltru)
If Reccount('cRegistratura')=0
- aMessagebox("Cautarea nu a intors rezultate!",0+48,"Info cautare")
+ If !plQuiet
+ aMessagebox("Cautarea nu a intors rezultate!",0+48,"Info cautare")
+ Endif
Select cRegistratura
Scatter Name goRegistratura Memo Blank
diff --git a/Clase/ofundal_registratura.vc2.pre_runda2.bak b/Clase/ofundal_registratura.vc2
index 0fdd7a9..d76c20f 100644
--- a/Clase/ofundal_registratura.vc2.pre_runda2.bak
+++ b/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