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

81
ba/bacnv.cpp
View File

@ -1865,56 +1865,51 @@ 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;
const long codditta = firms.get_long(f);
if (set_firm(codditta))
{
TRelation rel(LF_PCON);
TRectype& curr = rel.curr();
if (prefix().exist(codditta)) TCursor cursore(&rel);
{ const long items = cursore.items();
set_firm(codditta); cursore.freeze();
{ TProgind pi(items, "Scansione piano dei conti");
TRelation rel(LF_PCON); for (cursore=0; cursore.pos()<items; ++cursore)
TRectype& curr = rel.curr(); {
if (!pi.addstatus(1))
break;
TCursor cursore(&rel); TString8 numivd = curr.get(PCN_NUMIVD);
const long items = cursore.items(); bool rew = false;
cursore.freeze(); if (numivd.len() == 1)
{
TProgind pi(items, "Conversione Codici IV Direttiva CEE..", FALSE, TRUE); numivd.insert("0");
curr.put(PCN_NUMIVD, numivd);
for (cursore=0; cursore.pos()<items; ++cursore) rew = true;
{
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();
} }
TString8 numivdopp = curr.get(PCN_NUMIVDOPP);
if (numivdopp.len() == 1)
{
numivdopp.insert("0");
curr.put(PCN_NUMIVDOPP, numivdopp);
rew = true;
}
if (rew)
rel.rewrite();
} }
} }
} }