Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : Personalizzazione DbService git-svn-id: svn://10.65.10.50/branches/R_10_00@22122 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
dcba1c1e51
commit
023c36c757
@ -55,31 +55,32 @@ const real TShuttle::scarto()
|
||||
TDistinta_tree d;
|
||||
TArray boom;
|
||||
|
||||
d.set_root(_codart_orig);
|
||||
if (_codart_orig == "255BTN075030FACN")
|
||||
int k = 1;
|
||||
if (d.explode(boom, false, RAGGR_EXP_NONE, 0, "A") > 0)
|
||||
if (_codart != _codart_orig)
|
||||
{
|
||||
const int items = boom.items();
|
||||
bool found = false;
|
||||
|
||||
for (int i = 0; i < items; i++)
|
||||
d.set_root(_codart_orig);
|
||||
if (d.explode(boom, false, RAGGR_EXP_NONE, 0, "A") > 0)
|
||||
{
|
||||
const TRiga_esplosione & re = (const TRiga_esplosione &) boom[i];
|
||||
|
||||
if (re.articolo() == _codart)
|
||||
const int items = boom.items();
|
||||
bool found = false;
|
||||
|
||||
for (int i = 0; i < items; i++)
|
||||
{
|
||||
if (re.curr_qta() != UNO && re.curr_qta() != ZERO)
|
||||
const TRiga_esplosione & re = (const TRiga_esplosione &) boom[i];
|
||||
|
||||
if (re.articolo() == _codart)
|
||||
{
|
||||
scarto *= re.curr_qta();
|
||||
scarto.round(3);
|
||||
found = true;
|
||||
if (re.curr_qta() != UNO && re.curr_qta() != ZERO)
|
||||
{
|
||||
scarto *= re.curr_qta();
|
||||
scarto.round(3);
|
||||
found = true;
|
||||
}
|
||||
break;
|
||||
}
|
||||
break;
|
||||
}
|
||||
if (!found)
|
||||
scarto = qta();
|
||||
}
|
||||
if (!found)
|
||||
scarto = qta();
|
||||
}
|
||||
scarto -= qta();
|
||||
return scarto < ZERO ? ZERO : scarto ;
|
||||
@ -294,7 +295,7 @@ void TRiepilogoProduzionePs0920::main_loop()
|
||||
out.set("AN", "Anno");
|
||||
out.set("NR", "Numero");
|
||||
out.set("AR", "Articolo");
|
||||
for (int i = 0; i < items;i++)
|
||||
for (i = 0; i < items;i++)
|
||||
{
|
||||
out.set(format("Q%1d", i), cache().get("IMP", (TString &)keysimp[i], "S0"));
|
||||
out.set(format("S%1d", i), "");
|
||||
@ -305,7 +306,7 @@ void TRiepilogoProduzionePs0920::main_loop()
|
||||
out.set("AN", "");
|
||||
out.set("NR", "");
|
||||
out.set("AR", "");
|
||||
for (int i = 0; i < items;i++)
|
||||
for (i = 0; i < items;i++)
|
||||
{
|
||||
out.set(format("Q%1d", i), "Quantità");
|
||||
out.set(format("S%1d", i), "Scarto");
|
||||
@ -322,7 +323,7 @@ void TRiepilogoProduzionePs0920::main_loop()
|
||||
|
||||
TProgind pi(items, "Esportazione");
|
||||
|
||||
for (int i = 0; i < items; i++)
|
||||
for (i = 0; i < items; i++)
|
||||
{
|
||||
pi.addstatus(1L);
|
||||
TShuttle * s = (TShuttle *) _riepilogo.objptr((TString &)keys[i]);
|
||||
|
Loading…
x
Reference in New Issue
Block a user