#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 "Tabelle di installazione"  1 1 60 14

GROUPBOX DLG_NULL 78  7
BEGIN
PROMPT 1 1 "Gestione listini"
END

BOOLEAN F_GESLISTINI
BEGIN
PROMPT 2 2 "Gestione archivio listini"
MESSAGE FALSE CLEAR,1@
MESSAGE TRUE ENABLE,1@
FIELD GES[A_LISTINI]
END

BOOLEAN F_GESLISCV
BEGIN
PROMPT 2 3 "Gestione codice categoria vendite+codice listino"
FIELD GESLISCV
GROUP 1
END

BOOLEAN F_GESUM
BEGIN
PROMPT 2 4 "Gestione listini per unita di misura"
FIELD GESUM[A_LISTINI]
GROUP 1
END

BOOLEAN F_GESSCALISTINI
BEGIN
PROMPT 2 5 "Gestione listino a scaglioni"
FIELD GESSCA[A_LISTINI]
GROUP 1
END

BOOLEAN F_GESSOLISTINI
BEGIN
PROMPT 2 6 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_LISTINI]
GROUP 1
END

GROUPBOX DLG_NULL 78  7
BEGIN
PROMPT 1 8 "Gestione contratti"
END

BOOLEAN F_GESCONTRATTI
BEGIN
PROMPT 2 9 "Gestione archivio contratti"
MESSAGE FALSE CLEAR,2@
MESSAGE TRUE ENABLE,2@
FIELD GES[A_CONTRATTI]
END

BOOLEAN F_GESCONCC
BEGIN
PROMPT 2 10 "Gestione codice cliente+codice contratto"
FIELD GESCONCC
GROUP 2
END

BOOLEAN F_GESCONTRATTIUM
BEGIN
PROMPT 2 11 "Gestione contratti per unita di misura"
FIELD GESUM[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

GROUPBOX DLG_NULL 78  6
BEGIN
PROMPT 1 15 "Gestione offerte "
END

BOOLEAN F_GESCAMPAGNE
BEGIN
PROMPT 2 16 "Gestione archivio offerte "
MESSAGE TRUE ENABLE,3@
MESSAGE FALSE CLEAR,3@
FIELD GES[A_OFFERTE]
END

BOOLEAN F_GESCAMPAGNEUM
BEGIN
PROMPT 2 17 "Gestione offerte per unita di misura "
FIELD GESUM[A_OFFERTE]
GROUP 3
END

BOOLEAN F_GESSCACAMPAGNE
BEGIN
PROMPT 2 18 "Gestione offerte a scaglioni "
FIELD GESSCA[A_OFFERTE]
GROUP 3
END

BOOLEAN F_GESSOCAMPAGNE
BEGIN
PROMPT 2 19 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_OFFERTE]
GROUP 3
END

ENDPAGE

PAGE "Tabella gestione sconti "  1 1 60 14

LIST F_GESSCO 36
BEGIN
PROMPT 2 2 "Tipo gestione sconti documenti "
ITEM "N|Non gestire" MESSAGE DISABLE,4@
ITEM "P|Percentuale su anagrafica " MESSAGE DISABLE,4@
ITEM "T|Gestione tabella sconti " MESSAGE DISABLE,4@
ITEM "A|Gestione archivio sconti " MESSAGE ENABLE,4@
FIELD GESSCO
END

BOOLEAN F_SCOKEY1
BEGIN
PROMPT 2 3 "Tabella categoria vendite in chiave"
//MESSAGE TRUE ENABLE, 4@
//MESSAGE FALSE CLEAR,4@|CLEAR,5@|CLEAR,6@
GROUP 4
FIELD SCOKEY[1]
END

BOOLEAN F_SCOKEY2
BEGIN
PROMPT 2 4 "Tabella sconti clienti in chiave"
//MESSAGE TRUE ENABLE, 5@
//MESSAGE FALSE CLEAR,5@|CLEAR,6@
GROUP 4
FIELD SCOKEY[2]
END

BOOLEAN F_SCOKEY3
BEGIN
PROMPT 2 5 "Tabella zone in chiave"
//MESSAGE TRUE ENABLE, 6@
//MESSAGE FALSE CLEAR, 6@
GROUP 4 5
FIELD SCOKEY[3]
END

BOOLEAN F_SCOKEY4
BEGIN
PROMPT 2 6 "Tabella modalita' di pagamento in chiave"
GROUP 4 6
FIELD SCOKEY[4]
END

LIST F_GESSCORIGA 45
BEGIN
PROMPT 2 8 "Tipo gestione sconti riga      "
ITEM "N|Non gestire"
MESSAGE HIDE,F_GESSCORIGACV
ITEM "L|Percentuale su anagrafica/listini/contratti "
MESSAGE HIDE,F_GESSCORIGACV
ITEM "A|Gestione archivio sconti "
MESSAGE SHOW,F_GESSCORIGACV
ITEM "C|Percentuale indicata su anagrafica cliente "
MESSAGE HIDE,F_GESSCORIGACV
FIELD GESSCORIGA
END

BOOLEAN F_GESSCORIGACV
BEGIN
PROMPT 2 9 "Gestione archivio sconti con categorie 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 gruppo merceologico"
ITEM "C|Codice sottogruppo merceologico"
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

STRING F_SCOTRIGA 4
BEGIN
PROMPT 2 14 "Tipo riga per gli sconti di testa "
FLAGS "U"
USE %TRI SELECT S7=="C"
FIELD SCOTRIGA
INPUT CODTAB F_SCOTRIGA
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_SCOTRIGA CODTAB
CHECKTYPE REQUIRED
END

ENDPAGE

ENDMASK

