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

Patch level : 10.0 NO PATCH

Browse Source 
Files correlati     : ps0610
Ricompilazione Demo : [ ]
Commento            :
Sistemati i codici fornitori


git-svn-id: svn://10.65.10.50/branches/R_10_00@21247 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2010-12-07 10:14:55 +00:00
parent e91c33f5c1
commit e900e73807
1 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ps/pd0610200.cpp
View File

@ -251,8 +251,13 @@ void TCrea_ordini_srm_app::ordini_fornitore(const TDocumento& ordc, const int nr
{
trovato = true;
ordf.copy_data(rordf, rordc);
rordf.put("FOR1", 0); //cazzone
rordf.put("FOR2", 0); //cazzone
rordf.put(RDOC_CODAGG1, 0);
rordf.put(RDOC_CODAGG2, 0);
rordf.put(RDOC_DAPROVV, ordc.get_char(DOC_PROVV));
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);
}
}
@ -260,8 +265,8 @@ void TCrea_ordini_srm_app::ordini_fornitore(const TDocumento& ordc, const int nr
{
TRiga_documento& rordf = ordf.new_row();
ordf.copy_data(rordf, rordc);
rordf.put("FOR1", 0); //cazzone
rordf.put("FOR2", 0); //cazzone
rordf.put(RDOC_CODAGG1, 0);
rordf.put(RDOC_CODAGG2, 0);
rordf.put(RDOC_DAPROVV, ordc.get_char(DOC_PROVV));
rordf.put(RDOC_DAANNO, ordc.get_int(DOC_ANNO));
rordf.put(RDOC_DACODNUM, ordc.get(DOC_CODNUM));
@ -350,8 +355,8 @@ void TCrea_ordini_srm_app::elabora_ordini_cliente()
for(int i = 1; i <= ordc.rows(); i++)
{
TRiga_documento& rordc = ordc[i];
const long codfor1 = rordc.get_long("FOR1"); //da prendere dalla riga cazzone
const long codfor2 = rordc.get_long("FOR2"); //da prendere dalla riga cazzone
const long codfor1 = rordc.get_long(RDOC_CODAGG1); //da prendere dalla riga
const long codfor2 = rordc.get_long(RDOC_CODAGG2); //da prendere dalla riga
const int idrigac = rordc.get_int(RDOC_IDRIGA);
if(cerca_orf(dadoc, idrigac, codfor1, codfor2, ordf1, ordf2))