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     : fp
Commento            : Vincolato al modulo RS l'esportazione della fattura nell'XML
This commit is contained in:
Mattia Tollari 2018-08-01 14:30:43 +02:00
parent f4eda260e8
commit eeec3674ff
2 changed files with 24 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/fp/fp0100a.uml
View File

@ -76,6 +76,7 @@ BOOLEAN F_ESPORTADOC
BEGIN
PROMPT 2 12 "Allega pdf documento nell'XML"
FLAGS "D"
MODULE RS
END
STRING F_FLDDEST 300 50

20
src/fp/fplib01.cpp
View File

@ -1425,23 +1425,14 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
remove(paf2600f); // Cancella eventuali allegati
long nprogr = 0; // Numero di file allegati
// Se abilitato stampo il documento e lo allego
if (_allegafattura)
{
//ve1 - 2 FPA 2017 D 202 P D / uADMIN
TFilename rep;
int filter = dongle().active(RSAUT) ? 2 : 1;
while (filter > 0 && !doc.tipo().main_print_profile(rep, filter))
filter--;
if (filter > 0)
if (_allegafattura && dongle().active(RSAUT) && doc.tipo().main_print_profile(rep, 2))
{
// Costruisco la chiamata
TString commandline = "ve1 -";
if (filter == 2)
commandline << 2; // Esiste il nuovo report :-)
else
commandline << 0; // Esiste il vecchio form :-(
//ve1 -2 {CODNUM} {ANNO} {PROVV} {NDOC}(-{ANDOC}) {TIPO_ELABORAZIONE} {TIPO_STAMPA}
commandline << ' ' << doc.get(DOC_CODNUM) << ' ' << doc.get(DOC_ANNO)
// Costruisco la chiamata
static TString commandline;
commandline.cut(0) << "ve1 -2 " << doc.get(DOC_CODNUM) << ' ' << doc.get(DOC_ANNO)
<< ' ' << doc.get(DOC_PROVV) << ' ' << doc.get(DOC_NDOC) << " X P"; // X: stampa su disco, P: provvisorio
TExternal_app interattivo(commandline);
if (interattivo.run() != NOERR)
@ -1463,7 +1454,6 @@ bool TDoc_fp::doc_to_paf(TDocumentoEsteso& doc)
return false;
}
}
}
TToken_string allegati(doc.get("COLL_GOLEM"), '\n');
bool load_allegati = true;