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

Patch level : 10.0

Browse Source 
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:
guy 2009-09-21 13:38:47 +00:00
parent 145ecbff09
commit 2db3591554
1 changed files with 39 additions and 44 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
ba/bacnv.cpp
View File

@ -1865,22 +1865,19 @@ void TConversione_archivi::convert_clifo_privati()
void TConversione_archivi::convert_pcon_ivd() void TConversione_archivi::convert_pcon_ivd()
{ {
long firm = get_firm(); const long firm = get_firm();
TString pref; const TString pref = firm == 0 ? prefix().name() : "";
if (firm == 0) TPointer_array firms;
pref = prefix().name(); prefix().firms(firms);
TLocalisamfile ditte(LF_NDITTE); TProgind pf(firms.items(), "Conversione Codici IV Direttiva CEE");
for (int f = 0; f < firms.items(); f++)
for (ditte.first(); !ditte.eof(); ditte.next())
{ {
const long codditta = ditte.get_long("CODDITTA"); if (!pf.addstatus(1))
break;
if (prefix().exist(codditta)) const long codditta = firms.get_long(f);
{ if (set_firm(codditta))
set_firm(codditta);
{ {
TRelation rel(LF_PCON); TRelation rel(LF_PCON);
TRectype& curr = rel.curr(); TRectype& curr = rel.curr();
@ -1889,14 +1886,14 @@ void TConversione_archivi::convert_pcon_ivd()
const long items = cursore.items(); const long items = cursore.items();
cursore.freeze(); cursore.freeze();
TProgind pi(items, "Conversione Codici IV Direttiva CEE..", FALSE, TRUE); TProgind pi(items, "Scansione piano dei conti");
for (cursore=0; cursore.pos()<items; ++cursore) for (cursore=0; cursore.pos()<items; ++cursore)
{ {
pi.addstatus(1); if (!pi.addstatus(1))
TString16 numivd = curr.get(PCN_NUMIVD); break;
bool rew = false;
TString8 numivd = curr.get(PCN_NUMIVD);
bool rew = false;
if (numivd.len() == 1) if (numivd.len() == 1)
{ {
numivd.insert("0"); numivd.insert("0");
@ -1904,8 +1901,7 @@ void TConversione_archivi::convert_pcon_ivd()
rew = true; rew = true;
} }
TString16 numivdopp = curr.get(PCN_NUMIVDOPP); TString8 numivdopp = curr.get(PCN_NUMIVDOPP);
if (numivdopp.len() == 1) if (numivdopp.len() == 1)
{ {
numivdopp.insert("0"); numivdopp.insert("0");
@ -1917,7 +1913,6 @@ void TConversione_archivi::convert_pcon_ivd()
} }
} }
} }
}
if (firm > 0) if (firm > 0)
set_firm(firm); set_firm(firm);
else else