Corretto errore aga 106

git-svn-id: svn://10.65.10.50/trunk@5141 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-08-29 17:09:04 +00:00
parent 43c00e8eef
commit 81682f022e

View File

@ -149,8 +149,6 @@ END
BOOLEAN F_SCOKEY1 BOOLEAN F_SCOKEY1
BEGIN BEGIN
PROMPT 2 3 "Tabella categoria vendite in chiave" PROMPT 2 3 "Tabella categoria vendite in chiave"
//MESSAGE TRUE ENABLE, 4@
//MESSAGE FALSE CLEAR,4@|CLEAR,5@|CLEAR,6@
GROUP 4 GROUP 4
FIELD SCOKEY[1] FIELD SCOKEY[1]
END END
@ -158,8 +156,6 @@ END
BOOLEAN F_SCOKEY2 BOOLEAN F_SCOKEY2
BEGIN BEGIN
PROMPT 2 4 "Tabella sconti clienti in chiave" PROMPT 2 4 "Tabella sconti clienti in chiave"
//MESSAGE TRUE ENABLE, 5@
//MESSAGE FALSE CLEAR,5@|CLEAR,6@
GROUP 4 GROUP 4
FIELD SCOKEY[2] FIELD SCOKEY[2]
END END
@ -167,30 +163,24 @@ END
BOOLEAN F_SCOKEY3 BOOLEAN F_SCOKEY3
BEGIN BEGIN
PROMPT 2 5 "Tabella zone in chiave" PROMPT 2 5 "Tabella zone in chiave"
//MESSAGE TRUE ENABLE, 6@ GROUP 4
//MESSAGE FALSE CLEAR, 6@
GROUP 4 5
FIELD SCOKEY[3] FIELD SCOKEY[3]
END END
BOOLEAN F_SCOKEY4 BOOLEAN F_SCOKEY4
BEGIN BEGIN
PROMPT 2 6 "Tabella modalita' di pagamento in chiave" PROMPT 2 6 "Tabella modalita' di pagamento in chiave"
GROUP 4 6 GROUP 4
FIELD SCOKEY[4] FIELD SCOKEY[4]
END END
LIST F_GESSCORIGA 45 LIST F_GESSCORIGA 45
BEGIN BEGIN
PROMPT 2 8 "Tipo gestione sconti riga " PROMPT 2 8 "Tipo gestione sconti riga "
ITEM "N|Non gestire" ITEM "N|Non gestire" MESSAGE CLEAR,5@
MESSAGE HIDE,F_GESSCORIGACV ITEM "L|Percentuale su anagrafica/listini/contratti " MESSAGE CLEAR,5@
ITEM "L|Percentuale su anagrafica/listini/contratti " ITEM "A|Gestione archivio sconti " MESSAGE ENABLE,5@
MESSAGE HIDE,F_GESSCORIGACV ITEM "C|Percentuale indicata su anagrafica cliente " MESSAGE CLEAR,5@
ITEM "A|Gestione archivio sconti "
MESSAGE SHOW,F_GESSCORIGACV
ITEM "C|Percentuale indicata su anagrafica cliente "
MESSAGE HIDE,F_GESSCORIGACV
FIELD GESSCORIGA FIELD GESSCORIGA
END END
@ -198,30 +188,32 @@ BOOLEAN F_GESSCORIGACV
BEGIN BEGIN
PROMPT 2 9 "Gestione archivio sconti con categorie vendita cliente " PROMPT 2 9 "Gestione archivio sconti con categorie vendita cliente "
FIELD GESSCORIGACV FIELD GESSCORIGACV
GROUP 5
END END
LIST F_SCORIGAKEY 36 LIST F_SCORIGAKEY 36
BEGIN BEGIN
PROMPT 2 10 "Chiave archivio sconti di riga " PROMPT 2 10 "Chiave archivio sconti di riga "
ITEM "A|Codice articolo " ITEM "A|Codice articolo " MESSAGE ENABLE,6@
ITEM "L|Codice gruppo merceologico" ITEM "L|Codice gruppo merceologico" MESSAGE CLEAR,6@
ITEM "C|Codice sottogruppo merceologico" ITEM "C|Codice sottogruppo merceologico" MESSAGE CLEAR,6@
ITEM "R|Codice raggruppamento fiscale " ITEM "R|Codice raggruppamento fiscale " MESSAGE CLEAR,6@
FIELD SCORIGAKEY FIELD SCORIGAKEY
GROUP 5
END END
BOOLEAN F_GESSCOSCA BOOLEAN F_GESSCOSCA
BEGIN BEGIN
PROMPT 2 12 "Gestione archivio sconti a scaglioni " PROMPT 2 12 "Gestione archivio sconti a scaglioni "
FIELD GESSCOSCA FIELD GESSCOSCA
GROUP 4 GROUP 5 6
END END
BOOLEAN F_GESSCOUM BOOLEAN F_GESSCOUM
BEGIN BEGIN
PROMPT 2 13 "Gestione archivio sconti unita' di misura " PROMPT 2 13 "Gestione archivio sconti unita' di misura "
FIELD GESSCOUM FIELD GESSCOUM
GROUP 4 GROUP 5 6
END END
ENDPAGE ENDPAGE