MOdificati campi per le vendite

git-svn-id: svn://10.65.10.50/trunk@3590 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-09-16 16:22:42 +00:00
parent ee327061a4
commit 1f1ab4323f
2 changed files with 45 additions and 76 deletions

View File

@ -96,9 +96,8 @@
#define F_IMPMINEFF 188
#define F_NONACCEFF 189
#define F_NONSCADEFF 190
#define F_ADDBOLLIRB 191
#define F_ADDBOLLITR 192
#define F_ADDSPINC 193
#define F_ADDBOLLI 191
#define F_PERCSPINC 193
#define F_IVARID 194
#define F_GESTCONTR 195
#define F_CATVEN 196
@ -131,6 +130,7 @@
#define F_CODFASS 222
#define F_TEMP 223
#define F_DESTACF 224
#define F_CODDEP 230
#define DLG_RIC 300
#define DLG_CST 301

View File

@ -1180,30 +1180,6 @@ BEGIN
OUTPUT F_CODVETT3 CODTAB
END
NUMBER F_CODSPED1 5
BEGIN
PROMPT 23 6 "Spedizioniere 1 "
FIELD LF_CFVEN->CODSPED1
FLAGS "Z"
GROUP 7
COPY USE F_CODVETT1
INPUT CODTAB F_CODSPED1
COPY DISPLAY F_CODVETT1
OUTPUT F_CODSPED1 CODTAB
END
NUMBER F_CODSPED2 5
BEGIN
PROMPT 51 6 "Spedizioniere 2 "
FIELD LF_CFVEN->CODSPED2
FLAGS "Z"
GROUP 7
COPY USE F_CODVETT1
INPUT CODTAB F_CODSPED2
COPY DISPLAY F_CODVETT1
OUTPUT F_CODSPED2 CODTAB
END
STRING F_CODPORTO 3
BEGIN
PROMPT 23 7 "Porto "
@ -1225,14 +1201,6 @@ BEGIN
HELP "Indicare se vanno raggruppati i documenti (bolle/fatture)"
END
NUMBER F_NCOPIE 2
BEGIN
PROMPT 58 8 "Numero copie "
FIELD LF_CFVEN->NCOPIE
GROUP 7
HELP "Numero di copie dei documenti"
END
TEXT F_CODFASS
BEGIN
PROMPT 23 9 "Codice fornitore associato "
@ -1320,14 +1288,6 @@ BEGIN
HELP "Data di registrazione della lettera"
END
BOOLEAN F_ADDBNS1500
BEGIN
PROMPT 2 17 "Addebito bollo Lit. 50.000 "
FIELD LF_CFVEN->ADDBNS1500
GROUP 7
HELP "Indicare se addebitare bolli per imponibibili non soggetti superiori a Lit. 50.000"
END
STRING F_CATFIN 2
BEGIN
PROMPT 46 17 "Categoria finanziaria "
@ -1461,28 +1421,20 @@ BEGIN
PROMPT 1 13 "Addebiti"
END
BOOLEAN F_ADDBOLLIRB
BOOLEAN F_ADDBOLLI
BEGIN
PROMPT 2 14 "Bolli Ricevute bancarie "
FIELD LF_CFVEN->ADDBOLLIRB
FIELD LF_CFVEN->ADDBOLLI
GROUP 7
HELP "Indicare se addebitare bolli ricevute bancarie"
END
BOOLEAN F_ADDBOLLITR
NUMBER F_PERCSPINC 6 2
BEGIN
PROMPT 34 14 "Bolli Tratte "
FIELD LF_CFVEN->ADDBOLLITR
PROMPT 40 14 "% Spese incasso "
FIELD LF_CFVEN->PERCSPINC
GROUP 7
HELP "Indicare se addebitare bolli tratte"
END
BOOLEAN F_ADDSPINC
BEGIN
PROMPT 58 14 "Spese incasso "
FIELD LF_CFVEN->ADDSPINC
GROUP 7
HELP "Indicare se addebitare spese d'incasso"
HELP "Indicare la percentuale di addebito delle spese d'incasso"
END
BOOLEAN F_IVARID
@ -1618,15 +1570,32 @@ BEGIN
FIELD LF_CFVEN->CODMAG
USE MAG SELECT CODTAB ? "???"
INPUT CODTAB[1,3] F_CODMAG
DISPLAY "Codice" CODTAB[1,3]
DISPLAY "Magazzino" CODTAB[1,3]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODMAG CODTAB[1,3]
HELP "Codice del magazzino movimentato"
WARNING "Magazzino errato"
FLAGS "U"
END
STRING F_CODDEP 2
BEGIN
PROMPT 48 6 "Codice deposito "
FIELD LF_CFVEN->CODDEP
USE MAG SELECT CODTAB ? "?????"
INPUT CODTAB[1,3] F_CODMAG SELECT
INPUT CODTAB[4,] F_CODDEP
DISPLAY "Magazzino" CODTAB[1,3]
DISPLAY "Deposito" CODTAB[4,]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODMAG CODTAB[1,3]
OUTPUT F_CODDEP CODTAB[4,]
WARNING "Deposito errato"
FLAGS "U"
END
STRING F_CODLIST 3
BEGIN
PROMPT 48 6 "Codice listino "
PROMPT 48 7 "Codice listino "
FIELD LF_CFVEN->CODLIST
USE LF_CONDV
JOIN CVE TO LF_CONDV INTO CODTAB=CATVEN
@ -1738,21 +1707,21 @@ BEGIN
HELP "Tipo di evasione dell'ordine"
END
NUMBER F_MINORD 15
NUMBER F_MINORD 18 3
BEGIN
PROMPT 40 16 "Importo minimo "
FIELD LF_CFVEN->MINORD
GROUP 7
PICTURE "."
PICTURE ".3"
HELP "Importo minimo dell'ordine"
END
NUMBER F_MAXORD 15
NUMBER F_MAXORD 18 3
BEGIN
PROMPT 40 17 "Importo massimo "
FIELD LF_CFVEN->MAXORD
GROUP 7
PICTURE "."
PICTURE ".3"
HELP "Importo massimo dell'ordine"
END