From 36dd1bd32c9dbbe5c6d8244d85396590a837034e Mon Sep 17 00:00:00 2001
From: augusto <augusto@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Fri, 24 Oct 1997 14:41:56 +0000
Subject: [PATCH] Aggiunto filtro positivo/Negativo/non nullo

git-svn-id: svn://10.65.10.50/trunk@5447 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 mg/mg4200.h   |   1 +
 mg/mg4200.uml | 398 ++++++++++++++++++++++++++------------------------
 2 files changed, 205 insertions(+), 194 deletions(-)

diff --git a/mg/mg4200.h b/mg/mg4200.h
index edd54e2ff..290ccdcb2 100755
--- a/mg/mg4200.h
+++ b/mg/mg4200.h
@@ -42,6 +42,7 @@
 #define F_VAL5 155
 #define F_VAL6 156
 #define F_FIN_COMP 157
+#define F_FILTRO 160
 
 #define G_CATMER 1 
 #define G_CODART 2
diff --git a/mg/mg4200.uml b/mg/mg4200.uml
index f57560e19..cd233e35e 100755
--- a/mg/mg4200.uml
+++ b/mg/mg4200.uml
@@ -5,236 +5,246 @@ PAGE "Stampa inventario" -1 -1 78 20
 LISTBOX F_ORDINE 10
 BEGIN
   PROMPT 2 1 "Ordinamento    "
-	ITEM "A|articoli"
-	MESSAGE ENABLE,F_ORDINEART
-	MESSAGE SHOW,F_TOTALIMAGAZZINI|SHOW,F_TOTALIDEPOSITI|"X",F_DETTAGLIOMAG|"X",F_DETTAGLIODEP|HIDE,F_DETTAGLIODEP|HIDE,F_DETTAGLIOMAG
-	ITEM "M|magazzini"
-	MESSAGE "C",F_ORDINEART|K_SPACE,F_ORDINEART|DISABLE,F_ORDINEART|SHOW,G_CODART@|HIDE,G_DESART@
-	MESSAGE SHOW,F_DETTAGLIOMAG|HIDE,F_TOTALIMAGAZZINI|SHOW,F_DETTAGLIODEP|HIDE,F_TOTALIDEPOSITI
+  ITEM "A|articoli"
+  MESSAGE ENABLE,F_ORDINEART
+  MESSAGE SHOW,F_TOTALIMAGAZZINI|SHOW,F_TOTALIDEPOSITI|"X",F_DETTAGLIOMAG|"X",F_DETTAGLIODEP|HIDE,F_DETTAGLIODEP|HIDE,F_DETTAGLIOMAG
+  ITEM "M|magazzini"
+  MESSAGE "C",F_ORDINEART|K_SPACE,F_ORDINEART|DISABLE,F_ORDINEART|SHOW,G_CODART@|HIDE,G_DESART@
+  MESSAGE SHOW,F_DETTAGLIOMAG|HIDE,F_TOTALIMAGAZZINI|SHOW,F_DETTAGLIODEP|HIDE,F_TOTALIDEPOSITI
 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@
+  FLAGS "G"
+  PROMPT 36 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
 
 LIST F_REALE_GIAC 12
 BEGIN
   PROMPT 2 2 "Inventario     "
-	ITEM "G|di giacenza"
-	ITEM "R|reale" 
+  ITEM "G|di giacenza"
+  ITEM "R|reale" 
         HELP "reale =(giac+ACL-INCL)"
 END
 
-LIST F_FIN_COMP 26
+LIST F_FIN_COMP 22
 BEGIN
   PROMPT 2 3 "Valorizzo solo "
-        ITEM "C|i componenti impegnati"
-	ITEM "F|i finiti in produzione"
+  ITEM "C|i componenti impegnati"
+  ITEM "F|i finiti in produzione"
         HELP "finiti =(giac+INPRODF-INPRODC)"
 END
 
+
 NUMBER F_ANNOES 4
 BEGIN
-	FLAGS "A"
-  PROMPT 42 2 "Codice es.    "
-	USE ESC
-	INPUT CODTAB F_ANNOES
-	DISPLAY "Esercizio" CODTAB
-	DISPLAY "Dal@12" D0
-	DISPLAY "Al@12" D0
-	OUTPUT F_ANNOES CODTAB
-	ADD NONE
+  FLAGS "A"
+  PROMPT 59 2 "Codice es. "
+  USE ESC
+  INPUT CODTAB F_ANNOES
+  DISPLAY "Esercizio" CODTAB
+  DISPLAY "Dal@12" D0
+  DISPLAY "Al@12" D0
+  OUTPUT F_ANNOES CODTAB
+  ADD NONE
 END
 
+LIST F_FILTRO 23
+BEGIN
+  PROMPT 43 3 " Stampo "
+  ITEM "N|solo giacenze non nulle"
+  ITEM "+|solo giacenze positive"
+  ITEM " |tutti gli articoli"
+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
+  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 42 4 " a "
-	FLAGS "U"
-	COPY USE F_DAART
-	INPUT CODART F_AART
-	COPY DISPLAY F_DAART
-	OUTPUT F_AART CODART
-	GROUP G_CODART
+  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 20
 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
+  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 20
 BEGIN
   PROMPT 42 4 " a "
-	FLAGS "U"
-	COPY USE F_DADES
-	INPUT DESCR F_ADES
-	COPY DISPLAY F_DADES
-	OUTPUT F_ADES DESCR
-	GROUP G_DESART
+  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 5 "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
+  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 42 5 " a "
-	FLAGS "U"
-	COPY USE F_DAMAG
-	INPUT CODTAB F_AMAG
-	COPY DISPLAY F_DAMAG
-	OUTPUT F_AMAG CODTAB
+  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 6 "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
+  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 42 6 " a "
-	FLAGS "U"
-	COPY USE F_DACATMER
-	INPUT CODTAB F_ACATMER
-	COPY DISPLAY F_DACATMER
-	OUTPUT F_ACATMER CODTAB[1,3]
-	GROUP G_CATMER
+  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_DETTAGLIOMAG
 BEGIN
   PROMPT 2 7 "Stampa i depositi"
-	MESSAGE TRUE ENABLE,F_DETTAGLIODEP
-	MESSAGE FALSE CLEAR,F_DETTAGLIODEP|K_SPACE,F_DETTAGLIODEP
+  MESSAGE TRUE ENABLE,F_DETTAGLIODEP
+  MESSAGE FALSE CLEAR,F_DETTAGLIODEP|K_SPACE,F_DETTAGLIODEP
 END
 
 BOOL F_DETTAGLIODEP
 BEGIN
   PROMPT 42 7 "Stampa il dettaglio depositi"
-	MESSAGE TRUE ENABLE,F_RAGGCODICE|ENABLE,F_RAGGLIVGIAC
-	MESSAGE FALSE CLEAR,F_RAGGCODICE|K_SPACE,F_RAGGCODICE|CLEAR,F_RAGGLIVGIAC|K_SPACE,F_RAGGLIVGIAC
+  MESSAGE TRUE ENABLE,F_RAGGCODICE|ENABLE,F_RAGGLIVGIAC
+  MESSAGE FALSE CLEAR,F_RAGGCODICE|K_SPACE,F_RAGGCODICE|CLEAR,F_RAGGLIVGIAC|K_SPACE,F_RAGGLIVGIAC
 END
 
 BOOLEAN F_RAGGCODICE
 BEGIN
   PROMPT 2 8 "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
+  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"
+  FLAGS "G"
   PROMPT 42 8 "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"
+  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 8 "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"
+  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 9 "Raggruppo le giacenze"
-	MESSAGE FALSE CLEAR,F_FROMLIVELLOGIAC|CLEAR,F_TOLIVELLOGIAC|CHECK,F_TOLIVELLOGIAC
-	MESSAGE TRUE ENABLE,F_FROMLIVELLOGIAC|ENABLE,F_TOLIVELLOGIAC
+  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"
+  FLAG "D"
   PROMPT 42 9 "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))
+  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"
+  WARNING "Livello iniziale non ammissibile"
 END
 
 NUMBER F_TOLIVELLOGIAC 1
 BEGIN
-	FLAG "D"
+  FLAG "D"
   PROMPT 52 9 "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
+  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 10 "Stampo i totali di magazzino"
-	MESSAGE TRUE ENABLE,F_TOTALIDEPOSITI
-	MESSAGE FALSE CLEAR,F_TOTALIDEPOSITI
+  MESSAGE TRUE ENABLE,F_TOTALIDEPOSITI
+  MESSAGE FALSE CLEAR,F_TOTALIDEPOSITI
 END
 
 BOOL F_TOTALIDEPOSITI
@@ -245,111 +255,111 @@ END
 LIST F_VAL1 20
 BEGIN
   PROMPT 2 12 "Valorizz. 1 "
-	ITEM "1|Ultimo costo"
-	ITEM "2|Media ultimi costi"
-	ITEM "3|Prezzo di listino"
-	ITEM "4|Costo standard"
-	ITEM "5|Costo medio"
-	ITEM "6|FIFO annuale"
-	ITEM "7|LIFO annuale"
-	ITEM "8|FIFO"
-	ITEM "9|LIFO"
+  ITEM "1|Ultimo costo"
+  ITEM "2|Media ultimi costi"
+  ITEM "3|Prezzo di listino"
+  ITEM "4|Costo standard"
+  ITEM "5|Costo medio"
+  ITEM "6|FIFO annuale"
+  ITEM "7|LIFO annuale"
+  ITEM "8|FIFO"
+  ITEM "9|LIFO"
 END
 LIST F_VAL2 20
 BEGIN
   PROMPT 42 12 "Valorizz. 2 "
-	ITEM "|"
-	ITEM "1|Ultimo costo"
-	ITEM "2|Media ultimi costi"
-	ITEM "3|Prezzo di listino"
-	ITEM "4|Costo standard"
-	ITEM "5|Costo medio"
-	ITEM "6|FIFO annuale"
-	ITEM "7|LIFO annuale"
-	ITEM "8|FIFO"
-	ITEM "9|LIFO"
+  ITEM "|"
+  ITEM "1|Ultimo costo"
+  ITEM "2|Media ultimi costi"
+  ITEM "3|Prezzo di listino"
+  ITEM "4|Costo standard"
+  ITEM "5|Costo medio"
+  ITEM "6|FIFO annuale"
+  ITEM "7|LIFO annuale"
+  ITEM "8|FIFO"
+  ITEM "9|LIFO"
 END
 LIST F_VAL3 20
 BEGIN
   PROMPT 2 13 "Valorizz. 3 "
-	ITEM "|"
-	ITEM "1|Ultimo costo"
-	ITEM "2|Media ultimi costi"
-	ITEM "3|Prezzo di listino"
-	ITEM "4|Costo standard"
-	ITEM "5|Costo medio"
-	ITEM "6|FIFO annuale"
-	ITEM "7|LIFO annuale"
-	ITEM "8|FIFO"
-	ITEM "9|LIFO"
+  ITEM "|"
+  ITEM "1|Ultimo costo"
+  ITEM "2|Media ultimi costi"
+  ITEM "3|Prezzo di listino"
+  ITEM "4|Costo standard"
+  ITEM "5|Costo medio"
+  ITEM "6|FIFO annuale"
+  ITEM "7|LIFO annuale"
+  ITEM "8|FIFO"
+  ITEM "9|LIFO"
 END
 LIST F_VAL4 20
 BEGIN
   PROMPT 42 13 "Valorizz. 4 "
-	ITEM "|"
-	ITEM "1|Ultimo costo"
-	ITEM "2|Media ultimi costi"
-	ITEM "3|Prezzo di listino"
-	ITEM "4|Costo standard"
-	ITEM "5|Costo medio"
-	ITEM "6|FIFO annuale"
-	ITEM "7|LIFO annuale"
-	ITEM "8|FIFO"
-	ITEM "9|LIFO"
+  ITEM "|"
+  ITEM "1|Ultimo costo"
+  ITEM "2|Media ultimi costi"
+  ITEM "3|Prezzo di listino"
+  ITEM "4|Costo standard"
+  ITEM "5|Costo medio"
+  ITEM "6|FIFO annuale"
+  ITEM "7|LIFO annuale"
+  ITEM "8|FIFO"
+  ITEM "9|LIFO"
 END
 LIST F_VAL5 20
 BEGIN
   PROMPT 2 14 "Valorizz. 5 "
-	ITEM "|"
-	ITEM "1|Ultimo costo"
-	ITEM "2|Media ultimi costi"
-	ITEM "3|Prezzo di listino"
-	ITEM "4|Costo standard"
-	ITEM "5|Costo medio"
-	ITEM "6|FIFO annuale"
-	ITEM "7|LIFO annuale"
-	ITEM "8|FIFO"
-	ITEM "9|LIFO"
+  ITEM "|"
+  ITEM "1|Ultimo costo"
+  ITEM "2|Media ultimi costi"
+  ITEM "3|Prezzo di listino"
+  ITEM "4|Costo standard"
+  ITEM "5|Costo medio"
+  ITEM "6|FIFO annuale"
+  ITEM "7|LIFO annuale"
+  ITEM "8|FIFO"
+  ITEM "9|LIFO"
 END
 LIST F_VAL6 20
 BEGIN
   PROMPT 42 14 "Valorizz. 6 "
-	ITEM "|"
-	ITEM "1|Ultimo costo"
-	ITEM "2|Media ultimi costi"
-	ITEM "3|Prezzo di listino"
-	ITEM "4|Costo standard"
-	ITEM "5|Costo medio"
-	ITEM "6|FIFO annuale"
-	ITEM "7|LIFO annuale"
-	ITEM "8|FIFO"
-	ITEM "9|LIFO"
+  ITEM "|"
+  ITEM "1|Ultimo costo"
+  ITEM "2|Media ultimi costi"
+  ITEM "3|Prezzo di listino"
+  ITEM "4|Costo standard"
+  ITEM "5|Costo medio"
+  ITEM "6|FIFO annuale"
+  ITEM "7|LIFO annuale"
+  ITEM "8|FIFO"
+  ITEM "9|LIFO"
 END
 STRING F_CATVENLISTINO 2
 BEGIN
-	FLAGS "U"
-	PROMPT 2 17 "Listino: cat. ven. "
+  FLAGS "U"
+  PROMPT 2 17 "Listino: cat. ven. "
   USE CVE
   INPUT CODTAB F_CATVENLISTINO 
   DISPLAY "Cat." CODTAB
   DISPLAY "Descrizione@50" S0
   OUTPUT F_CATVENLISTINO CODTAB
   CHECKTYPE NORMAL
-	GROUP G_LISTINO
+  GROUP G_LISTINO
 END
 
 STRING F_CODLISTINO 3
 BEGIN
-	FLAGS "U"
+  FLAGS "U"
   PROMPT 42 17 "codice "
-	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
+  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