Patch level : 12.0 920
Files correlati : fp0.exe Commento : Corretta esportazione informazioni dichiarazioni d'intento
This commit is contained in:
parent
0d9137b690
commit
5e2122e112
@ -18,6 +18,8 @@
|
||||
#include "../cg/cfban.h"
|
||||
#include <modaut.h>
|
||||
#include <urldefid.h>
|
||||
#include "../li/letint.h"
|
||||
|
||||
bool set_connection(SSimple_query& s)
|
||||
{
|
||||
bool ok = true;
|
||||
@ -2033,12 +2035,29 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
|
||||
paf1800f.set("PI_NUMEROLINEA", riga);
|
||||
reset(paf3000f);
|
||||
paf3000f.set("PT_RIFNUMLINEA", riga);
|
||||
paf3000f.set("PT_COMMENTO", descrizione(riga_es));
|
||||
paf3000f.set("PT_COMMENTO", "Informazioni documento");
|
||||
paf1800f.set("PI_QUANTITA", UNO);
|
||||
paf1800f.set("PI_PREZZOUNIT", ZERO);
|
||||
paf1800f.set("PI_PRZTOTALE", ZERO);
|
||||
//descrizione(riga_es);
|
||||
set_IVA(_codivadefault, paf1800f);
|
||||
ok &= insert(paf1800f) && insert(paf3000f);
|
||||
TString dichiar;
|
||||
|
||||
ok &= insert(paf1800f) && insert(paf3000f);
|
||||
TToken_string le_plafs(doc.get("PLAFOND"), ',');
|
||||
for (int i = 0; i < le_plafs.items(); i++)
|
||||
{
|
||||
static TToken_string this_plaf; this_plaf.cut(0) << le_plafs.get(i);
|
||||
static TString key; key.cut(0) << this_plaf.get(0) << "|" << this_plaf.get(1);
|
||||
TRectype plaf = cache().get(LF_LETINT, key);
|
||||
dichiar.cut(0) << "N. di protocollo di invio: " << plaf.get(LETINT_PROTINTF) << "-" << plaf.get(LETINT_PROTINTS);
|
||||
reset(paf2100f);
|
||||
paf2100f.set("PK_KEYNLINEA", static_cast<long>(riga));
|
||||
paf2100f.set("PK_KEYNLINAR", _idx_adg_doc_row++);
|
||||
paf2100f.set("PK_TIPODATO", "Dich.Inten");
|
||||
paf2100f.set("PK_RIFDATO", dichiar);
|
||||
ok &= paf2100f.insert();
|
||||
}
|
||||
riga++;
|
||||
}
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user