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

Patch level : 10.0

Browse Source 
Files correlati     : pd0610.exe
Ricompilazione Demo : [ ]
Commento            :
Aggiunti un po` di const


git-svn-id: svn://10.65.10.50/branches/R_10_00@22035 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2011-04-27 15:57:23 +00:00
parent 2f3171e41e
commit 6f1eec4750
1 changed files with 31 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

67
ps/pd0610200.cpp
View File

@ -289,8 +289,7 @@ void TCrea_ordini_srm_app::aggiorna_ordf(const TDocumento& ordc, const int nriga
ordf.put(DOC_CODLIST, codlist);
}
//gestione CONDV - Contratti
TString8 codcont = orfrow.get(first ? "CF1" : "CF2");
const TString8 codcont = orfrow.get(first ? "CF1" : "CF2");
if (codcont.full())
{
keyc.cut(0);
@ -298,26 +297,24 @@ void TCrea_ordini_srm_app::aggiorna_ordf(const TDocumento& ordc, const int nriga
keyc.add(""); //categoria di vendita
keyc.add('F'); //tipocf
keyc.add(codcf); //codcf
keyc.add(orfrow.get(first ? "CF1" : "CF2"));
keyc.add(codcont);
const TRectype & contr = cache().get(LF_CONDV, keyc);
if (!contr.empty())
ordf.put(DOC_CODCONT, codcont);
else
codcont.cut(0);
}
if (codcont.full())
{
keyc.cut(0);
keyc.add('C'); //tipo
keyc.add(""); //categoria di vendita
keyc.add('F'); //tipocf
keyc.add(codcf); //codcf
keyc.add("001"); //codice contratto
{
keyc.cut(0);
keyc.add('C'); //tipo
keyc.add(""); //categoria di vendita
keyc.add('F'); //tipocf
keyc.add(codcf); //codcf
keyc.add("001"); //codice contratto
const TRectype & contr1 = cache().get(LF_CONDV, keyc);
if (!contr1.empty())
ordf.put(DOC_CODCONT, "001");
const TRectype & contr1 = cache().get(LF_CONDV, keyc);
if (!contr1.empty())
ordf.put(DOC_CODCONT, "001");
}
}
ordini_fornitore(ordc, nriga, ordf);
@ -347,7 +344,7 @@ TDoc_key * TCrea_ordini_srm_app::crea_ordf(const TDocumento& ordc, const long nr
//gestione CONDV - Listini
if (codlist.full())
{
keyc.add('L'); //tipo
keyc.add('L'); // 'L'istino
keyc.add(ordf.get(DOC_CATVEN)); //categoria di vendita
keyc.add(""); //tipocf
keyc.add(""); //codcf
@ -358,35 +355,33 @@ TDoc_key * TCrea_ordini_srm_app::crea_ordf(const TDocumento& ordc, const long nr
ordf.put(DOC_CODLIST, codlist);
}
//gestione CONDV - Contratti
TString8 codcont = orfrow.get(first ? "CF1" : "CF2");
const TString8 codcont = orfrow.get(first ? "CF1" : "CF2");
if (codcont.full())
{
keyc.cut(0);
keyc.add('C'); //tipo
keyc.add(""); //categoria di vendita
keyc.add('F'); //tipocf
keyc.add(codcf); //codcf
keyc.add(orfrow.get(first ? "CF1" : "CF2"));
keyc.add('C'); // 'C'ontratti
keyc.add(""); // categoria di vendita nulla sui contratti
keyc.add('F'); // tipocf
keyc.add(codcf); // codcf
keyc.add(codcont); // codice contratto
const TRectype & contr = cache().get(LF_CONDV, keyc);
if (!contr.empty())
ordf.put(DOC_CODCONT, codcont);
else
codcont.cut(0);
}
if (codcont.full())
{
keyc.cut(0);
keyc.add('C'); //tipo
keyc.add(""); //categoria di vendita
keyc.add('F'); //tipocf
keyc.add(codcf); //codcf
keyc.add("001"); //codice contratto
{
keyc.cut(0);
keyc.add('C'); // 'C'ontratti
keyc.add(""); // categoria di vendita nulla sui contratti
keyc.add('F'); // tipocf
keyc.add(codcf); // codcf
keyc.add("001"); // codice contratto di default
const TRectype & contr1 = cache().get(LF_CONDV, keyc);
if (!contr1.empty())
ordf.put(DOC_CODCONT, "001");
const TRectype & contr1 = cache().get(LF_CONDV, keyc);
if (!contr1.empty())
ordf.put(DOC_CODCONT, "001");
}
}
TRiga_documento & row = ordf.new_row("05");