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

Patch level : 12.0 no-patch

Browse Source 
Files correlati     : fplib01
Commento            : Sistema di cache per il paffrecord
This commit is contained in:
Simone Palacino 2019-03-08 09:46:24 +01:00
parent 00976de463
commit 030766fbb9
2 changed files with 244 additions and 132 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/fp/fplib.h
View File

@ -66,6 +66,7 @@ public:
void set(const char* fld, const TDate& var); void set(const char* fld, const TDate& var);
void set(const char* fld, bool var); void set(const char* fld, bool var);
const TString sq_get(const char* fld) const; const TString sq_get(const char* fld) const;
bool is_full() const { return _fields.items() > _key.items(); }
TString& insert_string(); TString& insert_string();
bool insert(); bool insert();
@ -82,11 +83,21 @@ public:
copy(rec); copy(rec);
return *this; return *this;
} }
TPaf_record() { };
TPaf_record(const TPaf_record& rec) { copy(rec); } TPaf_record(const TPaf_record& rec) { copy(rec); }
TPaf_record(const char* table); TPaf_record(const char* table);
}; };
class TPaf_container : public TObject
{
std::map<const char *, TPaf_record> _pafs;
static const char* paf_to_prefix(const char * paf);
public:
TPaf_record& get_paf(const char * paf);
bool clean_and_erase_paf(const TString& hfatt, const TString& bfatt);
TPaf_container();
};
// Gestione PAF // Gestione PAF
class TDoc_fp : public TObject class TDoc_fp : public TObject
{ {
@ -118,6 +129,9 @@ private:
bool _has_bolla; bool _has_bolla;
TString _codivadefault; TString _codivadefault;
long _index_cassa_previdenziale; long _index_cassa_previdenziale;
int _num_linea;
int _counter;
TPaf_container _paf_container;
// Classe interna per gestire righe aggiuntive in riepilogo // Classe interna per gestire righe aggiuntive in riepilogo
class TRiepilogo_agg class TRiepilogo_agg
@ -137,9 +151,8 @@ private:
real _cambio; real _cambio;
} _doc_cambio; } _doc_cambio;
//int parse_line(const TString& line, TString& var, TString& val) const;
int parse_line(const TString& line, TString& var, TString& val) const; //bool create_table(TScanner& paf, const TString& table);
bool create_table(TScanner& paf, const TString& table);
const TRectype* find_parent_row(const TRectype& rdoc) const; const TRectype* find_parent_row(const TRectype& rdoc) const;
int find_ancestors(const TRiga_documento& rdoc, TArray& ancestors) const; int find_ancestors(const TRiga_documento& rdoc, TArray& ancestors) const;
@ -187,10 +200,13 @@ protected:
bool export_paf3200f(); bool export_paf3200f();
// Record clifo // Record clifo
void set_rec_clifo(char tipocf, long codcf); //void set_rec_clifo(char tipocf, long codcf);
public: public:
// Set Altri Dati Gestionali
void set_ads(int r);
// Get Altri Dati Gestionali
void get_ads();
bool doc_to_paf(TDocumentoEsteso& doc); bool doc_to_paf(TDocumentoEsteso& doc);
bool doc_to_paf(const TRectype& rec); bool doc_to_paf(const TRectype& rec);
bool doc_to_paf(const TDoc_key& key); bool doc_to_paf(const TDoc_key& key);

348
src/fp/fplib01.cpp
View File

@ -27,7 +27,7 @@ void set_connection(SSimple_query& s)
TString ip = fp_settings().get_db_indirizzo(); TString ip = fp_settings().get_db_indirizzo();
if (ip.upper() != "TESTCAMPO2012") if (ip.upper() != "TESTCAMPO2012")
{ {
if (s.sq_connect("TESTCAMPO2012@FP_CISLAGHI", if (s.sq_connect("TESTCAMPO2012@campo_fp",
"fp", "fp",
"fp", "fp",
TSDB_MSSQL) != NOERR) TSDB_MSSQL) != NOERR)
@ -466,6 +466,133 @@ TPaf_record::TPaf_record(const char* table) : _table(table), _key(15, ',')
} }
CHECKS(!_key.empty_items(), "Invalid primary key for table ", table); CHECKS(!_key.empty_items(), "Invalid primary key for table ", table);
} }
////////////////////////////////////////////////////////
// TPaf_container
////////////////////////////////////////////////////////
bool TPaf_container::clean_and_erase_paf(const TString& hfatt, const TString& bfatt)
{
bool ok = true;
for (auto i = _pafs.begin(); i != _pafs.end() && ok; ++i)
{
if (i->second.is_full())
{
if (strcmp(i->first, "PAF0200F") != 0)
i->second.reset();
}
const char * prefix = paf_to_prefix(i->first);
i->second.set(TString(prefix) << "_KEYHEADERFATT", hfatt);
i->second.set(TString(prefix) << "_KEYBODYFATT", bfatt);
ok = i->second.remove();
}
return ok;
}
const char* TPaf_container::paf_to_prefix(const char * paf)
{
static TString paf_name;
paf_name.cut(0) << paf;
if (paf_name == "PAF0100F")
return "P1";
if (paf_name == "PAF0200F")
return "P2";
if (paf_name == "PAF0400F")
return "P4";
if (paf_name == "PAF0700F")
return "P7";
if (paf_name == "PAF0800F")
return "P8";
if (paf_name == "PAF1000F")
return "P0";
if (paf_name == "PAF1100F")
return "PA";
if (paf_name == "PAF1200F")
return "PB";
if (paf_name == "PAF1600F")
return "PF";
if (paf_name == "PAF1700F")
return "PG";
if (paf_name == "PAF1800F")
return "PI";
if (paf_name == "PAF1900F")
return "PY";
if (paf_name == "PAF2000F")
return "PJ";
if (paf_name == "PAF2100F")
return "PK";
if (paf_name == "PAF2200F")
return "PL";
if (paf_name == "PAF2400F")
return "PN";
if (paf_name == "PAF2500F")
return "PO";
if (paf_name == "PAF2600F")
return "PP";
if (paf_name == "PAF2700F")
return "PQ";
if (paf_name == "PAF3000F")
return "PT";
if (paf_name == "PAF3200F")
return "PU";
if (paf_name == "PAFW300F")
return "PW";
return "ERROR";
}
TPaf_record& TPaf_container::get_paf(const char * paf)
{
return _pafs[paf];
}
TPaf_container::TPaf_container()
{
_pafs.insert(std::pair<const char *, TPaf_record>("PAF0100F", TPaf_record("PAF0100F")));
// Cedente/Prestatore
_pafs.insert(std::pair<const char *, TPaf_record>("PAF0200F", TPaf_record("PAF0200F")));
// Cessionario/Committente
_pafs.insert(std::pair<const char *, TPaf_record>("PAF0400F", TPaf_record("PAF0400F")));
// Testata documento
_pafs.insert(std::pair<const char *, TPaf_record>("PAF0700F", TPaf_record("PAF0700F")));
// Cassa previdenziale
_pafs.insert(std::pair<const char *, TPaf_record>("PAF0800F", TPaf_record("PAF0800F")));
// Contratti
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1000F", TPaf_record("PAF1000F")));
// Convenzioni
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1100F", TPaf_record("PAF1100F")));
// Ordini
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1200F", TPaf_record("PAF1200F")));
// DDT Testata
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1600F", TPaf_record("PAF1600F")));
// DDT Righe
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1700F", TPaf_record("PAF1700F")));
// Righe documento
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1800F", TPaf_record("PAF1800F")));
// Righe articoli del documento
_pafs.insert(std::pair<const char *, TPaf_record>("PAF1900F", TPaf_record("PAF1900F")));
// Sconti di riga
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2000F", TPaf_record("PAF2000F")));
// Altri dati gestionali per le righe documento
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2100F", TPaf_record("PAF2100F")));
// Dati Riepilogo
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2200F", TPaf_record("PAF2200F")));
// Dati pagamento
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2400F", TPaf_record("PAF2400F")));
// Rate
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2500F", TPaf_record("PAF2500F")));
// Allegati
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2600F", TPaf_record("PAF2600F")));
// Testata documento (aggiunte)
_pafs.insert(std::pair<const char *, TPaf_record>("PAF2700F", TPaf_record("PAF2700F")));
// Descrizione
_pafs.insert(std::pair<const char *, TPaf_record>("PAF3000F", TPaf_record("PAF3000F")));
// PEC
_pafs.insert(std::pair<const char *, TPaf_record>("PAF3200F", TPaf_record("PAF3200F")));
// Non invio XML
_pafs.insert(std::pair<const char *, TPaf_record>("PAFW300F", TPaf_record("PAFW300F")));
}
/*************************************************************************** /***************************************************************************
* TAncestor * TAncestor
***************************************************************************/ ***************************************************************************/
@ -625,6 +752,7 @@ const TString& TDoc_fp::descrizione(const TRiga_documento& rdoc)
} }
return rdoc.get(RDOC_DESCR); return rdoc.get(RDOC_DESCR);
} }
const TRectype* TDoc_fp::find_parent_row(const TRectype& rdoc) const const TRectype* TDoc_fp::find_parent_row(const TRectype& rdoc) const
{ {
const long id = rdoc.get_long(RDOC_DAIDRIGA); const long id = rdoc.get_long(RDOC_DAIDRIGA);
@ -870,9 +998,15 @@ bool TDoc_fp::initialize(TDocumentoEsteso& doc)
// Azzero indici // Azzero indici
_index_cassa_previdenziale = 1; _index_cassa_previdenziale = 1;
return check_initial(doc) || fp_settings().get_check_not_block(); if(check_initial(doc) || fp_settings().get_check_not_block())
{
return _paf_container.clean_and_erase_paf(_hfatt, _bfatt);
}
return false;
} }
const TRectype& TDoc_fp::cco(const TRectype& doc) const const TRectype& TDoc_fp::cco(const TRectype& doc) const
{ {
TString80 conkey; TString80 conkey;
@ -989,8 +1123,7 @@ bool TDoc_fp::add_row_art(long& riga_art, const TString& codice_tipo, const TStr
paf.set("PY_KEYNLINAR", ++riga_art); paf.set("PY_KEYNLINAR", ++riga_art);
paf.set("PY_TIPOARTICOLO", codice_tipo); paf.set("PY_TIPOARTICOLO", codice_tipo);
paf.set("PY_VALOREARTICOLO", codice_valore); paf.set("PY_VALOREARTICOLO", codice_valore);
const bool ok = insert(paf); return insert(paf);
return ok;
} }
bool TDoc_fp::add_row_alleg(TFilename& file, long& nprogr, TPaf_record& paf) bool TDoc_fp::add_row_alleg(TFilename& file, long& nprogr, TPaf_record& paf)
{ {
@ -1170,7 +1303,7 @@ bool TDoc_fp::add_riepilogo_iva(TPaf_record& paf2200f, const TCodiceIVA& cod_iva
bool TDoc_fp::add_cassa_previdenziale(TRiga_documento& rdoc) bool TDoc_fp::add_cassa_previdenziale(TRiga_documento& rdoc)
{ {
static TPaf_record paf0800f("PAF0800F"); TPaf_record& paf0800f = _paf_container.get_paf("PAF0800F");
paf0800f.reset(); paf0800f.reset();
if (_index_cassa_previdenziale == 1) if (_index_cassa_previdenziale == 1)
{ {
@ -1217,10 +1350,7 @@ const TFirm& TDoc_fp::get_firm()
bool TDoc_fp::export_paf0100f() bool TDoc_fp::export_paf0100f()
{ {
// <DatiTrassmissione> // <DatiTrassmissione>
TPaf_record paf0100f("PAF0100F"); TPaf_record& paf0100f = _paf_container.get_paf("PAF0100F");
paf0100f.set("P1_KEYHEADERFATT", _hfatt);
paf0100f.set("P1_KEYBODYFATT", _bfatt);
remove(paf0100f);
paf0100f.set("P1_TRASMITTPAESE", _paese); paf0100f.set("P1_TRASMITTPAESE", _paese);
paf0100f.set("P1_TRASMITTCOD", _cofi); paf0100f.set("P1_TRASMITTCOD", _cofi);
paf0100f.set("P1_FMTTRASMISS", _privato ? "FPR12" : "FPA12"); // SDI11 si usa dal 2015 per lo split payment (prima era SDI10) paf0100f.set("P1_FMTTRASMISS", _privato ? "FPR12" : "FPA12"); // SDI11 si usa dal 2015 per lo split payment (prima era SDI10)
@ -1242,10 +1372,7 @@ bool TDoc_fp::export_paf3200f()
if (_enapec) if (_enapec)
{ {
// <Datipec> // <Datipec>
TPaf_record paf3200f("PAF3200F"); TPaf_record& paf3200f = _paf_container.get_paf("PAF3200F");
paf3200f.set("PU_KEYHEADERFATT", _hfatt);
paf3200f.set("PU_KEYBODYFATT", _bfatt);
remove(paf3200f);
paf3200f.set("PU_PEC", _pec); paf3200f.set("PU_PEC", _pec);
// </Datipec> // </Datipec>
return insert(paf3200f); return insert(paf3200f);
@ -1254,6 +1381,17 @@ bool TDoc_fp::export_paf3200f()
return true; return true;
} }
void TDoc_fp::set_ads(int r)
{
_num_linea = r;
_counter = 0;
}
void TDoc_fp::get_ads()
{
//static TPaf_record paf2000f;
}
bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc) bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
{ {
if (!initialize(doc)) if (!initialize(doc))
@ -1268,71 +1406,69 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
#endif #endif
// <CedentePrestatore> // <CedentePrestatore>
TPaf_record paf0200f("PAF0200F"); TPaf_record& paf0200f = _paf_container.get_paf("PAF0200F");
paf0200f.set("P2_KEYHEADERFATT", _hfatt); TAnagrafica cliente(doc.clifor());
paf0200f.set("P2_KEYBODYFATT", _bfatt); if (!paf0200f.is_full())
remove(paf0200f);
if (_ditta.partita_IVA().full())
{ {
if (_ditta.partita_IVA().full())
{
paf0200f.set("P2_FISCIVAPAESE", _ditta.stato_partita_IVA()); paf0200f.set("P2_FISCIVAPAESE", _ditta.stato_partita_IVA());
paf0200f.set("P2_FISCIVACOD", _ditta.partita_IVA()); paf0200f.set("P2_FISCIVACOD", _ditta.partita_IVA());
} }
paf0200f.set("P2_CODFISCALE", _ditta.codice_fiscale()); paf0200f.set("P2_CODFISCALE", _ditta.codice_fiscale());
if (_ditta.fisica()) if (_ditta.fisica())
{ {
paf0200f.set("P2_ANANOME", _ditta.nome()); paf0200f.set("P2_ANANOME", _ditta.nome());
paf0200f.set("P2_ANACOGNOME", _ditta.cognome()); paf0200f.set("P2_ANACOGNOME", _ditta.cognome());
} }
else else
{ {
paf0200f.set("P2_ANADENOMIN", _ditta.ragione_sociale()); paf0200f.set("P2_ANADENOMIN", _ditta.ragione_sociale());
} }
paf0200f.set("P2_REGFISCALE", doc.tipo().reg_fisc()); paf0200f.set("P2_REGFISCALE", doc.tipo().reg_fisc());
// DatiSede // DatiSede
paf0200f.set("P2_SEDEIND", _ditta.via_residenza()); paf0200f.set("P2_SEDEIND", _ditta.via_residenza());
paf0200f.set("P2_SEDENRCIVICO", _ditta.civico_residenza().left(8)); paf0200f.set("P2_SEDENRCIVICO", _ditta.civico_residenza().left(8));
paf0200f.set("P2_SEDECAP", _ditta.CAP_residenza()); paf0200f.set("P2_SEDECAP", _ditta.CAP_residenza());
paf0200f.set("P2_SEDECOMUNE", _ditta.comune_residenza()); paf0200f.set("P2_SEDECOMUNE", _ditta.comune_residenza());
paf0200f.set("P2_SEDEPROV", _ditta.provincia_residenza()); paf0200f.set("P2_SEDEPROV", _ditta.provincia_residenza());
paf0200f.set("P2_SEDENAZ", _paese); paf0200f.set("P2_SEDENAZ", _paese);
paf0200f.set("P2_GESTIONE", "D"); paf0200f.set("P2_GESTIONE", "D");
TAnagrafica cliente(doc.clifor());
TString rifamm = cco(doc).get("S4"); TString rifamm = cco(doc).get("S4");
if (rifamm.blank()) if (rifamm.blank())
rifamm = doc.clifor().vendite().get(CFV_PARIFAMM); rifamm = doc.clifor().vendite().get(CFV_PARIFAMM);
paf0200f.set("P2_RIFAMMINISTR", rifamm); paf0200f.set("P2_RIFAMMINISTR", rifamm);
paf0200f.set("P2_ISCRREASOCIOU", _ditta.sociounico() == 'S' ? "SU" : "SM"); paf0200f.set("P2_ISCRREASOCIOU", _ditta.sociounico() == 'S' ? "SU" : "SM");
TISAM_recordset unloc("USE UNLOC\nJOIN COMUNI INTO COM==COMCCIAA\nFROM CODDITTA=#DITTA\nTO CODDITTA=#DITTA"); TISAM_recordset unloc("USE UNLOC\nJOIN COMUNI INTO COM==COMCCIAA\nFROM CODDITTA=#DITTA\nTO CODDITTA=#DITTA");
unloc.set_var("#DITTA", get_firm().get(NDT_CODDITTA)); unloc.set_var("#DITTA", get_firm().get(NDT_CODDITTA));
if (unloc.move_first()) if (unloc.move_first())
{ {
const TString& numrea = unloc.get(ULC_NUMCCIAA).as_string(); const TString& numrea = unloc.get(ULC_NUMCCIAA).as_string();
if (numrea.full()) if (numrea.full())
{ {
paf0200f.set("P2_ISCRREANUM", numrea); paf0200f.set("P2_ISCRREANUM", numrea);
paf0200f.set("P2_ISCRREAUFF", unloc.get("13->" COM_PROVCOM)); paf0200f.set("P2_ISCRREAUFF", unloc.get("13->" COM_PROVCOM));
} }
} }
if (_ditta.giuridica()) if (_ditta.giuridica())
{ {
TISAM_recordset anagiu("USE ANAGIU\nFROM CODANAGR=#CODICE\nTO CODANAGR=#CODICE"); TISAM_recordset anagiu("USE ANAGIU\nFROM CODANAGR=#CODICE\nTO CODANAGR=#CODICE");
anagiu.set_var("#CODICE", get_firm().get(NDT_CODANAGR)); anagiu.set_var("#CODICE", get_firm().get(NDT_CODANAGR));
if (anagiu.move_first()) if (anagiu.move_first())
{ {
paf0200f.set("P2_ISCRREACAP", anagiu.get(ANG_CAPSOC)); paf0200f.set("P2_ISCRREACAP", anagiu.get(ANG_CAPSOC));
const int ss = anagiu.get(ANG_STATOSOC).as_int(); const int ss = anagiu.get(ANG_STATOSOC).as_int();
paf0200f.set("P2_ISCRREASLIQUID", (ss == 2 || ss == 3) ? "LS" : "LN"); paf0200f.set("P2_ISCRREASLIQUID", (ss == 2 || ss == 3) ? "LS" : "LN");
} }
} }
else else
paf0200f.set("P2_ISCRREASLIQUID", "LN"); paf0200f.set("P2_ISCRREASLIQUID", "LN");
}
ok &= insert(paf0200f); ok &= insert(paf0200f);
// </CedentePrestatore> // </CedentePrestatore>
// <CessionarioCommittente> // <CessionarioCommittente>
TPaf_record paf0400f("PAF0400F"); TPaf_record& paf0400f = _paf_container.get_paf("PAF0400F");
paf0400f.set("P4_KEYHEADERFATT", _hfatt);
paf0400f.set("P4_KEYBODYFATT", _bfatt);
remove(paf0400f);
#ifndef DBG #ifndef DBG
if (cliente.partita_IVA().full()) if (cliente.partita_IVA().full())
{ {
@ -1373,10 +1509,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
ok &= insert(paf0400f); ok &= insert(paf0400f);
// </CessionarioCommittente> // </CessionarioCommittente>
// <DatiGenerali> // <DatiGenerali>
TPaf_record paf0700f("PAF0700F"); TPaf_record& paf0700f = _paf_container.get_paf("PAF0700F");
paf0700f.set("P7_KEYHEADERFATT", _hfatt);
paf0700f.set("P7_KEYBODYFATT", _bfatt);
remove(paf0700f);
paf0700f.set("P7_TIPODOC", tipo_doc_sdi(doc)); paf0700f.set("P7_TIPODOC", tipo_doc_sdi(doc));
paf0700f.set("P7_DIVISA", "EUR"); // Fisso su euro in quanto effettuiamo il cambio paf0700f.set("P7_DIVISA", "EUR"); // Fisso su euro in quanto effettuiamo il cambio
paf0700f.set("P7_DATA", doc.data()); paf0700f.set("P7_DATA", doc.data());
@ -1407,10 +1540,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
*/ */
// <DatiGenerali> // <DatiGenerali>
TPaf_record paf2700f("PAF2700F"); TPaf_record& paf2700f = _paf_container.get_paf("PAF2700F");
paf2700f.set("PQ_KEYHEADERFATT", _hfatt);
paf2700f.set("PQ_KEYBODYFATT", _bfatt);
remove(paf2700f);
// Disabilitata la scrittura del totale del documento, questo causa problemi se è presente uno sconto in testata e l'addebito del bollo. // Disabilitata la scrittura del totale del documento, questo causa problemi se è presente uno sconto in testata e l'addebito del bollo.
// Campo calcola prima il totale, poi lo sconta e ci applica il bollo mentre lo SDI sconta a bollo già applicato. // Campo calcola prima il totale, poi lo sconta e ci applica il bollo mentre lo SDI sconta a bollo già applicato.
@ -1432,33 +1562,21 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
ok &= insert(paf2700f); ok &= insert(paf2700f);
// </DatiGenerali> // </DatiGenerali>
// Azzera DDT // Azzera DDT
TPaf_record paf1600f("PAF1600F"); TPaf_record& paf1600f = _paf_container.get_paf("PAF1600F");
paf1600f.set("PF_KEYHEADERFATT", _hfatt);
paf1600f.set("PF_KEYBODYFATT", _bfatt);
remove(paf1600f);
// Fuori dallo scope per dopo // Fuori dallo scope per dopo
const TString16 cup = doc.get(DOC_CUP); const TString16 cup = doc.get(DOC_CUP);
const TString16 cig = doc.get(DOC_CIG); const TString16 cig = doc.get(DOC_CIG);
const TString80 com = doc.get(DOC_CODCMS); const TString80 com = doc.get(DOC_CODCMS);
// SEMPRE // SEMPRE
// Azzera contratti // Azzera contratti
TPaf_record paf1000f("PAF1000F"); TPaf_record& paf1000f = _paf_container.get_paf("PAF1000F");
paf1000f.set("P0_KEYHEADERFATT", _hfatt);
paf1000f.set("P0_KEYBODYFATT", _bfatt);
paf1000f.set("P0_RIFNUMLINEA", 0L); paf1000f.set("P0_RIFNUMLINEA", 0L);
remove(paf1000f);
// Azzera convenzioni // Azzera convenzioni
TPaf_record paf1100f("PAF1100F"); TPaf_record& paf1100f = _paf_container.get_paf("PAF1100F");
paf1100f.set("PA_KEYHEADERFATT", _hfatt);
paf1100f.set("PA_KEYBODYFATT", _bfatt);
paf1100f.set("PA_RIFNUMLINEA", 0L); paf1100f.set("PA_RIFNUMLINEA", 0L);
remove(paf1100f);
// Azzera ordini // Azzera ordini
TPaf_record paf1200f("PAF1200F"); TPaf_record& paf1200f = _paf_container.get_paf("PAF1200F");
paf1200f.set("PB_KEYHEADERFATT", _hfatt);
paf1200f.set("PB_KEYBODYFATT", _bfatt);
paf1200f.set("PB_RIFNUMLINEA", 0L); paf1200f.set("PB_RIFNUMLINEA", 0L);
remove(paf1200f);
TString80 con = doc.get(DOC_CONTRATTO); TString80 con = doc.get(DOC_CONTRATTO);
if (con.full() || cup.full() || cig.full()) if (con.full() || cup.full() || cig.full())
{ {
@ -1513,26 +1631,11 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
if (_is_pa && cup.blank() && cig.blank()) if (_is_pa && cup.blank() && cig.blank())
log(1, "CIG e CUP assenti"); log(1, "CIG e CUP assenti");
// <DatiBeniServizi> // <DatiBeniServizi>
TPaf_record paf1800f("PAF1800F"); TPaf_record& paf1800f = _paf_container.get_paf("PAF1800F");
paf1800f.set("PI_KEYHEADERFATT", _hfatt); TPaf_record& paf2000f = _paf_container.get_paf("PAF2000F");
paf1800f.set("PI_KEYBODYFATT", _bfatt); TPaf_record& paf2100f = _paf_container.get_paf("PAF2100F");
remove(paf1800f); // Cancella tutte le righe documento TPaf_record& paf1900f = _paf_container.get_paf("PAF1900F");
TPaf_record paf2000f("PAF2000F"); TPaf_record& paf3000f = _paf_container.get_paf("PAF3000F");
paf2000f.set("PJ_KEYHEADERFATT", _hfatt);
paf2000f.set("PJ_KEYBODYFATT", _bfatt);
remove(paf2000f); // Cancella tutti gli sconti di riga
TPaf_record paf2100f("PAF2100F");
paf2100f.set("PK_KEYHEADERFATT", _hfatt);
paf2100f.set("PK_KEYBODYFATT", _bfatt);
remove(paf2000f); // Cancella tutti i "altri dati gestionali"
TPaf_record paf1900f("PAF1900F");
paf1900f.set("PY_KEYHEADERFATT", _hfatt);
paf1900f.set("PY_KEYBODYFATT", _bfatt);
remove(paf1900f); // Cancella tutte le righe articoli del documento
TPaf_record paf3000f("PAF3000F");
paf3000f.set("PT_KEYHEADERFATT", _hfatt);
paf3000f.set("PT_KEYBODYFATT", _bfatt);
remove(paf3000f);
long riga = 1; long riga = 1;
@ -1542,6 +1645,8 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
if (check_row(*rdoc) && !fp_settings().get_check_not_block()) if (check_row(*rdoc) && !fp_settings().get_check_not_block())
return false; return false;
set_ads(r);
bool skip_riga = false; bool skip_riga = false;
paf1800f.reset(); paf1800f.reset();
paf1800f.set("PI_KEYHEADERFATT", _hfatt); paf1800f.set("PI_KEYHEADERFATT", _hfatt);
@ -1580,6 +1685,15 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
paf1900f.set("PY_KEYNLINEA", riga); paf1900f.set("PY_KEYNLINEA", riga);
ok &= add_row_art(riga_art, "Codice articolo cliente", codart, paf1900f); ok &= add_row_art(riga_art, "Codice articolo cliente", codart, paf1900f);
} }
// Controllo se ha il CONAI in tal caso aggiungo i dati
FOR_EACH_CONFIGURED_CONAI_CLASS(cc)
{
const TString conai_fld(conai_peso_name(cc, LF_RIGHEDOC));
if(rdoc->get(conai_fld).full())
{
}
}
} }
} }
// </CodiceArticolo> // </CodiceArticolo>
@ -1932,10 +2046,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
// </DatiBeniServizi> // </DatiBeniServizi>
// <DatiDDT> // <DatiDDT>
// Metto qua i dati DDT per capire se la fattura è accompagnatoria o deriva da bolla // Metto qua i dati DDT per capire se la fattura è accompagnatoria o deriva da bolla
TPaf_record paf1700f("PAF1700F"); TPaf_record& paf1700f = _paf_container.get_paf("PAF1700F");
paf1700f.set("PG_KEYHEADERFATT", _hfatt);
paf1700f.set("PG_KEYBODYFATT", _bfatt);
remove(paf1700f); // Cancella la riga del vettore
if (doc.get("CODVETT1").full() && !_has_bolla) if (doc.get("CODVETT1").full() && !_has_bolla)
{ {
TRectype vet = cache().get("%VET", doc.get("CODVETT1")); TRectype vet = cache().get("%VET", doc.get("CODVETT1"));
@ -1970,10 +2081,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
ok &= insert(paf0700f); ok &= insert(paf0700f);
// <DatiRiepilogo> // <DatiRiepilogo>
TPaf_record paf2200f("PAF2200F"); TPaf_record& paf2200f = _paf_container.get_paf("PAF2200F");
paf2200f.set("PL_KEYHEADERFATT", _hfatt);
paf2200f.set("PL_KEYBODYFATT", _bfatt);
remove(paf2200f); // Cancella tutte le righe di riepilogo IVA
const char* eiva = get_esigibilita_iva(doc); const char* eiva = get_esigibilita_iva(doc);
long num_riep = 0; long num_riep = 0;
TAssoc_array& tiva = doc.tabella_iva(false); TAssoc_array& tiva = doc.tabella_iva(false);
@ -1998,10 +2106,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
// </DatiRiepilogo> // </DatiRiepilogo>
// <DatiPagamento> // <DatiPagamento>
TPaf_record paf2400f("PAF2400F"); TPaf_record& paf2400f = _paf_container.get_paf("PAF2400F");
paf2400f.set("PN_KEYHEADERFATT", _hfatt);
paf2400f.set("PN_KEYBODYFATT", _bfatt);
remove(paf2400f); // Cancella i dati pagamento
TPagamento& pag = doc.pagamento(); TPagamento& pag = doc.pagamento();
doc.scadenze_recalc(); // Ricalcola array delle rate doc.scadenze_recalc(); // Ricalcola array delle rate
@ -2012,10 +2117,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
paf2400f.set("PN_CONDPAGAMENTO", rateazione); paf2400f.set("PN_CONDPAGAMENTO", rateazione);
paf2400f.set("PN_GESTIONE", "D"); paf2400f.set("PN_GESTIONE", "D");
ok &= insert(paf2400f); ok &= insert(paf2400f);
TPaf_record paf2500f("PAF2500F"); TPaf_record& paf2500f = _paf_container.get_paf("PAF2500F");
paf2500f.set("PO_KEYHEADERFATT", _hfatt);
paf2500f.set("PO_KEYBODYFATT", _bfatt);
remove(paf2500f); // Cancella tutte le rate
// Imposto i campi uguali per tutte le rate // Imposto i campi uguali per tutte le rate
paf2500f.set("PO_CONDPAGAMENTO", rateazione); // Condizione di pagamento PA paf2500f.set("PO_CONDPAGAMENTO", rateazione); // Condizione di pagamento PA
paf2500f.set("PO_CODICEPAGAM", pag.code()); // Condizione di pagamento CAMPO paf2500f.set("PO_CODICEPAGAM", pag.code()); // Condizione di pagamento CAMPO
@ -2052,10 +2154,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
// </DatiPagamento> // </DatiPagamento>
if (_gestioneallegati) if (_gestioneallegati)
{ {
TPaf_record paf2600f("PAF2600F"); TPaf_record& paf2600f = _paf_container.get_paf("PAF2600F");
paf2600f.set("PP_KEYHEADERFATT", _hfatt);
paf2600f.set("PP_KEYBODYFATT", _bfatt);
remove(paf2600f); // Cancella eventuali allegati
long nprogr = 0; // Numero di file allegati long nprogr = 0; // Numero di file allegati
// Se abilitato stampo il documento e lo allego // Se abilitato stampo il documento e lo allego
TFilename rep; TFilename rep;
@ -2126,10 +2225,7 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
} }
// Tabella di non invio XML // Tabella di non invio XML
TPaf_record pafw300f("PAFW300F"); TPaf_record& pafw300f = _paf_container.get_paf("PAFW300F");
pafw300f.set("PW_KEYHEADERFATT", _hfatt);
pafw300f.set("PW_KEYBODYFATT", _bfatt);
remove(pafw300f);
pafw300f.set("PW_TIPODOC", tipo_doc_sdi(doc)); pafw300f.set("PW_TIPODOC", tipo_doc_sdi(doc));
pafw300f.set("PW_TIPONUM", doc.codice_numerazione().codice()); pafw300f.set("PW_TIPONUM", doc.codice_numerazione().codice());
pafw300f.set("PW_NUMERO", doc.numero()); pafw300f.set("PW_NUMERO", doc.numero());