Aggiunto filtro positivo/Negativo/non nullo
git-svn-id: svn://10.65.10.50/trunk@5447 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto
parent
fae346b549
commit
36dd1bd32c
@ -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
|
||||
|
||||
398
mg/mg4200.uml
398
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
|
||||
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user