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

Patch level : 12.0 420

Browse Source 
Files correlati     : 
Commento            : 
Programma:
- Sistemato errore svuotamento tabella DTR
- Tolti commenti e corretta chiamata TAnagrafica
- Sistemata cacata intergalattica per tipo cf
- Disabilitato calcolo data iniziale, da problemi e non è calcolabile

git-svn-id: svn://10.65.10.50/branches/R_10_00@23944 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
mtollari 2017-07-14 10:49:00 +00:00
parent 8de918c4ae
commit 847f80825c
2 changed files with 14 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/tf/tf0100.cpp
View File

@ -904,7 +904,7 @@ bool TTrFa_app::tff0100(TSheet_field& sheet)
{ {
if(yesno_box(msg)) if(yesno_box(msg))
{ {
if(!emptyTables(DTE_PROVV)) if(!emptyTables(DTR_PROVV))
{ {
error_box("Fallita eliminazione record!!!"); error_box("Fallita eliminazione record!!!");
return false; return false;
@ -976,8 +976,6 @@ bool TTrFa_app::tff0200(TString key)
if(r_ana.get_char("TIPORFSO") == 'S') // Stabile Organizzazione if(r_ana.get_char("TIPORFSO") == 'S') // Stabile Organizzazione
{ {
TAnagrafica rfso(r_ana); TAnagrafica rfso(r_ana);
//TAnagrafica rfso(LF_ANAG, myrfso[0], myrfso.sub(1));
TString via = rfso.via_residenza(), cap = rfso.CAP_residenza(), nazione = rfso.stato_residenzaISO(); TString via = rfso.via_residenza(), cap = rfso.CAP_residenza(), nazione = rfso.stato_residenzaISO();
tff0200f.set("P2_STABORGIND", via); tff0200f.set("P2_STABORGIND", via);
@ -1047,8 +1045,10 @@ bool TTrFa_app::tff0400(TSheet_field& sheet)
else else
continue; continue;
TRectype r_cedeprest = getCli(strarr->get(_tipocf), strarr->get(_codcf), strarr->get(_occas)); TVariant tipocf = strarr->get(_tipocf), codcf = strarr->get(_codcf), occas = strarr->get(_occas);
TAnagrafica cedeprest(r_cedeprest);
TRectype r_cedeprest = getCli(tipocf.as_string(), codcf.as_string(), occas.as_string());
TAnagrafica cedeprest(tipocf.as_string()[0], codcf.as_int(), occas.as_string());
TTrFa_record tff0400f("TFF0400F"); TTrFa_record tff0400f("TFF0400F");
tff0400f.set("P4_KEYPRGINVIO", getKey(strarr)); tff0400f.set("P4_KEYPRGINVIO", getKey(strarr));
@ -1082,7 +1082,7 @@ bool TTrFa_app::tff0400(TSheet_field& sheet)
} }
// Sono sicuro che se è di tipo 3,7 o 8 ha la ragione sociale // Sono sicuro che se è di tipo 3,7 o 8 ha la ragione sociale
char tipo = r_cedeprest.exist(CLI_ALLEG) ? r_cedeprest.get_char(CLI_ALLEG) : '\0'; char tipo = r_cedeprest.get_char(CLI_ALLEG);
bool rsoc = cedeprest.giuridica() || (tipo == '3' || tipo == '7' || tipo == '8'); bool rsoc = cedeprest.giuridica() || (tipo == '3' || tipo == '7' || tipo == '8');
bool privato = tipo == '6'; bool privato = tipo == '6';
@ -1363,8 +1363,9 @@ void TTrFa_app::main_loop()
while (msk.run() == K_ENTER) while (msk.run() == K_ENTER)
{ {
if(msk.checkNotEmpty() && send(&msk)) if(msk.checkNotEmpty())
ini_set_string(CONFIG_DITTA, "tf", "LastSend", ++TDate(msk.get(F_DATAFIN))); send(&msk);
//ini_set_string(CONFIG_DITTA, "tf", "LastSend", ++TDate(msk.get(F_DATAFIN)));
} }
} }

7
src/tf/tf0101.cpp
View File

@ -32,10 +32,6 @@ bool TTrFa_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{ {
switch (o.dlg()) switch (o.dlg())
{ {
case F_DATAINI:
if (e == fe_init)
o.set(ini_get_string(CONFIG_DITTA, "tf", "LastSend", "01-01-2017"));
break;
case F_DATAFIN: case F_DATAFIN:
if (e == fe_init) if (e == fe_init)
o.set(TDate(TODAY)); o.set(TDate(TODAY));
@ -317,6 +313,7 @@ void TTrFa_mask::openJava()
DIRECTORY old_dir; xvt_fsys_get_dir(&old_dir); DIRECTORY old_dir; xvt_fsys_get_dir(&old_dir);
DIRECTORY new_dir; xvt_fsys_convert_str_to_dir(tmp.path(), &new_dir); DIRECTORY new_dir; xvt_fsys_convert_str_to_dir(tmp.path(), &new_dir);
xvt_fsys_set_dir(&new_dir); xvt_fsys_set_dir(&new_dir);
const bool good = goto_url(tmp); const bool good = goto_url(tmp);
if (good) if (good)
{ {
@ -326,7 +323,7 @@ void TTrFa_mask::openJava()
{ {
error_box(FR("Impossibile eseguire Java -jar %s"), (const char*)tmp); error_box(FR("Impossibile eseguire Java -jar %s"), (const char*)tmp);
} }
xvt_fsys_set_dir(&old_dir); xvt_fsys_set_dir(&old_dir);
} }
void TTrFa_mask::loadConfig() void TTrFa_mask::loadConfig()