Patch level : 10.0

Files correlati     : ve0200a.msk
Ricompilazione Demo : [ ]
Commento            :
Corretta gestione degli articoli il cui imballo sia costituito da materiali diversi come categoria CONAI


git-svn-id: svn://10.65.10.50/trunk@19380 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2009-10-06 13:03:41 +00:00
parent 83fec07a39
commit 5aa10956b3

@ -227,18 +227,34 @@ BEGIN
PAGE "CONAI" 1 1 60 14
TEXT DLG_NULL
BEGIN
PROMPT 72 2 "Peso e Categoria"
BEGIN
PROMPT 1 0 "@bMostra sui"
END
TEXT DLG_NULL
BEGIN
PROMPT 73 3 " su documenti"
PROMPT 1 1 "@bDocumenti"
END
TEXT DLG_NULL
BEGIN
PROMPT 13 1 "@bCodice Spesa"
END
TEXT DLG_NULL
BEGIN
PROMPT 42 1 "@bDescrizione Spesa"
END
BOOLEAN F_CONFACC
BEGIN
PROMPT 1 2 "Acciao"
FIELD CONFACC
END
STRING F_CODACC 8
BEGIN
PROMPT 1 4 "Cod.spesa acciaio "
PROMPT 13 2 ""
FIELD CODACC
USE SPP
FLAGS "U"
@ -250,11 +266,13 @@ BEGIN
HELP "Codice spesa per contributo acciaio"
CHECKTYPE NORMAL
GROUP 7
MESSAGE EMPTY ENABLE,F_CONFACC
MESSAGE DISABLE,F_CONFACC|"X",F_CONFACC
END
STRING F_DESACC 50 40
STRING F_DESACC 50
BEGIN
PROMPT 32 4 ""
PROMPT 25 2 ""
USE SPP KEY 2
INPUT S0 F_DESACC
DISPLAY "Descrizione@50" S0
@ -263,15 +281,15 @@ BEGIN
GROUP 7
END
BOOLEAN F_CONFACC
BOOLEAN F_CONFALL
BEGIN
PROMPT 75 4 ""
FIELD CONFACC
PROMPT 1 4 "Alluminio"
FIELD CONFALL
END
STRING F_CODALL 8
BEGIN
PROMPT 1 6 "Cod.spesa alluminio "
PROMPT 13 4 ""
FIELD CODALL
FLAGS "U"
COPY USE F_CODACC
@ -282,11 +300,13 @@ BEGIN
CHECKTYPE NORMAL
HELP "Codice spesa per contributo alluminio"
GROUP 7
MESSAGE EMPTY ENABLE,F_CONFALL
MESSAGE DISABLE,F_CONFALL|"X",F_CONFALL
END
STRING F_DESALL 50 40
STRING F_DESALL 50
BEGIN
PROMPT 32 6 ""
PROMPT 25 4 ""
COPY USE F_DESACC
INPUT S0 F_DESALL
COPY DISPLAY F_DESACC
@ -294,15 +314,15 @@ BEGIN
GROUP 7
END
BOOLEAN F_CONFALL
BOOLEAN F_CONFCAR
BEGIN
PROMPT 75 6 ""
FIELD CONFALL
PROMPT 1 6 "Carta"
FIELD CONFCAR
END
STRING F_CODCAR 8
BEGIN
PROMPT 1 8 "Cod.spesa carta "
PROMPT 13 6 ""
FIELD CODCAR
FLAGS "U"
COPY USE F_CODACC
@ -313,11 +333,13 @@ BEGIN
CHECKTYPE NORMAL
HELP "Codice spesa per contributo carta"
GROUP 7
MESSAGE EMPTY ENABLE,F_CONFCAR
MESSAGE DISABLE,F_CONFCAR|"X",F_CONFCAR
END
STRING F_DESCAR 50 40
STRING F_DESCAR 50
BEGIN
PROMPT 32 8 ""
PROMPT 25 6 ""
COPY USE F_DESACC
INPUT S0 F_DESCAR
COPY DISPLAY F_DESACC
@ -325,15 +347,15 @@ BEGIN
GROUP 7
END
BOOLEAN F_CONFCAR
BOOLEAN F_CONFPLA
BEGIN
PROMPT 75 8 ""
FIELD CONFCAR
PROMPT 1 8 "Plastica"
FIELD CONFPLA
END
STRING F_CODPLA 8
BEGIN
PROMPT 1 10 "Cod.spesa plastica "
PROMPT 13 8 ""
FIELD CODPLA
FLAGS "U"
COPY USE F_CODACC
@ -344,11 +366,13 @@ BEGIN
CHECKTYPE NORMAL
HELP "Codice spesa per contributo plastica"
GROUP 7
MESSAGE EMPTY ENABLE,F_CONFPAL
MESSAGE DISABLE,F_CONFPLA|"X",F_CONFPLA
END
STRING F_DESPLA 50 40
STRING F_DESPLA 50
BEGIN
PROMPT 32 10 ""
PROMPT 25 8 ""
COPY USE F_DESACC
INPUT S0 F_DESPLA
COPY DISPLAY F_DESACC
@ -356,15 +380,15 @@ BEGIN
GROUP 7
END
BOOLEAN F_CONFPLA
BOOLEAN F_CONFLEG
BEGIN
PROMPT 75 10 ""
FIELD CONFPLA
PROMPT 1 10 "Legno"
FIELD CONFLEG
END
STRING F_CODLEG 8
BEGIN
PROMPT 1 12 "Cod.spesa legno "
PROMPT 13 10 ""
FIELD CODLEG
FLAGS "U"
COPY USE F_CODACC
@ -375,11 +399,13 @@ BEGIN
CHECKTYPE NORMAL
HELP "Codice spesa per contributo legno"
GROUP 7
MESSAGE EMPTY ENABLE,F_CONFLEG
MESSAGE DISABLE,F_CONFLEG|"X",F_CONFLEG
END
STRING F_DESLEG 50 40
STRING F_DESLEG 50
BEGIN
PROMPT 32 12 ""
PROMPT 25 10 ""
COPY USE F_DESACC
INPUT S0 F_DESLEG
COPY DISPLAY F_DESACC
@ -387,15 +413,15 @@ BEGIN
GROUP 7
END
BOOLEAN F_CONFLEG
BOOLEAN F_CONFVET
BEGIN
PROMPT 75 12 ""
FIELD CONFLEG
PROMPT 1 12 "Vetro"
FIELD CONFVET
END
STRING F_CODVET 8
BEGIN
PROMPT 1 14 "Cod.spesa vetro "
PROMPT 13 12 ""
FIELD CODVET
FLAGS "U"
COPY USE F_CODACC
@ -406,11 +432,13 @@ BEGIN
CHECKTYPE NORMAL
HELP "Codice spesa per contributo vetro"
GROUP 7
MESSAGE EMPTY ENABLE,F_CONFVET
MESSAGE DISABLE,F_CONFVET|"X",F_CONFVET
END
STRING F_DESVET 50 40
STRING F_DESVET 50
BEGIN
PROMPT 32 14 ""
PROMPT 25 12 ""
COPY USE F_DESACC
INPUT S0 F_DESVET
COPY DISPLAY F_DESACC
@ -418,22 +446,26 @@ BEGIN
GROUP 7
END
BOOLEAN F_CONFVET
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 75 14 ""
FIELD CONFVET
PROMPT 1 14 "@bStampa documenti"
END
TEXT DLG_NULL
BEGIN
PROMPT 2 15 "@bMessaggio alternativo a 'CONTRIBUTO CONAI ASSOLTO'"
END
STRING F_DESCONAIASS 50
BEGIN
PROMPT 1 16 "Desc.contributo ass."
PROMPT 2 16 ""
FIELD DESCCONAIASS
GROUP 7
END
BOOLEAN F_ESPONIESENTI
BEGIN
PROMPT 1 17 "Esponi i clienti esenti"
PROMPT 2 17 "Esposizione dei clienti esenti"
FIELD ESPONIESENTI
GROUP 7
END