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

Patch level : 10.0 nopatch

Browse Source 
Files correlati     : ps0713.exe
Ricompilazione Demo : [ ]
Commento

Importazione fatture ATS


git-svn-id: svn://10.65.10.50/branches/R_10_00@20834 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2010-09-08 15:44:26 +00:00
parent 1579bf806d
commit 3a2cf9e61b
1 changed files with 24 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ps/ps0713300.cpp
View File

@ -97,16 +97,18 @@ bool TImporta_fatacq_app::get_doc(const TFilename& file, const TMask & m)
if (!pi.addstatus(1)) if (!pi.addstatus(1))
break; break;
TRiga_documento & row = doc.new_row("06");
row.put(RDOC_CODART, p.codice());
row.put(RDOC_CHECKED, "X");
TString16 tmp = s.get(1).as_string(); TString16 tmp = s.get(1).as_string();
tmp.strip("."); tmp.strip(".");
tmp.replace(',', '.'); tmp.replace(',', '.');
real imp(tmp); imp.round(doc.decimals()); real imp(tmp); imp.round(doc.decimals());
if (imp != ZERO)
{
TRiga_documento & row = doc.new_row("06");
row.put(RDOC_CODART, p.codice());
row.put(RDOC_CHECKED, "X");
row.put(RDOC_QTA, 1); row.put(RDOC_QTA, 1);
row.put(RDOC_UMQTA, p.um()); row.put(RDOC_UMQTA, p.um());
@ -126,6 +128,7 @@ bool TImporta_fatacq_app::get_doc(const TFilename& file, const TMask & m)
row.put(RDOC_QTAGG2, s.get(3).as_int()); row.put(RDOC_QTAGG2, s.get(3).as_int());
row.put(RDOC_QTAGG3, s.get(4).as_int()); row.put(RDOC_QTAGG3, s.get(4).as_int());
} }
}
TString16 codsp = m.get(F_CODSP1); TString16 codsp = m.get(F_CODSP1);
real perc = m.get(F_PERCSP1); real perc = m.get(F_PERCSP1);