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

Patch level : 2.0 534

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

PG200014
Nel caso di contabilizzazione di fatture provenienti da paesi cee il
programma in fase di "elabora" segnala che manca il codice della provincia
di origine all'interno dell'anagrafica articolo pur essendo detto campo
correttamente inserito


git-svn-id: svn://10.65.10.50/trunk@11345 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-07-24 11:08:07 +00:00
parent 3f9094fdb5
commit b4e2713a17
1 changed files with 21 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
ve/velib04b.cpp
View File

@ -14,10 +14,14 @@
#include <clifo.h> #include <clifo.h>
#include <cfven.h> #include <cfven.h>
#include <comuni.h> #include <comuni.h>
#include <nditte.h>
#include <occas.h> #include <occas.h>
#include <scadenze.h> #include <scadenze.h>
#include <unloc.h>
#include <doc.h> #include <doc.h>
#include <rdoc.h> #include <rdoc.h>
#include "../mg/anamag.h" #include "../mg/anamag.h"
@ -3331,7 +3335,7 @@ error_type TContabilizzazione::write_intra(TDocumento& doc)
const int trasporto = por_rec.get_int("I0"); // tipo di trasporto... const int trasporto = por_rec.get_int("I0"); // tipo di trasporto...
const char natura = doc.tipo().get("S3")[3]; // natura della transazione, valida per tutte le righe del documento const char natura = doc.tipo().get("S3")[3]; // natura della transazione, valida per tutte le righe del documento
const long numreg = rm.get_long(MOV_NUMREG); const long numreg = rm.get_long(MOV_NUMREG);
TString16 nomenclatura, ums, paeseorig, provincia, paese, codmag, commag; TString16 nomenclatura, ums, paeseorig, provincia, paese;
real totale_righe, massanun, unsuppun; real totale_righe, massanun, unsuppun;
const real cambio = doc.cambio(); const real cambio = doc.cambio();
const bool is_val = doc.in_valuta(); const bool is_val = doc.in_valuta();
@ -3349,15 +3353,28 @@ error_type TContabilizzazione::write_intra(TDocumento& doc)
const TRiga_documento& rr = doc[i]; const TRiga_documento& rr = doc[i];
if (rr.is_articolo()) if (rr.is_articolo())
{ {
codmag = rr.get(RDOC_CODMAG);
const TRectype& rec_anamag = cchh.get(LF_ANAMAG, rr.get(RDOC_CODARTMAG)); const TRectype& rec_anamag = cchh.get(LF_ANAMAG, rr.get(RDOC_CODARTMAG));
commag = cchh.get("MAG", codmag, "S5"); // Comune del magazzino
nomenclatura = rec_anamag.get(ANAMAG_CLASSDOG); nomenclatura = rec_anamag.get(ANAMAG_CLASSDOG);
ums = cchh.get("%NOC", nomenclatura, "S5"); ums = cchh.get("%NOC", nomenclatura, "S5");
massanun = rec_anamag.get_real(ANAMAG_MASSANUN); // Massa KG massanun = rec_anamag.get_real(ANAMAG_MASSANUN); // Massa KG
unsuppun = rec_anamag.get_real(ANAMAG_UNSUPPUN); // Massa UMS unsuppun = rec_anamag.get_real(ANAMAG_UNSUPPUN); // Massa UMS
paeseorig = !is_cessione ? rec_anamag.get(ANAMAG_PAESE) : EMPTY_STRING; // Campo solo per Acquisti paeseorig = !is_cessione ? rec_anamag.get(ANAMAG_PAESE) : EMPTY_STRING; // Campo solo per Acquisti
provincia = is_cessione ? rec_anamag.get(ANAMAG_PROV) : cchh.get(LF_COMUNI, commag, COM_PROVCOM); if (is_cessione)
provincia = rec_anamag.get(ANAMAG_PROV);
else
{
const TString8 codmag = rr.get(RDOC_CODMAG);
TString4 com = cchh.get("MAG", codmag, "S5"); // Comune del magazzino
if (com.empty())
{
const long codditta = prefix().get_codditta();
TString8 codulc; codulc.format("%ld|1", codditta);
const TRectype& unloc = cchh.get(LF_UNLOC, codulc);
com = unloc.get(ULC_COMULC);
}
provincia = cchh.get(LF_COMUNI, com, COM_PROVCOM);
}
if (nomenclatura.blank() || unsuppun.is_zero() || massanun.is_zero() || provincia.blank()) if (nomenclatura.blank() || unsuppun.is_zero() || massanun.is_zero() || provincia.blank())
{ {