campo-sirio/ve/ve0200a.uml
angelo d42d405cab Iniziamo a mettere a posto il macello...
git-svn-id: svn://10.65.10.50/trunk@3540 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-09-07 10:58:28 +00:00

297 lines
4.9 KiB
Plaintext
Executable File

/* toolbar */
#include "VECONF.H"
TOOLBAR "" 0 20 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
PAGE "Tab. di installazione" 1 1 60 14
GROUPBOX DLG_NULL 78 15
BEGIN
PROMPT 0 0 "Gestione listini/contratti/campagne 1/2"
END
BOOLEAN F_CUMULAALC
BEGIN
PROMPT 2 2 "Cumula articolo/listino/listino"
FIELD CUMULAALC
END
BOOLEAN F_GESLISTINI
BEGIN
PROMPT 2 3 "Gestione archivio listini"
MESSAGE FALSE DISABLE,1@
MESSAGE TRUE ENABLE,1@
FIELD GES[A_LISTINI]
END
BOOLEAN F_GESLISCV
BEGIN
PROMPT 2 4 "Gestione codice categoria vendite+codice listino"
FIELD GESLISCV
GROUP 1
END
BOOLEAN F_GESUM
BEGIN
PROMPT 2 5 "Gestione listini per unita di misura"
FIELD GESUM[A_LISTINI]
GROUP 1
END
BOOLEAN F_GESSCALISTINI
BEGIN
PROMPT 2 6 "Gestione listino a scaglioni"
FIELD GESSCA[A_LISTINI]
GROUP 1
END
BOOLEAN F_GESSOLISTINI
BEGIN
PROMPT 2 7 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_LISTINI]
GROUP 1
END
BOOLEAN F_GESCONTRATTI
BEGIN
PROMPT 2 9 "Gestione archivio contratti"
MESSAGE FALSE DISABLE,2@
MESSAGE TRUE ENABLE,2@
FIELD GES[A_CONTRATTI]
END
BOOLEAN F_GESCONCC
BEGIN
PROMPT 2 10 "Gestione codice contratto"
FIELD GESCONCC
GROUP 2
END
BOOLEAN F_GESCONTRATTIUM
BEGIN
PROMPT 2 11 "Gestione contratti per unita di misura"
FIELD GES[A_CONTRATTI]
GROUP 2
END
BOOLEAN F_GESSCACONTRATTI
BEGIN
PROMPT 2 12 "Gestione contratto a scaglioni"
FIELD GESSCA[A_CONTRATTI]
GROUP 2
END
BOOLEAN F_GESSOCONTRATTI
BEGIN
PROMPT 2 13 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_CONTRATTI]
GROUP 2
END
ENDPAGE
PAGE "Tab. di installazione" 1 1 60 14
GROUPBOX DLG_NULL 78 15
BEGIN
PROMPT 0 0 "Gestione listini/contratti/campagne 2/2"
END
BOOLEAN F_GESCAMPAGNE
BEGIN
PROMPT 2 2 "Gestione archivio campagne"
MESSAGE TRUE ENABLE,3@
MESSAGE FALSE DISABLE,3@
FIELD GES[A_CAMPAGNE]
END
BOOLEAN F_GESCAMPAGNEUM
BEGIN
PROMPT 2 3 "Gestione campagne per unita di misura"
FIELD GESUM[A_CAMPAGNE]
GROUP 3
END
BOOLEAN F_GESSCACAMPAGNE
BEGIN
PROMPT 2 4 "Gestione campagne a scaglioni"
FIELD GESSCA[A_CAMPAGNE]
GROUP 3
END
BOOLEAN F_GESSOCAMPAGNE
BEGIN
PROMPT 2 5 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_CAMPAGNE]
GROUP 3
END
LIST F_SEQRICRIGHE1 40
BEGIN
PROMPT 2 7 "Sequenza di ricerca righe "
ITEM "A|Codice articolo"
ITEM "L|Codice linea"
ITEM "C|Codice linea/categoria"
ITEM "R|Codice raggruppamento fiscale"
ITEM " | "
FIELD SEQRICRIGHE[ 1 ]
END
LIST F_SEQRICRIGHE2 40
BEGIN
PROMPT 28 8 ""
ITEM "A|Codice articolo"
ITEM "L|Codice linea"
ITEM "C|Codice linea/categoria"
ITEM "R|Codice raggruppamento fiscale"
ITEM " | "
FIELD SEQRICRIGHE[ 2 ]
END
LIST F_SEQRICRIGHE3 40
BEGIN
PROMPT 28 9 ""
ITEM "A|Codice articolo"
ITEM "L|Codice linea"
ITEM "C|Codice linea/categoria"
ITEM "R|Codice raggruppamento fiscale"
ITEM " | "
FIELD SEQRICRIGHE[ 3 ]
END
LIST F_SEQRICRIGHE4 40
BEGIN
PROMPT 28 10 ""
ITEM "A|Codice articolo"
ITEM "L|Codice linea"
ITEM "C|Codice linea/categoria"
ITEM "R|Codice raggruppamento fiscale"
ITEM " | "
FIELD SEQRICRIGHE[ 4 ]
END
ENDPAGE
PAGE "Tab. gestione sconti " 1 1 60 14
GROUPBOX DLG_NULL 78 10
BEGIN
PROMPT 0 0 "Gestione Sconti"
END
LIST F_GESSCO 36
BEGIN
PROMPT 2 1 "Tipo gestione sconti documenti "
ITEM "N|Non gestire"
ITEM "P|Percentuale su anagrafica "
ITEM "T|Gestione tabella sconti "
ITEM "A|Gestione archivio sconti "
FIELD GESSCO
END
BOOLEAN F_SCOKEY1
BEGIN
PROMPT 2 2 "Tabella categoria vendite in chiave"
FLAG "D"
MESSAGE TRUE SHOW, 4@
MESSAGE FALSE HIDE, 4@
MESSAGE FALSE COPY, 4@
MESSAGE FALSE HIDE, 5@
MESSAGE FALSE COPY, 5@
MESSAGE FALSE HIDE, 6@
MESSAGE FALSE COPY, 6@
FIELD SCOKEY[1]
END
BOOLEAN F_SCOKEY2
BEGIN
PROMPT 2 3 "Tabella sconti clienti"
MESSAGE TRUE SHOW, 5@
MESSAGE FALSE HIDE, 5@
MESSAGE FALSE COPY, 5@
MESSAGE FALSE HIDE, 6@
MESSAGE FALSE COPY, 6@
GROUP 4
FIELD SCOKEY[2]
END
BOOLEAN F_SCOKEY3
BEGIN
PROMPT 2 4 "Tabella zone in chiave"
MESSAGE TRUE SHOW, 6@
MESSAGE FALSE HIDE, 6@
MESSAGE FALSE COPY, 6@
GROUP 5
FIELD SCOKEY[3]
END
BOOLEAN F_SCOKEY4
BEGIN
PROMPT 2 5 "Tabella modalita' di pagamento in chiave"
GROUP 6
FIELD SCOKEY[4]
END
LIST F_GESSCORIGA 40
BEGIN
PROMPT 2 8 "Tipo gestione sconti riga "
ITEM "N|Non gestire"
MESSAGE HIDE,F_GESSCORIGACV
ITEM "L|Perc. su anagrafica/listini/contratti "
MESSAGE HIDE,F_GESSCORIGACV
ITEM "A|Gest. arch. sconti "
MESSAGE SHOW,F_GESSCORIGACV
ITEM "C|Perc. indicata su anagrafica cliente "
MESSAGE HIDE,F_GESSCORIGACV
FIELD GESSCORIGA
END
BOOLEAN F_GESSCORIGACV
BEGIN
PROMPT 2 9 "Gest. arch. sconti con cat. vendita cliente "
FIELD GESSCORIGACV
END
LIST F_SCORIGAKEY 36
BEGIN
PROMPT 2 10 "Chiave archivio sconti di riga "
ITEM "A|Codice articolo "
ITEM "L|Codice linea "
ITEM "C|Codice linea/categoria "
ITEM "R|Codice raggruppamento fiscale "
FIELD SCORIGAKEY
END
BOOLEAN F_GESSCOSCA
BEGIN
PROMPT 2 12 "Gestione archivio sconti a scaglioni "
FIELD GESSCOSCA
END
BOOLEAN F_GESSCOUM
BEGIN
PROMPT 2 13 "Gestione archivio sconti unita' di misura "
FIELD GESSCOUM
END
ENDPAGE
ENDMASK