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

Patch level : 10.0

Browse Source 
Files correlati     : mg4.exe mg4200a.frm mg4200b.frm
Ricompilazione Demo : [ ]
Commento            :
Corretta stampa inventario per magazzini con totali per livello di giacenza (cliente Hardy)


git-svn-id: svn://10.65.10.50/branches/R_10_00@21709 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2011-02-24 11:13:15 +00:00
parent b9538b78b5
commit a2af48e4a3
3 changed files with 34 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
mg/mg4200.cpp
View File

@ -635,8 +635,12 @@ void TStampa_inventario::setprint_permagazzini(const char subordine, const bool
espr1 = "ANNOES|CODMAG[1,3]|CODART|LIVELLO|CODMAG[4,5]";
else
espr1 = "ANNOES|CODMAG|CODART|LIVELLO";
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
//_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
//_form->set_ordering(mg_normale);
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODMAG+CODART",_strexpr);
_form->find_field('B',odd_page,"GRUPPI_CATMER").setcondition("CODMAG+CODART",_strexpr);
break;
case 'D':
_form->find_field('B',odd_page,"H_CATMER").hide();
@ -647,8 +651,12 @@ void TStampa_inventario::setprint_permagazzini(const char subordine, const bool
espr1 = "ANNOES|CODMAG[1,3]|UPPER(47->DESCR)|LIVELLO|CODMAG[4,5]";
else
espr1 = "ANNOES|CODMAG|UPPER(47->DESCR)|LIVELLO";
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
//_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
//_form->set_ordering(mg_normale);
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODMAG+CODART",_strexpr);
_form->find_field('B',odd_page,"GRUPPI_CATMER").setcondition("CODMAG+CODART",_strexpr);
if (m.get(F_DADES).full())
cfilter << and_connect(cfilter) << "(UPPER(47->DESCR)>=\"" << m.get(F_DADES) << "\")";
if (m.get(F_ADES).full())
@ -793,8 +801,10 @@ void TStampa_inventario::setprint_perarticoli(const char subordine, const bool a
_form->find_field('B',odd_page,"H_SCATMER").hide();
_form->find_field('B',odd_page,"TOT_SCATMER").hide();
espr1 = "ANNOES|CODART|LIVELLO|CODMAG";
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
if (m.get(F_DAART).full())
cfilter << and_connect(cfilter) << "(CODART>=\"" << m.get(F_DAART) << "\")";
if (m.get(F_AART).full())
@ -964,8 +974,9 @@ void TStampa_inventario::setprint_perarticoli_all(const char subordine, bool all
_form->find_field('B',odd_page,"TOT_CATMER").hide();
_form->find_field('B',odd_page,"H_SCATMER").hide();
_form->find_field('B',odd_page,"TOT_SCATMER").hide();
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
break;
case 'D':
_form->cursor()->setkey(2); sortexp = ANAMAG_DESCR;
@ -975,8 +986,9 @@ void TStampa_inventario::setprint_perarticoli_all(const char subordine, bool all
_form->find_field('B',odd_page,"TOT_CATMER").hide();
_form->find_field('B',odd_page,"H_SCATMER").hide();
_form->find_field('B',odd_page,"TOT_SCATMER").hide();
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
_form->find_field('B',odd_page,"GRUPPI_SCATMER").setcondition("CODART",_strexpr);
_form->set_ordering(mg_normale);
break;
case 'S':
case 'M':

8
mg/mg4200a.frm
View File

@ -1311,11 +1311,19 @@ SECTION BODY ODD 0 COLUMNWISE
KEY ""
PROMPT 3 1 ""
END
STRINGA 551 20
BEGIN
KEY ""
PROMPT 2 1 ""
END
STRINGA -1 19
BEGIN
KEY "Spaziatura"
PROMPT 4 1 ""
END
STRINGA 553 3
BEGIN
KEY "UM"

5
mg/mg4200b.frm
View File

@ -1052,6 +1052,11 @@ SECTION BODY ODD 1 COLUMNWISE
KEY ""
PROMPT 2 1 ""
END
STRINGA -1 19
BEGIN
KEY "Spacer"
PROMPT 4 1 ""
END
STRINGA 553 3
BEGIN
KEY "UM"