root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 1.7 at

Browse Source 
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
1 changed files with 20 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
at/at0300.cpp
View File

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