From 864a259b35ba0ecfd05421c361a029338e05cee1 Mon Sep 17 00:00:00 2001 From: cris Date: Mon, 11 Oct 2004 12:47:31 +0000 Subject: [PATCH] Patch level : 1.7 at Files correlati : at8.exe at8900a.ini Ricompilazione Demo : [ ] Commento : aggiunto trasferimentod a CETRAPLUS della disponibilita all'aferesi git-svn-id: svn://10.65.10.50/trunk@12385 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- at/at8900.cpp | 24 +++++++++++++++++++++++- at/at8900a.ini | 2 +- 2 files changed, 24 insertions(+), 2 deletions(-) diff --git a/at/at8900.cpp b/at/at8900.cpp index a30019dec..25d48119a 100755 --- a/at/at8900.cpp +++ b/at/at8900.cpp @@ -629,6 +629,29 @@ bool TCtpr2at::update_record(TRectype& record_at, TAssoc_array& record_ct) //aggiorna_controlli(); } } + else if (elab == "DISPONIBILE") // disponibilita + { + if (val == "NO") + { + record_at.put(SOG_DISP_AF_1, ""); + record_at.put(SOG_DISP_AF_2, ""); + } + else if (val == "PLA") + { + record_at.put(SOG_DISP_AF_1, "PL"); + record_at.put(SOG_DISP_AF_2, ""); + } + else if (val == "PLT") + { + record_at.put(SOG_DISP_AF_1, "PT"); + record_at.put(SOG_DISP_AF_2, ""); + } + else if (val == "SI") + { + record_at.put(SOG_DISP_AF_1, "PL"); + record_at.put(SOG_DISP_AF_2, "PT"); + } + } else if (elab == "SESSO") // sesso { if (val[0] == 'M') @@ -1095,7 +1118,6 @@ bool TCtpr2at::accesso(const TString& istruzione) { if (p_tipocon > p_tipoes) { - recc->put(CON_PROGCON,riga.get(CON_PROGCON)); _scontrolli->add_row(recc); insert = TRUE; diff --git a/at/at8900a.ini b/at/at8900a.ini index b66c2cefb..988e2ac5b 100755 --- a/at/at8900a.ini +++ b/at/at8900a.ini @@ -4,7 +4,7 @@ STATO = ID_ANAGRAFICA = CODCT STATO_TRASFUS = !_STATO STATO_LEGALE = -STATO_ASSOC = +STATO_ASSOC = !_DISPONIBILE COGNOME = NOME = SESSO = !_SESSO