Iniziamo a mettere a posto il macello...

git-svn-id: svn://10.65.10.50/trunk@3540 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-09-07 10:58:28 +00:00
parent 615ddcc124
commit d42d405cab
3 changed files with 64 additions and 415 deletions

View File

@ -1,6 +1,5 @@
/* toolbar */ /* toolbar */
#include "VECONF.H" #include "VECONF.H"
#define F_GESSCORIGACV 127
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
BUTTON DLG_OK 10 2 BUTTON DLG_OK 10 2
@ -23,13 +22,13 @@ BEGIN
PROMPT 0 0 "Gestione listini/contratti/campagne 1/2" PROMPT 0 0 "Gestione listini/contratti/campagne 1/2"
END END
BOOLEAN 100 BOOLEAN F_CUMULAALC
BEGIN BEGIN
PROMPT 2 2 "Cumula articolo/listino/listino" PROMPT 2 2 "Cumula articolo/listino/listino"
FIELD CUMULAALC FIELD CUMULAALC
END END
BOOLEAN 101 BOOLEAN F_GESLISTINI
BEGIN BEGIN
PROMPT 2 3 "Gestione archivio listini" PROMPT 2 3 "Gestione archivio listini"
MESSAGE FALSE DISABLE,1@ MESSAGE FALSE DISABLE,1@
@ -37,21 +36,21 @@ MESSAGE TRUE ENABLE,1@
FIELD GES[A_LISTINI] FIELD GES[A_LISTINI]
END END
BOOLEAN 102 BOOLEAN F_GESLISCV
BEGIN BEGIN
PROMPT 2 4 "Gestione codice categoria vendite+codice listino" PROMPT 2 4 "Gestione codice categoria vendite+codice listino"
FIELD GESLISCV FIELD GESLISCV
GROUP 1 GROUP 1
END END
BOOLEAN 103 BOOLEAN F_GESUM
BEGIN BEGIN
PROMPT 2 5 "Gestione listini per unita di misura" PROMPT 2 5 "Gestione listini per unita di misura"
FIELD GESUM[A_LISTINI] FIELD GESUM[A_LISTINI]
GROUP 1 GROUP 1
END END
BOOLEAN 104 BOOLEAN F_GESSCALISTINI
BEGIN BEGIN
PROMPT 2 6 "Gestione listino a scaglioni" PROMPT 2 6 "Gestione listino a scaglioni"
FIELD GESSCA[A_LISTINI] FIELD GESSCA[A_LISTINI]
@ -59,14 +58,14 @@ GROUP 1
END END
BOOLEAN 105 BOOLEAN F_GESSOLISTINI
BEGIN BEGIN
PROMPT 2 7 "Gestione sconti/omaggio articoli" PROMPT 2 7 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_LISTINI] FIELD GESSO[A_LISTINI]
GROUP 1 GROUP 1
END END
BOOLEAN 106 BOOLEAN F_GESCONTRATTI
BEGIN BEGIN
PROMPT 2 9 "Gestione archivio contratti" PROMPT 2 9 "Gestione archivio contratti"
MESSAGE FALSE DISABLE,2@ MESSAGE FALSE DISABLE,2@
@ -74,21 +73,21 @@ MESSAGE TRUE ENABLE,2@
FIELD GES[A_CONTRATTI] FIELD GES[A_CONTRATTI]
END END
BOOLEAN 107 BOOLEAN F_GESCONCC
BEGIN BEGIN
PROMPT 2 10 "Gestione codice contratto" PROMPT 2 10 "Gestione codice contratto"
FIELD GESCONCC FIELD GESCONCC
GROUP 2 GROUP 2
END END
BOOLEAN 108 BOOLEAN F_GESCONTRATTIUM
BEGIN BEGIN
PROMPT 2 11 "Gestione contratti per unita di misura" PROMPT 2 11 "Gestione contratti per unita di misura"
FIELD GES[A_CONTRATTI] FIELD GES[A_CONTRATTI]
GROUP 2 GROUP 2
END END
BOOLEAN 109 BOOLEAN F_GESSCACONTRATTI
BEGIN BEGIN
PROMPT 2 12 "Gestione contratto a scaglioni" PROMPT 2 12 "Gestione contratto a scaglioni"
FIELD GESSCA[A_CONTRATTI] FIELD GESSCA[A_CONTRATTI]
@ -96,7 +95,7 @@ GROUP 2
END END
BOOLEAN 110 BOOLEAN F_GESSOCONTRATTI
BEGIN BEGIN
PROMPT 2 13 "Gestione sconti/omaggio articoli" PROMPT 2 13 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_CONTRATTI] FIELD GESSO[A_CONTRATTI]
@ -113,7 +112,7 @@ PROMPT 0 0 "Gestione listini/contratti/campagne 2/2"
END END
BOOLEAN 111 BOOLEAN F_GESCAMPAGNE
BEGIN BEGIN
PROMPT 2 2 "Gestione archivio campagne" PROMPT 2 2 "Gestione archivio campagne"
MESSAGE TRUE ENABLE,3@ MESSAGE TRUE ENABLE,3@
@ -121,14 +120,14 @@ MESSAGE FALSE DISABLE,3@
FIELD GES[A_CAMPAGNE] FIELD GES[A_CAMPAGNE]
END END
BOOLEAN 112 BOOLEAN F_GESCAMPAGNEUM
BEGIN BEGIN
PROMPT 2 3 "Gestione campagne per unita di misura" PROMPT 2 3 "Gestione campagne per unita di misura"
FIELD GESUM[A_CAMPAGNE] FIELD GESUM[A_CAMPAGNE]
GROUP 3 GROUP 3
END END
BOOLEAN 113 BOOLEAN F_GESSCACAMPAGNE
BEGIN BEGIN
PROMPT 2 4 "Gestione campagne a scaglioni" PROMPT 2 4 "Gestione campagne a scaglioni"
FIELD GESSCA[A_CAMPAGNE] FIELD GESSCA[A_CAMPAGNE]
@ -136,14 +135,14 @@ GROUP 3
END END
BOOLEAN 114 BOOLEAN F_GESSOCAMPAGNE
BEGIN BEGIN
PROMPT 2 5 "Gestione sconti/omaggio articoli" PROMPT 2 5 "Gestione sconti/omaggio articoli"
FIELD GESSO[A_CAMPAGNE] FIELD GESSO[A_CAMPAGNE]
GROUP 3 GROUP 3
END END
LIST 115 40 LIST F_SEQRICRIGHE1 40
BEGIN BEGIN
PROMPT 2 7 "Sequenza di ricerca righe " PROMPT 2 7 "Sequenza di ricerca righe "
ITEM "A|Codice articolo" ITEM "A|Codice articolo"
@ -154,7 +153,7 @@ ITEM " | "
FIELD SEQRICRIGHE[ 1 ] FIELD SEQRICRIGHE[ 1 ]
END END
LIST 116 40 LIST F_SEQRICRIGHE2 40
BEGIN BEGIN
PROMPT 28 8 "" PROMPT 28 8 ""
ITEM "A|Codice articolo" ITEM "A|Codice articolo"
@ -165,7 +164,7 @@ ITEM " | "
FIELD SEQRICRIGHE[ 2 ] FIELD SEQRICRIGHE[ 2 ]
END END
LIST 117 40 LIST F_SEQRICRIGHE3 40
BEGIN BEGIN
PROMPT 28 9 "" PROMPT 28 9 ""
ITEM "A|Codice articolo" ITEM "A|Codice articolo"
@ -176,7 +175,7 @@ ITEM " | "
FIELD SEQRICRIGHE[ 3 ] FIELD SEQRICRIGHE[ 3 ]
END END
LIST 118 40 LIST F_SEQRICRIGHE4 40
BEGIN BEGIN
PROMPT 28 10 "" PROMPT 28 10 ""
ITEM "A|Codice articolo" ITEM "A|Codice articolo"
@ -196,7 +195,7 @@ BEGIN
PROMPT 0 0 "Gestione Sconti" PROMPT 0 0 "Gestione Sconti"
END END
LIST 119 36 LIST F_GESSCO 36
BEGIN BEGIN
PROMPT 2 1 "Tipo gestione sconti documenti " PROMPT 2 1 "Tipo gestione sconti documenti "
ITEM "N|Non gestire" ITEM "N|Non gestire"
@ -206,7 +205,7 @@ ITEM "A|Gestione archivio sconti "
FIELD GESSCO FIELD GESSCO
END END
BOOLEAN 120 BOOLEAN F_SCOKEY1
BEGIN BEGIN
PROMPT 2 2 "Tabella categoria vendite in chiave" PROMPT 2 2 "Tabella categoria vendite in chiave"
FLAG "D" FLAG "D"
@ -220,7 +219,7 @@ MESSAGE FALSE COPY, 6@
FIELD SCOKEY[1] FIELD SCOKEY[1]
END END
BOOLEAN 121 BOOLEAN F_SCOKEY2
BEGIN BEGIN
PROMPT 2 3 "Tabella sconti clienti" PROMPT 2 3 "Tabella sconti clienti"
MESSAGE TRUE SHOW, 5@ MESSAGE TRUE SHOW, 5@
@ -232,7 +231,7 @@ GROUP 4
FIELD SCOKEY[2] FIELD SCOKEY[2]
END END
BOOLEAN 122 BOOLEAN F_SCOKEY3
BEGIN BEGIN
PROMPT 2 4 "Tabella zone in chiave" PROMPT 2 4 "Tabella zone in chiave"
MESSAGE TRUE SHOW, 6@ MESSAGE TRUE SHOW, 6@
@ -242,28 +241,14 @@ GROUP 5
FIELD SCOKEY[3] FIELD SCOKEY[3]
END END
BOOLEAN 123 BOOLEAN F_SCOKEY4
BEGIN BEGIN
PROMPT 2 5 "Tabella modalita' di pagamento in chiave" PROMPT 2 5 "Tabella modalita' di pagamento in chiave"
GROUP 6 GROUP 6
FIELD SCOKEY[4] FIELD SCOKEY[4]
END END
LIST 124 36 LIST F_GESSCORIGA 40
BEGIN
PROMPT 2 6 "Tipo calcolo sconti documento "
ITEM "R|Sconti sulle righe merci "
ITEM "G|Sconti sul valore globale merci "
FIELD SCOTIPCAL
END
BOOLEAN 125
BEGIN
PROMPT 2 7 "Gestione sconti ad importo "
FIELD GESSCOIMP
END
LIST 126 40
BEGIN BEGIN
PROMPT 2 8 "Tipo gestione sconti riga " PROMPT 2 8 "Tipo gestione sconti riga "
ITEM "N|Non gestire" ITEM "N|Non gestire"
@ -279,11 +264,11 @@ END
BOOLEAN F_GESSCORIGACV BOOLEAN F_GESSCORIGACV
BEGIN BEGIN
PROMPT 2 9 "Gest. arch. sconti con cat. vendita cliente " PROMPT 2 9 "Gest. arch. sconti con cat. vendita cliente "
FIELD GESSCORIGACV FIELD GESSCORIGACV
END END
LIST 128 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 "
@ -293,13 +278,13 @@ ITEM "R|Codice raggruppamento fiscale "
FIELD SCORIGAKEY FIELD SCORIGAKEY
END END
BOOLEAN 129 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
END END
BOOLEAN 130 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

View File

@ -30,13 +30,6 @@ MESSAGE TRUE ENABLE,8@
FIELD GESAGE FIELD GESAGE
END END
BOOLEAN DLG_NULL
BEGIN
PROMPT 2 2 "Gestione subagenti "
FIELD GESSUBAGE
GROUP 8
END
LIST F_TIPOPERC 25 LIST F_TIPOPERC 25
BEGIN BEGIN
FIELD AGETIPOPERC FIELD AGETIPOPERC
@ -142,367 +135,4 @@ END
ENDPAGE ENDPAGE
PAGE "Tabelle di installazione" 1 1 60 2
GROUPBOX DLG_NULL 78 16
BEGIN
PROMPT 0 0 "Etichette totalizzatori piede documento 1/4"
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 2 " 1:"
FIELD PIEDE[ 1]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 3 " 2:"
FIELD PIEDE[ 2]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 4 " 3:"
FIELD PIEDE[ 3]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 5 " 4:"
FIELD PIEDE[ 4]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 6 " 5:"
FIELD PIEDE[ 5]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 7 " 6:"
FIELD PIEDE[ 6]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 8 " 7:"
FIELD PIEDE[ 7]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 9 " 8:"
FIELD PIEDE[ 8]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 10 " 9:"
FIELD PIEDE[ 9]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 11 "10:"
FIELD PIEDE[10]
END
ENDPAGE
PAGE "Tabelle di installazione" 1 1 60 2
GROUPBOX DLG_NULL 78 16
BEGIN
PROMPT 0 0 "Etichette totalizzatori piede documento 2/4"
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 2 "11:"
FIELD PIEDE[11]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 3 "12:"
FIELD PIEDE[12]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 4 "13:"
FIELD PIEDE[13]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 5 "14:"
FIELD PIEDE[14]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 6 "15:"
FIELD PIEDE[15]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 7 "16:"
FIELD PIEDE[16]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 8 "17:"
FIELD PIEDE[17]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 9 "18:"
FIELD PIEDE[18]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 10 "19:"
FIELD PIEDE[19]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 11 "20:"
FIELD PIEDE[20]
END
ENDPAGE
PAGE "Tabelle di installazione" 1 1 60 2
GROUPBOX DLG_NULL 78 16
BEGIN
PROMPT 0 0 "Etichette totalizzatori piede documento 3/4"
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 2 "21:"
FIELD PIEDE[21]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 3 "22:"
FIELD PIEDE[22]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 4 "23:"
FIELD PIEDE[23]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 5 "24:"
FIELD PIEDE[24]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 6 "25:"
FIELD PIEDE[25]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 7 "26:"
FIELD PIEDE[26]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 8 "27:"
FIELD PIEDE[27]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 9 "28:"
FIELD PIEDE[28]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 10 "29:"
FIELD PIEDE[29]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 11 "30:"
FIELD PIEDE[30]
END
ENDPAGE
PAGE "Tabelle di installazione" 1 1 60 2
GROUPBOX DLG_NULL 78 16
BEGIN
PROMPT 0 0 "Etichette totalizzatori piede documento 4/4"
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 2 "31:"
FIELD PIEDE[31]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 3 "32:"
FIELD PIEDE[32]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 4 "33:"
FIELD PIEDE[33]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 5 "34:"
FIELD PIEDE[34]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 6 "35:"
FIELD PIEDE[35]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 7 "36:"
FIELD PIEDE[36]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 8 "37:"
FIELD PIEDE[37]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 9 "38:"
FIELD PIEDE[38]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 10 "39:"
FIELD PIEDE[39]
END
STRING DLG_NULL 40
BEGIN
PROMPT 2 11 "40:"
FIELD PIEDE[40]
END
ENDPAGE
PAGE "Tabella arrotondamenti " 1 1 60 14
GROUPBOX DLG_NULL 78 9
BEGIN
PROMPT 0 0 "Dati anagrafici ditta "
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 2 1 "Arrot. prezzi: fino a lire "
FIELD ARRLIV[ 1 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 42 1 ""
FIELD ARRARG[ 1 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 29 2 ""
FIELD ARRLIV[ 2 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 42 2 ""
FIELD ARRARG[ 2 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 29 3 ""
FIELD ARRLIV[ 3 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 42 3 ""
FIELD ARRARG[ 3 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 29 4 ""
FIELD ARRLIV[ 4 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 42 4 ""
FIELD ARRARG[ 4 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 29 5 ""
FIELD ARRLIV[ 5 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 42 5 ""
FIELD ARRARG[ 5 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 29 6 ""
FIELD ARRLIV[ 6 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 42 6 ""
FIELD ARRARG[ 6 ]
END
NUMBER DLG_NULL 9
BEGIN
PROMPT 29 7 "oltre "
FIELD ARRARG[ 7 ]
END
ENDPAGE
ENDMASK ENDMASK

View File

@ -5,5 +5,39 @@
#define A_CONTRATTI 2 #define A_CONTRATTI 2
#define A_OFFERTE 3 #define A_OFFERTE 3
#define F_CUMULAALC 101
#define F_GESLISTINI 102
#define F_GESLISCV 103
#define F_GESUM 104
#define F_GESSCALISTINI 105
#define F_GESSOLISTINI 106
#define F_GESCONTRATTI 107
#define F_GESCONCC 108
#define F_GESCONTRATTIUM 109
#define F_GESSCACONTRATTI 110
#define F_GESSOCONTRATTI 111
#define F_GESCAMPAGNE 112
#define F_GESCAMPAGNEUM 113
#define F_GESSCACAMPAGNE 114
#define F_GESSOCAMPAGNE 115
#define F_SEQRICRIGHE1 116
#define F_SEQRICRIGHE2 117
#define F_SEQRICRIGHE3 118
#define F_SEQRICRIGHE4 119
#define F_GESSCO 120
#define F_SCOKEY1 121
#define F_SCOKEY2 122
#define F_SCOKEY3 123
#define F_SCOKEY4 124
#define F_GESSCORIGA 125
#define F_GESSCORIGACV 126
#define F_SCORIGAKEY 127
#define F_GESSCOSCA 128
#define F_GESSCOUM 129
#endif #endif