diff --git a/mg/mg3100.h b/mg/mg3100.h
new file mode 100755
index 000000000..fa644e77f
--- /dev/null
+++ b/mg/mg3100.h
@@ -0,0 +1,39 @@
+#define F_ORDINE 101
+#define F_ORDINEART 102
+#define F_ORDINEMAG 103
+#define F_ANNOES 104
+#define F_DAART 105
+#define F_AART 106
+#define F_DAMAG 107
+#define F_AMAG 108
+#define F_DACATMER 109
+#define F_ACATMER 110
+#define F_DADES 111
+#define F_ADES 112
+#define F_VALMEDI 113
+#define F_STAMPAGIAC 114
+#define F_RAGGCODICE 115
+#define F_FROMLIVELLOART 116
+#define F_TOLIVELLOART 117
+#define F_RAGGLIVGIAC 118
+#define F_TOTALIMAGAZZINI 119
+#define F_TOTALIDEPOSITI 120
+
+#define F_ENABLEMAGAZZINI 121
+#define F_DETTAGLIOMAG 122
+#define F_DETTAGLIODEP 123
+#define F_FROMLIVELLOGIAC 124
+#define F_TOLIVELLOGIAC 125
+#define F_FILTRO 126
+#define F_PREZZIVALORI 127
+#define F_CODLISTINO 128
+#define F_CATVENLISTINO 129
+
+
+#define G_CATMER 1 
+#define G_CODART 2
+#define G_DESART 3
+#define G_PARAMVALORI 4
+#define G_LISTINO 5
+
+
diff --git a/mg/mg3100.uml b/mg/mg3100.uml
new file mode 100755
index 000000000..3ab6a836f
--- /dev/null
+++ b/mg/mg3100.uml
@@ -0,0 +1,296 @@
+#include "mg3100.h"
+PAGE "Stampa dati storici" -1 -1 78 20
+
+LIST F_PREZZIVALORI 18
+BEGIN
+  PROMPT 2 1 ""
+	ITEM "V|Saldi e valori"
+	MESSAGE SHOW,G_PARAMVALORI@ |HIDE,G_LISTINO@
+	ITEM "P|Costi e prezzi"
+	MESSAGE RESET,F_STAMPAGIAC|HIDE,G_PARAMVALORI@|SHOW,G_LISTINO@
+END
+
+BOOL F_VALMEDI 
+BEGIN
+  PROMPT 32 1 "Valori medi     "
+	GROUP G_PARAMVALORI
+END
+
+BOOL F_STAMPAGIAC 
+BEGIN
+  PROMPT 52 1 "Stampa giacenza "
+	GROUP G_PARAMVALORI
+END
+
+STRING F_CATVENLISTINO 2
+BEGIN
+	FLAGS "U"
+	PROMPT 32 1 "Cat. ven. "
+  USE CVE
+  INPUT CODTAB F_CATVENLISTINO 
+  DISPLAY "Cat." CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CATVENLISTINO CODTAB
+  CHECKTYPE NORMAL
+	GROUP G_LISTINO
+END
+
+STRING F_CODLISTINO 3
+BEGIN
+	FLAGS "U"
+  PROMPT 52 1 "Codice listino "
+	USE LF_CONDV 
+	INPUT TIPO "L"
+	INPUT COD F_CODLISTINO 
+	DISPLAY "Codice" COD
+	DISPLAY "Descrizione@30" DESCR
+	OUTPUT F_CODLISTINO  COD 
+	CHECKTYPE NORMAL
+	GROUP G_LISTINO
+END
+
+LISTBOX F_ORDINE 10
+BEGIN
+  PROMPT 2 2 "Ordinamento   "
+	ITEM "A|articoli"
+	MESSAGE ENABLE,F_ORDINEART
+	ITEM "M|magazzini"
+	MESSAGE "C",F_ORDINEART|K_SPACE,F_ORDINEART|DISABLE,F_ORDINEART|SHOW,G_CODART@|HIDE,G_DESART@
+END
+
+
+LISTBOX F_ORDINEART 20
+BEGIN
+	FLAGS "G"
+  PROMPT 34 2 "sotto-ordinamento "
+	ITEM "C|codice"
+	MESSAGE HIDE,G_CATMER@|ENABLE,G_CODART@|HIDE,G_DESART@
+	ITEM "D|descrizione"
+	MESSAGE HIDE,G_CATMER@|DISABLE,G_CODART@|SHOW,G_DESART@
+	ITEM "M|gruppo merc./codice"
+	MESSAGE SHOW,G_CATMER@|ENABLE,G_CODART@|HIDE,G_DESART@
+END
+
+NUMBER F_ANNOES 4
+BEGIN
+	FLAGS "A"
+  PROMPT 2 3 "Codice es.    "
+	USE ESC
+	INPUT CODTAB F_ANNOES
+	DISPLAY "Esercizio" CODTAB
+	DISPLAY "Dal@12" D0
+	DISPLAY "Al@12" D0
+	OUTPUT F_ANNOES CODTAB
+END
+
+LISTBOX F_FILTRO 20
+BEGIN
+	FLAGS "G"
+  PROMPT 45 3 "Filtro "
+	ITEM "T|tutto"
+	ITEM "S|sotto scorta"
+	ITEM "P|positivi"
+	ITEM "N|negativi"
+	ITEM "0|non nulli"
+END
+
+STRING F_DAART 20
+BEGIN
+  PROMPT 2 5 "Dall'articolo "
+	FLAGS "U"
+	USE LF_ANAMAG 
+	INPUT CODART F_DAART
+	DISPLAY "Codice" CODART
+	DISPLAY "Descr@50" DESCR
+	OUTPUT F_DAART CODART
+	GROUP G_CODART
+END
+STRING F_AART 20
+BEGIN
+  PROMPT 2 6 " all'articolo "
+	FLAGS "U"
+	COPY USE F_DAART
+	INPUT CODART F_AART
+	COPY DISPLAY F_DAART
+	OUTPUT F_AART CODART
+	GROUP G_CODART
+END
+
+STRING F_DADES 50
+BEGIN
+  PROMPT 2 5 "Dall'articolo "
+	FLAGS "U"
+	USE LF_ANAMAG KEY 2
+	INPUT DESCR F_DADES
+	DISPLAY "Descr@50" DESCR
+	DISPLAY "Codice" CODART
+	OUTPUT F_DADES DESCR
+	GROUP G_DESART
+END
+STRING F_ADES 50
+BEGIN
+  PROMPT 2 6 " all'articolo "
+	FLAGS "U"
+	COPY USE F_DADES
+	INPUT DESCR F_ADES
+	COPY DISPLAY F_DADES
+	OUTPUT F_ADES DESCR
+	GROUP G_DESART
+END
+
+
+STRING F_DAMAG 3 
+BEGIN
+  PROMPT 2 8 "Dal magazzino "
+	FLAGS "U"
+	USE MAG SELECT CODTAB[4,5]=="" && CODTAB[1,3]!="" 
+	INPUT CODTAB F_DAMAG
+	DISPLAY "Codice" CODTAB
+	DISPLAY "Descr@50" S0
+	OUTPUT F_DAMAG CODTAB
+END
+
+STRING F_AMAG 3
+BEGIN
+  PROMPT 2 9 " al magazzino "
+	FLAGS "U"
+	COPY USE F_DAMAG
+	INPUT CODTAB F_AMAG
+	COPY DISPLAY F_DAMAG
+	OUTPUT F_AMAG CODTAB
+END
+
+STRING F_DACATMER 3 
+BEGIN
+  PROMPT 2 11 "Dal gruppo   "
+	FLAGS "U"
+	USE GMC SELECT CODTAB[4,5]==""
+	INPUT CODTAB F_DACATMER
+	DISPLAY "Codice" CODTAB
+	DISPLAY "Descr@50" S0
+	OUTPUT F_DACATMER CODTAB[1,3]
+	GROUP G_CATMER
+END
+
+
+STRING F_ACATMER 3
+BEGIN
+  PROMPT 2 12 " al gruppo   "
+	FLAGS "U"
+	COPY USE F_DACATMER
+	INPUT CODTAB F_ACATMER
+	COPY DISPLAY F_DACATMER
+	OUTPUT F_ACATMER CODTAB[1,3]
+	GROUP G_CATMER
+END
+
+BOOLEAN F_RAGGCODICE
+BEGIN
+  PROMPT 2 14 "Raggruppo gli articoli"
+	MESSAGE FALSE CLEAR,F_FROMLIVELLOART|CLEAR,F_TOLIVELLOART|CHECK,F_TOLIVELLOART
+	MESSAGE TRUE ENABLE,F_FROMLIVELLOART|ENABLE,F_TOLIVELLOART|CHECK,F_TOLIVELLOART
+END
+
+NUMBER F_FROMLIVELLOART 1
+BEGIN
+	FLAGS "G"
+  PROMPT 42 14 "da "
+	USE FCA
+	INPUT CODTAB F_FROMLIVELLOART
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_FROMLIVELLOART CODTAB 
+	NUM_EXPR ((#F_FROMLIVELLOART<=#F_TOLIVELLOART)||(#F_TOLIVELLOART=0))&&((#F_FROMLIVELLOGIAC*#F_FROMLIVELLOART)=0)
+	CHECKTYPE NORMAL
+	WARNING "Livello iniziale non ammissibile"
+END
+
+NUMBER F_TOLIVELLOART 1
+BEGIN
+  PROMPT 52 14 "a "
+	USE FCA
+	INPUT CODTAB F_TOLIVELLOART
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_TOLIVELLOART CODTAB 
+	CHECKTYPE NORMAL
+	NUM_EXPR ((#F_FROMLIVELLOART<=#F_TOLIVELLOART)||(#F_TOLIVELLOART=0))&&(((#F_TOLIVELLOGIAC+#F_FROMLIVELLOGIAC)*#F_TOLIVELLOART)=0)
+	WARNING "Livello finale non ammissibile"
+END
+
+BOOL F_RAGGLIVGIAC
+BEGIN
+  PROMPT 2 15 "Raggruppo le giacenze"
+	MESSAGE FALSE CLEAR,F_FROMLIVELLOGIAC|CLEAR,F_TOLIVELLOGIAC|CHECK,F_TOLIVELLOGIAC
+	MESSAGE TRUE ENABLE,F_FROMLIVELLOGIAC|ENABLE,F_TOLIVELLOGIAC
+END
+
+NUMBER F_FROMLIVELLOGIAC 1
+BEGIN
+	FLAG "D"
+  PROMPT 42 15 "da "
+	USE FCG
+	INPUT CODTAB F_FROMLIVELLOGIAC
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_FROMLIVELLOGIAC CODTAB 
+	CHECKTYPE NORMAL
+	NUM_EXPR ((#F_FROMLIVELLOGIAC*(#F_FROMLIVELLOART+#F_TOLIVELLOART))=0)&&((#F_FROMLIVELLOGIAC<=#F_TOLIVELLOGIAC)||(#F_TOLIVELLOGIAC=0))
+
+	WARNING "Livello iniziale non ammissibile"
+END
+
+NUMBER F_TOLIVELLOGIAC 1
+BEGIN
+	FLAG "D"
+  PROMPT 52 15 "a "
+	USE FCG
+	INPUT CODTAB F_TOLIVELLOGIAC
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_TOLIVELLOGIAC CODTAB 
+	NUM_EXPR ((#F_FROMLIVELLOGIAC*#F_FROMLIVELLOART)=0)&&((#F_FROMLIVELLOGIAC<=#F_TOLIVELLOGIAC)||(#F_TOLIVELLOGIAC=0))&&((#F_TOLIVELLOGIAC*#F_TOLIVELLOART)=0)
+	WARNING "Livello finale non ammissibile"
+	CHECKTYPE NORMAL
+END
+
+
+BOOL F_TOTALIMAGAZZINI
+BEGIN
+  PROMPT 2 16 "Stampo i totali di magazzino"
+	MESSAGE TRUE ENABLE,F_DETTAGLIOMAG
+	MESSAGE FALSE CLEAR,F_DETTAGLIOMAG|K_SPACE,F_DETTAGLIOMAG
+END
+
+BOOL F_DETTAGLIOMAG
+BEGIN
+  PROMPT 42 16 "Stampa il dettaglio magazzini"
+	MESSAGE TRUE ENABLE,F_TOTALIDEPOSITI
+	MESSAGE FALSE CLEAR,F_TOTALIDEPOSITI|K_SPACE,F_TOTALIDEPOSITI
+END
+
+BOOL F_TOTALIDEPOSITI
+BEGIN
+  PROMPT 2 17 "Stampo i totali di deposito"
+	MESSAGE TRUE ENABLE,F_DETTAGLIODEP
+	MESSAGE FALSE CLEAR,F_DETTAGLIODEP|K_SPACE,F_DETTAGLIODEP
+END
+
+BOOL F_DETTAGLIODEP
+BEGIN
+  PROMPT 42 17 "Stampa il dettaglio depositi"
+END
+
+
+BUTTON DLG_OK 10 2
+BEGIN
+  PROMPT -12 -1 ""
+END
+
+BUTTON DLG_QUIT 10 2
+BEGIN
+  PROMPT -22 -1 ""
+END
+
+ENDPAGE
+ENDMASK
diff --git a/mg/mg3400.h b/mg/mg3400.h
new file mode 100755
index 000000000..c8a0b17c2
--- /dev/null
+++ b/mg/mg3400.h
@@ -0,0 +1,32 @@
+#define F_ORDINE 101
+#define F_ORDINEART 102
+#define F_ORDINEMAG 103
+#define F_ANNOES 104
+#define F_DAART 105
+#define F_AART 106
+#define F_DAMAG 107
+#define F_AMAG 108
+#define F_DACATMER 109
+#define F_ACATMER 110
+#define F_DADES 111
+#define F_ADES 112
+#define F_RAGGCODICE 115
+#define F_FROMLIVELLOART 116
+#define F_TOLIVELLOART 117
+#define F_RAGGLIVGIAC 118
+#define F_TOTALIMAGAZZINI 119
+#define F_TOTALIDEPOSITI 120
+
+#define F_ENABLEMAGAZZINI 121
+#define F_DETTAGLIOMAG 122
+#define F_DETTAGLIODEP 123
+#define F_FROMLIVELLOGIAC 124
+#define F_TOLIVELLOGIAC 125
+
+#define F_DIM_E_NOTE 126
+
+
+#define G_CATMER 1 
+#define G_CODART 2
+#define G_DESART 3
+
diff --git a/mg/mg3400.uml b/mg/mg3400.uml
new file mode 100755
index 000000000..630d2da9b
--- /dev/null
+++ b/mg/mg3400.uml
@@ -0,0 +1,237 @@
+#include "mg3400.h"
+PAGE "Stampa giacenze e prezzi" -1 -1 78 20
+
+LISTBOX F_ORDINE 10
+BEGIN
+  PROMPT 2 1 "Ordinamento   "
+	ITEM "A|articoli"
+	MESSAGE ENABLE,F_ORDINEART
+	ITEM "M|magazzini"
+	MESSAGE "C",F_ORDINEART|K_SPACE,F_ORDINEART|DISABLE,F_ORDINEART|SHOW,G_CODART@|HIDE,G_DESART@
+END
+
+
+LISTBOX F_ORDINEART 20
+BEGIN
+	FLAGS "G"
+  PROMPT 34 1 "sotto-ordinamento "
+	ITEM "C|codice"
+	MESSAGE HIDE,G_CATMER@|ENABLE,G_CODART@|HIDE,G_DESART@
+	ITEM "D|descrizione"
+	MESSAGE HIDE,G_CATMER@|DISABLE,G_CODART@|SHOW,G_DESART@
+	ITEM "M|gruppo merc./codice"
+	MESSAGE SHOW,G_CATMER@|ENABLE,G_CODART@|HIDE,G_DESART@
+END
+
+NUMBER F_ANNOES 4
+BEGIN
+	FLAGS "A"
+  PROMPT 2 2 "Codice es.    "
+END
+
+STRING F_DAART 20
+BEGIN
+  PROMPT 2 4 "Dall'articolo "
+	FLAGS "U"
+	USE LF_ANAMAG 
+	INPUT CODART F_DAART
+	DISPLAY "Codice" CODART
+	DISPLAY "Descr@50" DESCR
+	OUTPUT F_DAART CODART
+	GROUP G_CODART
+END
+STRING F_AART 20
+BEGIN
+  PROMPT 2 5 " all'articolo "
+	FLAGS "U"
+	COPY USE F_DAART
+	INPUT CODART F_AART
+	COPY DISPLAY F_DAART
+	OUTPUT F_AART CODART
+	GROUP G_CODART
+END
+
+STRING F_DADES 50
+BEGIN
+  PROMPT 2 4 "Dall'articolo "
+	FLAGS "U"
+	USE LF_ANAMAG KEY 2
+	INPUT DESCR F_DADES
+	DISPLAY "Descr@50" DESCR
+	DISPLAY "Codice" CODART
+	OUTPUT F_DADES DESCR
+	GROUP G_DESART
+END
+STRING F_ADES 50
+BEGIN
+  PROMPT 2 5 " all'articolo "
+	FLAGS "U"
+	COPY USE F_DADES
+	INPUT DESCR F_ADES
+	COPY DISPLAY F_DADES
+	OUTPUT F_ADES DESCR
+	GROUP G_DESART
+END
+
+
+STRING F_DAMAG 3 
+BEGIN
+  PROMPT 2 7 "Dal magazzino "
+	FLAGS "U"
+	USE MAG SELECT CODTAB[4,5]=="" && CODTAB[1,3]!="" 
+	INPUT CODTAB F_DAMAG
+	DISPLAY "Codice" CODTAB
+	DISPLAY "Descr@50" S0
+	OUTPUT F_DAMAG CODTAB
+END
+
+STRING F_AMAG 3
+BEGIN
+  PROMPT 2 8 " al magazzino "
+	FLAGS "U"
+	COPY USE F_DAMAG
+	INPUT CODTAB F_AMAG
+	COPY DISPLAY F_DAMAG
+	OUTPUT F_AMAG CODTAB
+END
+
+STRING F_DACATMER 3 
+BEGIN
+  PROMPT 2 10 "Dal gruppo   "
+	FLAGS "U"
+	USE GMC SELECT CODTAB[4,5]==""
+	INPUT CODTAB F_DACATMER
+	DISPLAY "Codice" CODTAB
+	DISPLAY "Descr@50" S0
+	OUTPUT F_DACATMER CODTAB[1,3]
+	GROUP G_CATMER
+END
+
+
+STRING F_ACATMER 3
+BEGIN
+  PROMPT 2 11 " al gruppo   "
+	FLAGS "U"
+	COPY USE F_DACATMER
+	INPUT CODTAB F_ACATMER
+	COPY DISPLAY F_DACATMER
+	OUTPUT F_ACATMER CODTAB[1,3]
+	GROUP G_CATMER
+END
+
+BOOL F_DIM_E_NOTE
+BEGIN
+  PROMPT 2 13 "Stampo dimensioni e note articolo"
+END
+
+
+BOOLEAN F_RAGGCODICE
+BEGIN
+  PROMPT 2 14 "Raggruppo gli articoli"
+	MESSAGE FALSE CLEAR,F_FROMLIVELLOART|CLEAR,F_TOLIVELLOART|CHECK,F_TOLIVELLOART
+	MESSAGE TRUE ENABLE,F_FROMLIVELLOART|ENABLE,F_TOLIVELLOART|CHECK,F_TOLIVELLOART
+END
+
+NUMBER F_FROMLIVELLOART 1
+BEGIN
+	FLAGS "G"
+  PROMPT 42 14 "da "
+	USE FCA
+	INPUT CODTAB F_FROMLIVELLOART
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_FROMLIVELLOART CODTAB 
+	NUM_EXPR ((#F_FROMLIVELLOART<=#F_TOLIVELLOART)||(#F_TOLIVELLOART=0))&&((#F_FROMLIVELLOGIAC*#F_FROMLIVELLOART)=0)
+	CHECKTYPE NORMAL
+	WARNING "Livello iniziale non ammissibile"
+END
+
+NUMBER F_TOLIVELLOART 1
+BEGIN
+  PROMPT 52 14 "a "
+	USE FCA
+	INPUT CODTAB F_TOLIVELLOART
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_TOLIVELLOART CODTAB 
+	CHECKTYPE NORMAL
+	NUM_EXPR ((#F_FROMLIVELLOART<=#F_TOLIVELLOART)||(#F_TOLIVELLOART=0))&&(((#F_TOLIVELLOGIAC+#F_FROMLIVELLOGIAC)*#F_TOLIVELLOART)=0)
+	WARNING "Livello finale non ammissibile"
+END
+
+BOOL F_RAGGLIVGIAC
+BEGIN
+  PROMPT 2 15 "Raggruppo le giacenze"
+	MESSAGE FALSE CLEAR,F_FROMLIVELLOGIAC|CLEAR,F_TOLIVELLOGIAC|CHECK,F_TOLIVELLOGIAC
+	MESSAGE TRUE ENABLE,F_FROMLIVELLOGIAC|ENABLE,F_TOLIVELLOGIAC
+END
+
+NUMBER F_FROMLIVELLOGIAC 1
+BEGIN
+	FLAG "D"
+  PROMPT 42 15 "da "
+	USE FCG
+	INPUT CODTAB F_FROMLIVELLOGIAC
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_FROMLIVELLOGIAC CODTAB 
+	CHECKTYPE NORMAL
+	NUM_EXPR ((#F_FROMLIVELLOGIAC*(#F_FROMLIVELLOART+#F_TOLIVELLOART))=0)&&((#F_FROMLIVELLOGIAC<=#F_TOLIVELLOGIAC)||(#F_TOLIVELLOGIAC=0))
+
+	WARNING "Livello iniziale non ammissibile"
+END
+
+NUMBER F_TOLIVELLOGIAC 1
+BEGIN
+	FLAG "D"
+  PROMPT 52 15 "a "
+	USE FCG
+	INPUT CODTAB F_TOLIVELLOGIAC
+	DISPLAY "Num." CODTAB 
+	DISPLAY "Descr@50" S0
+	OUTPUT F_TOLIVELLOGIAC CODTAB 
+	NUM_EXPR ((#F_FROMLIVELLOGIAC*#F_FROMLIVELLOART)=0)&&((#F_FROMLIVELLOGIAC<=#F_TOLIVELLOGIAC)||(#F_TOLIVELLOGIAC=0))&&((#F_TOLIVELLOGIAC*#F_TOLIVELLOART)=0)
+	WARNING "Livello finale non ammissibile"
+	CHECKTYPE NORMAL
+END
+
+
+BOOL F_TOTALIMAGAZZINI
+BEGIN
+  PROMPT 2 16 "Stampo i totali di magazzino"
+	MESSAGE TRUE ENABLE,F_DETTAGLIOMAG
+	MESSAGE FALSE CLEAR,F_DETTAGLIOMAG|K_SPACE,F_DETTAGLIOMAG
+END
+
+BOOL F_DETTAGLIOMAG
+BEGIN
+  PROMPT 42 16 "Stampa il dettaglio magazzini"
+	MESSAGE TRUE ENABLE,F_TOTALIDEPOSITI
+	MESSAGE FALSE CLEAR,F_TOTALIDEPOSITI|K_SPACE,F_TOTALIDEPOSITI
+END
+
+BOOL F_TOTALIDEPOSITI
+BEGIN
+  PROMPT 2 17 "Stampo i totali di deposito"
+	MESSAGE TRUE ENABLE,F_DETTAGLIODEP
+	MESSAGE FALSE CLEAR,F_DETTAGLIODEP|K_SPACE,F_DETTAGLIODEP
+END
+
+BOOL F_DETTAGLIODEP
+BEGIN
+  PROMPT 42 17 "Stampa il dettaglio depositi"
+END
+
+
+BUTTON DLG_OK 10 2
+BEGIN
+  PROMPT -12 -1 ""
+END
+
+BUTTON DLG_QUIT 10 2
+BEGIN
+  PROMPT -22 -1 ""
+END
+
+ENDPAGE
+ENDMASK