Patch level : 1.7 at

Files correlati     : at0.exe
Ricompilazione Demo : [ ]
Commento            : in giornaliero controlli sistemato riceca per codice CT


git-svn-id: svn://10.65.10.50/trunk@12584 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2005-01-11 08:47:23 +00:00
parent d97d331e2a
commit 8090e8f2d5

View File

@ -205,17 +205,17 @@ int TGiornalieroC::write(TSheet_field& s)
int err = sog.read();
if (err == NOERR)
{
TString16 tipocon = row.get(3);
TString16 idon1 = row.get(4);
TString16 idon2 = row.get(5);
TString16 idon3 = row.get(6);
TString16 idon4 = row.get(7);
int intsi = row.get_int(8);
int intaf = row.get_int(9);
TString16 prosstipo = row.get(10);
TDate prossdata = row.get(11);
TString16 motivo = row.get(12);
TString80 resp = row.get(13);
TString16 tipocon = row.get(4);
TString16 idon1 = row.get(5);
TString16 idon2 = row.get(6);
TString16 idon3 = row.get(7);
TString16 idon4 = row.get(8);
int intsi = row.get_int(9);
int intaf = row.get_int(10);
TString16 prosstipo = row.get(11);
TDate prossdata = row.get(12);
TString16 motivo = row.get(13);
TString80 resp = row.get(14);
if (tipocon.blank())
tipocon = tipogen;
if (prosstipo.blank())
@ -385,9 +385,7 @@ bool TGiornalieroC::soggetti_notify(TSheet_field& s, int r, KEY k)
TLocalisamfile contsan(LF_CONTSAN);
contsan.setkey(2);
contsan.zero();
TDate datacon = row.get(5);
if (!datacon.ok())
datacon = s.mask().get_date(F_DATACON);
TDate datacon = s.mask().get_date(F_DATACON);
contsan.put(CON_DATACON,datacon);
contsan.put(CON_CODICE,codsog);
if (contsan.read() == NOERR)
@ -416,18 +414,18 @@ bool TGiornalieroC::soggetti_notify(TSheet_field& s, int r, KEY k)
}
}
}
TString16 tipocon = row.get(3);
TString16 tipocon = row.get(4);
if (tipocon.blank())
tipocon = s.mask().get(F_TIPOCON);
const char modstato = modstato_tcs(tipocon);
if ( modstato == 'I' || modstato == 'M')
{
TString16 idon1 = row.get(4);
TString16 idon2 = row.get(5);
TString16 idon3 = row.get(6);
TString16 idon4 = row.get(7);
int intsi = row.get_int(8);
int intaf = row.get_int(9);
TString16 idon1 = row.get(5);
TString16 idon2 = row.get(6);
TString16 idon3 = row.get(7);
TString16 idon4 = row.get(8);
int intsi = row.get_int(9);
int intaf = row.get_int(10);
if ((idon1.blank() && idon2.blank() && idon3.blank() && idon4.blank()) || (intsi==0 && intaf==0))
return s.sheet_mask().field(F_S_CODICE).error_box("Il soggetto non ha idoneita' precedenti; inserire idoneita' e intervalli");
}
@ -435,7 +433,7 @@ bool TGiornalieroC::soggetti_notify(TSheet_field& s, int r, KEY k)
}
else
{
const char* cognome = row.get(1);
const char* cognome = row.get(2);
if ((cognome != NULL) && (cognome != "\0"))
s.sheet_mask().field(F_S_NOME).set_focusdirty();
//s.set_focus_cell(r,2);