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

Patch level : 12.0 938

Browse Source 
Files correlati     : fp0.exe
Commento            : Corretta contabilizzazione per importi a 0: problema scadenzario
This commit is contained in:
Simone Palacino 2020-02-05 18:06:08 +01:00
parent 6ab12f151d
commit e25a49daa7
1 changed files with 96 additions and 88 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/fp/fp0400.cpp
View File

@ -663,7 +663,8 @@ int TPassive_mask::prepara_contab() const
clean_ini(F1_INIREGCONT); clean_ini(F1_INIREGCONT);
FOR_EACH_SHEET_ROW(sf, n, row) { FOR_EACH_SHEET_ROW(sf, n, row)
{
if (row->starts_with("X")) if (row->starts_with("X"))
{ {
TString prokeys = row->get(sf.cid2index(S_PROKEY)); TString prokeys = row->get(sf.cid2index(S_PROKEY));
@ -739,12 +740,19 @@ int TPassive_mask::prepara_contab() const
i++; i++;
} }
// Se ci sono le scadenze esporto anche quelle TString where_q, query;
TString where_q; /* Se ci sono le scadenze esporto anche quelle
*
* Solo se l'importo non e' nullo: modifica dopo esserci accorti che lo scadenzario in
* questo caso rompeva le scatole per scadenza nulla. In pratica se sporchi le rate non puoi
* salvarle se nulle.
*/
if (real(totdoc) != ZERO)
{
where_q << "WHERE PO_KEYPRGINVIO = '" << keys.get(0) << "'"; where_q << "WHERE PO_KEYPRGINVIO = '" << keys.get(0) << "'";
where_q << " AND PO_KEYHEADERFATT = '" << keys.get() << "'"; where_q << " AND PO_KEYHEADERFATT = '" << keys.get() << "'";
where_q << " AND PO_KEYBODYFATT = '" << keys.get() << "'"; where_q << " AND PO_KEYBODYFATT = '" << keys.get() << "'";
TString query; query << "SELECT PO_RIGA AS RIGA, PO_DATASCADENZA AS DATA, PO_IMPORTO AS IMPORTO \nFROM PAA2500F \n" << where_q; query << "SELECT PO_RIGA AS RIGA, PO_DATASCADENZA AS DATA, PO_IMPORTO AS IMPORTO \nFROM PAA2500F \n" << where_q;
fp_db().sq_set_exec(query, false); fp_db().sq_set_exec(query, false);
for (bool ok = fp_db().sq_next(); ok; ok = fp_db().sq_next()) for (bool ok = fp_db().sq_next(); ok; ok = fp_db().sq_next())
@ -756,6 +764,7 @@ int TPassive_mask::prepara_contab() const
contab_ini.set("NRATA", riga); contab_ini.set("NRATA", riga);
contab_ini.set("NRIGA", "1"); contab_ini.set("NRIGA", "1");
} }
}
if (check_causale(codcaus, "NC", true) && is_tipomov_nc(codcaus)) if (check_causale(codcaus, "NC", true) && is_tipomov_nc(codcaus))
{ {
@ -774,7 +783,6 @@ int TPassive_mask::prepara_contab() const
} }
} }
row->add("", 0); row->add("", 0);
break; // Chiudo subito tanto se ne può selezionare solo una alla volta break; // Chiudo subito tanto se ne può selezionare solo una alla volta
} }