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