Patch level : 10.0
Files correlati : bacnv Ricompilazione Demo : [ ] Commento : Aggiunte barre di progresso a conversione IV direttiva CEE git-svn-id: svn://10.65.10.50/trunk@19314 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
145ecbff09
commit
2db3591554
83
ba/bacnv.cpp
83
ba/bacnv.cpp
@ -1865,56 +1865,51 @@ void TConversione_archivi::convert_clifo_privati()
|
||||
|
||||
void TConversione_archivi::convert_pcon_ivd()
|
||||
{
|
||||
long firm = get_firm();
|
||||
TString pref;
|
||||
const long firm = get_firm();
|
||||
const TString pref = firm == 0 ? prefix().name() : "";
|
||||
|
||||
if (firm == 0)
|
||||
pref = prefix().name();
|
||||
TPointer_array firms;
|
||||
prefix().firms(firms);
|
||||
|
||||
TLocalisamfile ditte(LF_NDITTE);
|
||||
|
||||
for (ditte.first(); !ditte.eof(); ditte.next())
|
||||
TProgind pf(firms.items(), "Conversione Codici IV Direttiva CEE");
|
||||
for (int f = 0; f < firms.items(); f++)
|
||||
{
|
||||
const long codditta = ditte.get_long("CODDITTA");
|
||||
|
||||
if (prefix().exist(codditta))
|
||||
{
|
||||
set_firm(codditta);
|
||||
|
||||
{
|
||||
TRelation rel(LF_PCON);
|
||||
TRectype& curr = rel.curr();
|
||||
if (!pf.addstatus(1))
|
||||
break;
|
||||
const long codditta = firms.get_long(f);
|
||||
if (set_firm(codditta))
|
||||
{
|
||||
TRelation rel(LF_PCON);
|
||||
TRectype& curr = rel.curr();
|
||||
|
||||
TCursor cursore(&rel);
|
||||
const long items = cursore.items();
|
||||
cursore.freeze();
|
||||
TCursor cursore(&rel);
|
||||
const long items = cursore.items();
|
||||
cursore.freeze();
|
||||
|
||||
TProgind pi(items, "Conversione Codici IV Direttiva CEE..", FALSE, TRUE);
|
||||
|
||||
for (cursore=0; cursore.pos()<items; ++cursore)
|
||||
{
|
||||
pi.addstatus(1);
|
||||
TString16 numivd = curr.get(PCN_NUMIVD);
|
||||
bool rew = false;
|
||||
|
||||
if (numivd.len() == 1)
|
||||
{
|
||||
numivd.insert("0");
|
||||
curr.put(PCN_NUMIVD, numivd);
|
||||
rew = true;
|
||||
}
|
||||
|
||||
TString16 numivdopp = curr.get(PCN_NUMIVDOPP);
|
||||
|
||||
if (numivdopp.len() == 1)
|
||||
{
|
||||
numivdopp.insert("0");
|
||||
curr.put(PCN_NUMIVDOPP, numivdopp);
|
||||
rew = true;
|
||||
}
|
||||
if (rew)
|
||||
rel.rewrite();
|
||||
TProgind pi(items, "Scansione piano dei conti");
|
||||
for (cursore=0; cursore.pos()<items; ++cursore)
|
||||
{
|
||||
if (!pi.addstatus(1))
|
||||
break;
|
||||
|
||||
TString8 numivd = curr.get(PCN_NUMIVD);
|
||||
bool rew = false;
|
||||
if (numivd.len() == 1)
|
||||
{
|
||||
numivd.insert("0");
|
||||
curr.put(PCN_NUMIVD, numivd);
|
||||
rew = true;
|
||||
}
|
||||
|
||||
TString8 numivdopp = curr.get(PCN_NUMIVDOPP);
|
||||
if (numivdopp.len() == 1)
|
||||
{
|
||||
numivdopp.insert("0");
|
||||
curr.put(PCN_NUMIVDOPP, numivdopp);
|
||||
rew = true;
|
||||
}
|
||||
if (rew)
|
||||
rel.rewrite();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user