Corretta gestione soci per attuale/precedente

git-svn-id: svn://10.65.10.50/trunk@933 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-01-30 12:33:10 +00:00
parent 1800f0a901
commit 2f22c04f7c
2 changed files with 2 additions and 1 deletions

View File

@ -65,6 +65,7 @@ void TSoci_application::update_ap_socio(const TMask& m)
else err = _rel->write();
if (err != NOERR)
message_box(format("Aggiornamento socio %s - Errore : %d", ap == "A" ? "attuale" : "precedente", err));
get_relation()->restore_status();
}
}

View File

@ -77,7 +77,7 @@ BEGIN
USE LF_SOCI KEY 1
JOIN LF_ANAG TO LF_SOCI KEY 1 INTO TIPOA=TIPOASOC CODANAGR=CODANAGRSO
INPUT CODDITTA FLD_SC1_CODDITTA SELECT
INPUT ATTPREV FLD_SC1_ANNO SELECT
INPUT ATTPREC FLD_SC1_ANNO SELECT
INPUT TIPOASOC LST_SC1_TIPOASOC
INPUT CODANAGRSO FLD_SC1_CODANAGRSO
DISPLAY "Tipo" TIPOASOC