Corretto MI3272, relativo alla cancellazione dei files *.dta e *.ndx

presenti nei direttori COM e ditta.


git-svn-id: svn://10.65.10.50/trunk@3705 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-10-04 07:59:19 +00:00
parent e0801e00d5
commit 8519d1d975

View File

@ -181,6 +181,7 @@ public:
void convert_saldi() const;
void convert_ca7_ql() const;
void convert_tabiva() const;
void remove_dta_ndx() const;
TConversione_archivi() : _oldditta(0), _codditta(0), _error(0) {}
};
@ -290,6 +291,7 @@ bool TConversione_archivi::menu(MENU_TAG)
convert_ca7_ql();
break;
case 12:
remove_dta_ndx();
if (_codditta == 0)
convert_forms();
else
@ -1103,6 +1105,23 @@ void TConversione_archivi::convert_tabiva() const
}
}
void TConversione_archivi::remove_dta_ndx() const
{
TToken_string list;
TString s;
for (int j = 0; j < 2; j++)
{
s = firm2dir(_codditta);
s << "/" ;
s << (j == 0 ? "*.dta" : "*.ndx");
list = s;
const int items = list_files(list);
for (int i=0; i<items;i++)
remove(list.get(i));
}
}
void TConversione_archivi::convert_forms() const
// Converte i profili, aggiungendo il valore dell'offset verticale. Solo
// per i forms != PEC