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

git-svn-id: svn://10.65.10.50/branches/R_10_00@22983 c028cbd2-c16b-5b4b-a496-9718f37d4682

Browse Source
This commit is contained in:
guy 2014-07-30 12:59:19 +00:00
parent 3a99fafe2d
commit 097d7f6fe0
6 changed files with 37 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
ps/pd0610200.cpp
View File

@ -122,9 +122,9 @@ protected:
virtual void main_loop(); virtual void main_loop();
const real cerca_prezzo(const char* codart, const TDocumento & ordf); const real cerca_prezzo(const char* codart, const TDocumento & ordf) const;
const bool cerca_orf(TDoc_key& dadoc, const long daidriga, const long codfor, TDoc_key& ordf); const bool cerca_orf(TDoc_key& dadoc, const long daidriga, const long codfor, TDoc_key& ordf);
void aggiorna_righe(TDocumento& ordf, const TDocumento& ordc, const TRiga_documento& rordc, TRiga_documento& rordf, int idrigac); void aggiorna_righe(const TRiga_documento& rordc, TRiga_documento& rordf) const;
void ordini_fornitore(const TDocumento& ordc, const int nriga, TDocumento& ordf); void ordini_fornitore(const TDocumento& ordc, const int nriga, TDocumento& ordf);
void aggiorna_ordf(const TDocumento& ordc, const int nriga, const TDoc_key& adoc, TOrdf_cache& ca, bool first); void aggiorna_ordf(const TDocumento& ordc, const int nriga, const TDoc_key& adoc, TOrdf_cache& ca, bool first);
@ -139,7 +139,7 @@ public:
}; };
//CERCA_PREZZO: cerco il prezzo di un articolo per un dato fornitore //CERCA_PREZZO: cerco il prezzo di un articolo per un dato fornitore
const real TCrea_ordini_srm_app::cerca_prezzo(const char* codart, const TDocumento & ordf) const real TCrea_ordini_srm_app::cerca_prezzo(const char* codart, const TDocumento & ordf) const
{ {
TToken_string key; TToken_string key;
@ -215,22 +215,20 @@ const bool TCrea_ordini_srm_app::cerca_orf(TDoc_key& dadoc, const long daidriga,
} }
//AGGIORNA_RIGHE: riempie le righe dell'ordine fornitore con i dati corretti //AGGIORNA_RIGHE: riempie le righe dell'ordine fornitore con i dati corretti
void TCrea_ordini_srm_app::aggiorna_righe(TDocumento& ordf, const TDocumento& ordc, const TRiga_documento& rordc, TRiga_documento& rordf, int idrigac) void TCrea_ordini_srm_app::aggiorna_righe(const TRiga_documento& rordc, TRiga_documento& rordf) const
{ {
ordf.copy_data(rordf, rordc); const TDocumento& ordf = rordf.doc();
TDocumento::copy_data(rordf, rordc);
rordf.put(RDOC_PREZZO, cerca_prezzo(rordf.get(RDOC_CODART), ordf)); rordf.put(RDOC_PREZZO, cerca_prezzo(rordf.get(RDOC_CODART), ordf));
rordf.zero(RDOC_CODAGG1); rordf.zero(RDOC_CODAGG1);
rordf.zero(RDOC_CODAGG2); rordf.zero(RDOC_CODAGG2);
rordf.zero(RDOC_PERCPROV); rordf.zero(RDOC_PERCPROV);
rordf.zero(RDOC_PERCPROV1); rordf.zero(RDOC_PERCPROV1);
rordf.put(RDOC_DAPROVV, ordc.get_char(DOC_PROVV)); rordf.set_original_rdoc_key(rordc);
rordf.put(RDOC_DAANNO, ordc.get_int(DOC_ANNO));
rordf.put(RDOC_DACODNUM, ordc.get(DOC_CODNUM));
rordf.put(RDOC_DANDOC, ordc.get(DOC_NDOC));
rordf.put(RDOC_DAIDRIGA, idrigac);
rordf.dirty_fields(); rordf.dirty_fields();
const real r = rordf.get("IMPNS"); // serve per aggiornare i valori della riga rordf.get("IMPNS"); // serve per aggiornare i valori della riga
} }
//ORDINI_FORNITORE: genera effettivamente gli ordini fornitore //ORDINI_FORNITORE: genera effettivamente gli ordini fornitore
@ -247,14 +245,15 @@ void TCrea_ordini_srm_app::ordini_fornitore(const TDocumento& ordc, const int nr
if (idrigac == rordf->get_int(RDOC_DAIDRIGA)) if (idrigac == rordf->get_int(RDOC_DAIDRIGA))
{ {
trovato = true; trovato = true;
aggiorna_righe(ordf, ordc, rordc, *rordf, idrigac); aggiorna_righe(rordc, *rordf);
break; // Aggiunto 21/7/2014
} }
} }
if (!trovato) if (!trovato)
{ {
TRiga_documento& rordf = ordf.new_row(); TRiga_documento& rordf = ordf.new_row();
aggiorna_righe(ordf, ordc, rordc, rordf, idrigac); aggiorna_righe(rordc, rordf);
} }
} }

1
ps/ps0430100.cpp
View File

@ -281,7 +281,6 @@ int TRelArticoli_multirel_app::read(TMask& m)
{ {
const TRectype& curr = get_relation()->lfile().curr(); const TRectype& curr = get_relation()->lfile().curr();
TArt_mask& mask = (TArt_mask&)m; TArt_mask& mask = (TArt_mask&)m;
mask.update_sheet(); mask.update_sheet();
return NOERR; return NOERR;
} }

4
ps/ps0713300.cpp
View File

@ -82,7 +82,7 @@ bool TImporta_fatacq_app::get_doc(const TFilename& file, const TMask & m)
TDocumento doc('D', datadoc.year(), m.get(F_CODNUM), 0L); TDocumento doc('D', datadoc.year(), m.get(F_CODNUM), 0L);
TVB_recset s(file, ','); TVB_recset s(file, ',');
TProgress_monitor pi(s.items(),"Importazione fatture in corso ..."); TProgress_monitor pi(s.items(), TR("Importazione fatture in corso ..."));
doc.put(DOC_TIPODOC, m.get(F_TIPODOC)); doc.put(DOC_TIPODOC, m.get(F_TIPODOC));
doc.put(DOC_TIPOCF, "F"); doc.put(DOC_TIPOCF, "F");
@ -122,7 +122,7 @@ bool TImporta_fatacq_app::get_doc(const TFilename& file, const TMask & m)
TCommessa_string ankey = cms.cmsstr(); TCommessa_string ankey = cms.cmsstr();
TString descr; TString descr;
descr << " Id. Lavoro " << codcom; descr << TR(" Id. Lavoro ") << codcom;
row.put(RDOC_DESCR, descr); row.put(RDOC_DESCR, descr);
row.put(RDOC_CODCMS, codcom); row.put(RDOC_CODCMS, codcom);

13
ps/ps0713400.cpp
View File

@ -213,7 +213,7 @@ bool TImporta_fatven_app::transfer(const TFilename& file)
for (bool ok = s.move_first(); ok; ok = s.move_next()) for (bool ok = s.move_first(); ok; ok = s.move_next())
{ {
if (!pi.addstatus(1)) if (!pi.add_status())
break; break;
//leggo il contenuto del tracciato record //leggo il contenuto del tracciato record
@ -327,7 +327,8 @@ bool TImporta_fatven_app::transfer(const TFilename& file)
const int err = clifo.write(); const int err = clifo.write();
if (err != NOERR) if (err != NOERR)
{ {
msg.cut(0) << "Impossibile inserire il cliente " << codcf << " : errore" << err; msg.cut(0) << TR("Impossibile inserire il cliente ") << codcf
<< TR(" : errore ") << err;
log.log(2, msg); log.log(2, msg);
} }
} }
@ -386,7 +387,7 @@ bool TImporta_fatven_app::transfer(const TFilename& file)
{ {
if (is_new) if (is_new)
{ {
msg.cut(0) << "Inserito documento " << ndoc; msg.cut(0) << TR("Inserito documento ") << ndoc;
log.log(0, msg); log.log(0, msg);
} }
@ -397,10 +398,10 @@ bool TImporta_fatven_app::transfer(const TFilename& file)
{ {
msg.cut(0); msg.cut(0);
if (is_new) if (is_new)
msg << "Impossibile creare"; msg << TR("Impossibile creare");
else else
msg << "Impossibile aggiornare"; msg << TR("Impossibile aggiornare");
msg << " il documento " << ndoc << " : errore" << err; msg << TR(" il documento ") << ndoc << TR(" : errore ") << err;
log.log(2, msg); log.log(2, msg);
} }
} }

17
ps/ps0713lib.cpp
View File

@ -56,17 +56,15 @@ TCommessa_string::TCommessa_string(const char* idlavoro, const int gruppo, const
//// TCOMMESSA //// //// TCOMMESSA ////
///////////////////////// /////////////////////////
/*
//CODICE: metodo che restituisce il codice di ripartizione //CODICE: metodo che restituisce il codice di ripartizione
const TString8 TCommessa::codice() const const TString& TCommessa::codice() const
{ { return _codice; }
return _codice; */
}
//CMSSTR: metodo che restituisce la TToken_string contenente le informazioni di codcms e del conto //CMSSTR: metodo che restituisce la TToken_string contenente le informazioni di codcms e del conto
const TCommessa_string TCommessa::cmsstr() const const TCommessa_string& TCommessa::cmsstr() const
{ { return _commessa; }
return _commessa;
}
//metodo costruttore //metodo costruttore
TCommessa::TCommessa(const char* codcms) TCommessa::TCommessa(const char* codcms)
@ -76,8 +74,7 @@ TCommessa::TCommessa(const char* codcms)
const int conto = atoi(str.mid(3,3)) > 0 ? atoi(str.mid(3,3)) : 0; const int conto = atoi(str.mid(3,3)) > 0 ? atoi(str.mid(3,3)) : 0;
const long sotco = atol(str.right(6)) > 0L ? atol(str.right(6)) : 0L; const long sotco = atol(str.right(6)) > 0L ? atol(str.right(6)) : 0L;
TCommessa_string cms(codcms, gruppo, conto, sotco); const TCommessa_string cms(codcms, gruppo, conto, sotco);
_commessa = cms; _commessa = cms;
} }

6
ps/ps0713lib.h
View File

@ -39,12 +39,12 @@ public:
//Classe TCommessa //Classe TCommessa
class TCommessa : public TObject class TCommessa : public TObject
{ {
TString8 _codice; //TString8 _codice;
TCommessa_string _commessa; TCommessa_string _commessa;
public: public:
const TString8 codice() const; //const TString& codice() const;
const TCommessa_string cmsstr() const; const TCommessa_string& cmsstr() const;
TCommessa(const char* codcms); TCommessa(const char* codcms);
}; };