Patch level : 10.0 no patch
Files correlati : ps0713.exe Ricompilazione Demo : [ ] Commento E' possibile ora copiare file da e verso ftp. git-svn-id: svn://10.65.10.50/branches/R_10_00@21019 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
b872eeb0d5
commit
d9c82c675c
@ -117,13 +117,13 @@ void TImporta_fat_for_app::scan_file(TVB_recset& file, TAssoc_array& righean, TA
|
||||
righean.add(keyan, imp);
|
||||
|
||||
//riempio l'array della contabilità generale
|
||||
if(righecg.is_key((TString)idlavoro))
|
||||
if(righecg.is_key(keyan.contostr()))
|
||||
{
|
||||
real& imponibile = *(real*)righecg.objptr((TString)idlavoro);
|
||||
real& imponibile = *(real*)righecg.objptr(keyan.contostr());
|
||||
imponibile += imp;
|
||||
}
|
||||
else
|
||||
righecg.add((TString)idlavoro, imp);
|
||||
righecg.add(keyan.contostr(), imp);
|
||||
}
|
||||
}
|
||||
|
||||
@ -362,8 +362,6 @@ void TImporta_fat_for_app::importa_fat(TAssoc_array& righecg, TCommessa_string&
|
||||
if (!pi.addstatus(1))
|
||||
break;
|
||||
|
||||
TString80 idlav(keyar1);
|
||||
|
||||
real& imp = *(real*)itm1; imp.round(2);
|
||||
|
||||
if (!imp.is_zero())
|
||||
@ -377,16 +375,15 @@ void TImporta_fat_for_app::importa_fat(TAssoc_array& righecg, TCommessa_string&
|
||||
|
||||
real rimposta = imp * iva / CENTO; rimposta.round(2);
|
||||
|
||||
TCommessa comm(idlav);
|
||||
TCommessa_string cmsstr = comm.cmsstr();
|
||||
TToken_string bill(keyar1);
|
||||
|
||||
configfile->set(RMI_ANNOES, anno);
|
||||
configfile->set(RMI_IMPONIBILE, importo.valore().string());
|
||||
configfile->set(RMI_CODIVA, codiva);
|
||||
configfile->set(RMI_IMPOSTA, rimposta.string());
|
||||
configfile->set(RMI_GRUPPO, cmsstr.gruppo());
|
||||
configfile->set(RMI_CONTO, cmsstr.conto());
|
||||
configfile->set(RMI_SOTTOCONTO, cmsstr.sotco());
|
||||
configfile->set(RMI_GRUPPO, bill.get(0));
|
||||
configfile->set(RMI_CONTO, bill.get(1));
|
||||
configfile->set(RMI_SOTTOCONTO, bill.get(2));
|
||||
configfile->set(RMI_TIPOATT, 1);
|
||||
}
|
||||
}
|
||||
@ -475,7 +472,6 @@ void TImporta_fat_for_app::importa_fat_ric(TAssoc_array& righecg, TCommessa_stri
|
||||
if (!pi.addstatus(1))
|
||||
break;
|
||||
|
||||
TString80 idlav(keyar);
|
||||
real& imp = *(real*)itm; imp.round(2);
|
||||
|
||||
if (!imp.is_zero())
|
||||
@ -489,15 +485,15 @@ void TImporta_fat_for_app::importa_fat_ric(TAssoc_array& righecg, TCommessa_stri
|
||||
|
||||
const real rimposta = imp * iva / CENTO;
|
||||
|
||||
const TCommessa cms(idlav);
|
||||
TCommessa_string cmsstr = cms.cmsstr();
|
||||
TToken_string bill(keyar);
|
||||
|
||||
|
||||
configfile->set(RMV_ANNOES, anno);
|
||||
configfile->set(RMV_SEZIONE, causale2.get("SEZIONE"));
|
||||
configfile->set(RMV_IMPORTO, importo.valore().string());
|
||||
configfile->set(RMV_GRUPPO, cmsstr.gruppo());
|
||||
configfile->set(RMV_CONTO, cmsstr.conto());
|
||||
configfile->set(RMV_SOTTOCONTO, cmsstr.sotco());
|
||||
configfile->set(RMV_GRUPPO, bill.get(0));
|
||||
configfile->set(RMV_CONTO, bill.get(1));
|
||||
configfile->set(RMV_SOTTOCONTO, bill.get(2));
|
||||
}
|
||||
}
|
||||
|
||||
@ -572,20 +568,17 @@ bool TImporta_fat_for_app::transfer()
|
||||
TAssoc_array righecg;
|
||||
TCommessa_string kmax;
|
||||
|
||||
for(int i = F_NAME1; i <= F_NAME2; i++)
|
||||
if(_msk->get(F_NAME1).full())
|
||||
{
|
||||
if(_msk->get(i).full())
|
||||
esiste = true;
|
||||
|
||||
TFilename name = path;
|
||||
name.add(_msk->get(F_NAME1));
|
||||
|
||||
if(name.exist())
|
||||
{
|
||||
esiste = true;
|
||||
|
||||
TFilename name = path;
|
||||
name.add(_msk->get(i));
|
||||
|
||||
if(name.exist())
|
||||
{
|
||||
trovato = true;
|
||||
importato = importa(name, righean, righecg);
|
||||
}
|
||||
trovato = true;
|
||||
importato = importa(name, righean, righecg);
|
||||
}
|
||||
}
|
||||
|
||||
|
@ -1,7 +1,6 @@
|
||||
//campi maschera ps0713600a
|
||||
#define F_PATH 101
|
||||
#define F_NAME1 102
|
||||
#define F_NAME2 103
|
||||
#define F_TIPOFAT 104
|
||||
#define F_CODFOR 105
|
||||
#define F_RAGSOC 106
|
||||
|
@ -36,14 +36,6 @@ BEGIN
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_NAME2 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "File 2 "
|
||||
FSELECT "*.csv"
|
||||
FLAGS "B"
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 78 10
|
||||
BEGIN
|
||||
PROMPT 1 6 "@bParametri documento"
|
||||
|
@ -32,6 +32,15 @@ const long TCommessa_string::sotco()
|
||||
return get_long(3);
|
||||
}
|
||||
|
||||
const TString16 TCommessa_string::contostr()
|
||||
{
|
||||
TString & str = get_tmp_string(24);
|
||||
|
||||
str.format("%d|%d|%ld", gruppo(), conto(), sotco());
|
||||
return str;
|
||||
}
|
||||
|
||||
|
||||
//metodo costruttore
|
||||
TCommessa_string::TCommessa_string(const char* idlavoro, const int gruppo, const int conto, const long sotco)
|
||||
{
|
||||
|
@ -21,6 +21,7 @@ public:
|
||||
const int gruppo();
|
||||
const int conto();
|
||||
const long sotco();
|
||||
const TString16 contostr();
|
||||
|
||||
TCommessa_string& operator= (const char* key){ set(key); return *this; }
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user