Cambiate le tabelle dei gruppi merceologici, raggruppamenti fiscali
e anagrafica magazzino: ora tutti hanno i conti di acquisti e vendite. git-svn-id: svn://10.65.10.50/trunk@3401 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro
parent
bf07aaa89e
commit
05adf278ef
@ -8,4 +8,12 @@
|
||||
#define H_CODGRU 108
|
||||
#define H_DESGRU 109
|
||||
#define F_CODIVARIF 110
|
||||
#define F_GRUPPOA 111
|
||||
#define F_CONTOA 112
|
||||
#define F_SOTTOCA 113
|
||||
#define F_DESCRA 114
|
||||
#define F_GRUPPOV 115
|
||||
#define F_CONTOV 116
|
||||
#define F_SOTTOCV 117
|
||||
#define F_DESCRV 118
|
||||
|
||||
|
||||
101
ve/batbgmc.uml
101
ve/batbgmc.uml
@ -14,7 +14,7 @@ END
|
||||
|
||||
STRING F_CODGRU 3
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice gruppo "
|
||||
PROMPT 2 2 "Codice gruppo "
|
||||
FLAG "U"
|
||||
FIELD CODTAB[1,3]
|
||||
KEY 1
|
||||
@ -30,7 +30,7 @@ END
|
||||
|
||||
STRING F_CODSGR 2
|
||||
BEGIN
|
||||
PROMPT 30 2 "Codice sottogruppo "
|
||||
PROMPT 35 2 "Codice sottogruppo "
|
||||
FIELD CODTAB[4,5]
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
@ -51,7 +51,7 @@ END
|
||||
|
||||
STRING H_CODGRU 3
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice gruppo "
|
||||
PROMPT 2 2 "Codice gruppo "
|
||||
FLAG "U"
|
||||
FLAGS "H"
|
||||
COPY USE F_CODGRU
|
||||
@ -63,13 +63,13 @@ END
|
||||
|
||||
STRING F_DESGRU 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione gruppo "
|
||||
PROMPT 2 4 "Descrizione gruppo "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_DESSGR 50
|
||||
BEGIN
|
||||
PROMPT 2 5 "Descrizione sottogruppo "
|
||||
PROMPT 2 5 "Descrizione sottogruppo"
|
||||
FIELD S0
|
||||
USE GMC KEY 2
|
||||
KEY 2
|
||||
@ -85,7 +85,7 @@ END
|
||||
|
||||
STRING H_DESGRU 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione gruppo "
|
||||
PROMPT 2 4 "Descrizione gruppo "
|
||||
FIELD S0
|
||||
KEY 2
|
||||
USE GMC KEY 2
|
||||
@ -130,8 +130,95 @@ BEGIN
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
NUMBER F_GRUPPOA 3
|
||||
BEGIN
|
||||
PROMPT 2 13 "Conto d'acquisto"
|
||||
FIELD I0
|
||||
END
|
||||
|
||||
NUMBER F_CONTOA 3
|
||||
BEGIN
|
||||
PROMPT 23 13 ""
|
||||
FIELD I1
|
||||
END
|
||||
|
||||
NUMBER F_SOTTOCA 6
|
||||
BEGIN
|
||||
PROMPT 28 13 ""
|
||||
FIELD I2
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPOA
|
||||
INPUT CONTO F_CONTOA
|
||||
INPUT SOTTOCONTO F_SOTTOCA
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPOA GRUPPO
|
||||
OUTPUT F_CONTOA CONTO
|
||||
OUTPUT F_SOTTOCA SOTTOCONTO
|
||||
OUTPUT F_DESCRA DESCR
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_DESCRA 50
|
||||
BEGIN
|
||||
PROMPT 18 14 ""
|
||||
FLAG "U"
|
||||
USE LF_PCON KEY 2
|
||||
INPUT DESCR F_DESCRA
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
COPY OUTPUT F_SOTTOCA
|
||||
END
|
||||
|
||||
NUMBER F_GRUPPOV 3
|
||||
BEGIN
|
||||
PROMPT 2 15 "Conto di vendita"
|
||||
FIELD I3
|
||||
END
|
||||
|
||||
NUMBER F_CONTOV 3
|
||||
BEGIN
|
||||
PROMPT 23 15 ""
|
||||
FIELD I4
|
||||
END
|
||||
|
||||
NUMBER F_SOTTOCV 6
|
||||
BEGIN
|
||||
PROMPT 28 15 ""
|
||||
FIELD I5
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPOV
|
||||
INPUT CONTO F_CONTOV
|
||||
INPUT SOTTOCONTO F_SOTTOCV
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPOV GRUPPO
|
||||
OUTPUT F_CONTOV CONTO
|
||||
OUTPUT F_SOTTOCV SOTTOCONTO
|
||||
OUTPUT F_DESCRV DESCR
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_DESCRV 50
|
||||
BEGIN
|
||||
PROMPT 18 16 ""
|
||||
FLAG "U"
|
||||
USE LF_PCON KEY 2
|
||||
INPUT DESCR F_DESCRV
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
COPY OUTPUT F_SOTTOCV
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
|
||||
@ -8,3 +8,12 @@
|
||||
#define FLD_TABRFA_R2 107
|
||||
#define FLD_DESCFA 108
|
||||
#define FLD_TABRFA_S9 109
|
||||
#define F_GRUPPOA 110
|
||||
#define F_CONTOA 111
|
||||
#define F_SOTTOCA 112
|
||||
#define F_DESCRA 113
|
||||
#define F_GRUPPOV 114
|
||||
#define F_CONTOV 115
|
||||
#define F_SOTTOCV 116
|
||||
#define F_DESCRV 117
|
||||
#define FLD_DESIVA 118
|
||||
|
||||
268
ve/batbrfa.uml
268
ve/batbrfa.uml
@ -7,107 +7,215 @@ ENDPAGE
|
||||
PAGE "Raggruppamento fiscali articoli" -1 -1 78 9
|
||||
|
||||
GROUPBOX DLG_NULL 75 7
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAGS "R"
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
STRING FLD_TABRFA_CODTAB 5
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice "
|
||||
FIELD CODTAB
|
||||
USE %RFA
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB FLD_TABRFA_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FLD_TABRFA_CODTAB CODTAB
|
||||
OUTPUT FLD_TABRFA_S0 S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice "
|
||||
FIELD CODTAB
|
||||
USE %RFA
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB FLD_TABRFA_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FLD_TABRFA_CODTAB CODTAB
|
||||
OUTPUT FLD_TABRFA_S0 S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING FLD_TABRFA_S0 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione "
|
||||
FIELD S0
|
||||
USE %RFA KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Manca la descrizione"
|
||||
INPUT S0 FLD_TABRFA_S0
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABRFA_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione "
|
||||
FIELD S0
|
||||
USE %RFA KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Manca la descrizione"
|
||||
INPUT S0 FLD_TABRFA_S0
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABRFA_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
STRING FLD_TABRFA_S7 2
|
||||
BEGIN
|
||||
PROMPT 2 8 "Unita' di misura "
|
||||
FIELD S7
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 2 8 "Unita' di misura "
|
||||
FIELD S7
|
||||
FLAG "U"
|
||||
USE %UMS
|
||||
INPUT CODTAB FLD_TABRFA_S7
|
||||
DISPLAY "U.M. " CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FLD_TABRFA_S7 CODTAB
|
||||
WARNING "Unita' di misura errata"
|
||||
END
|
||||
|
||||
STRING FLD_TABRFA_S8 1
|
||||
BEGIN
|
||||
PROMPT 2 10 "Classe fiscale "
|
||||
FIELD S8
|
||||
USE %ASF
|
||||
INPUT CODTAB FLD_TABRFA_S8
|
||||
DISPLAY "Cl. Fisc." CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT FLD_TABRFA_S8 CODTAB
|
||||
OUTPUT FLD_DESCFA S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 2 9 "Classe fiscale "
|
||||
FIELD S8
|
||||
USE %ASF
|
||||
INPUT CODTAB FLD_TABRFA_S8
|
||||
DISPLAY "Cl. Fisc." CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT FLD_TABRFA_S8 CODTAB
|
||||
OUTPUT FLD_DESCFA S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING FLD_DESCFA 30
|
||||
BEGIN
|
||||
PROMPT 25 10 ""
|
||||
FLAG "D"
|
||||
END
|
||||
STRING FLD_DESCFA 50
|
||||
BEGIN
|
||||
PROMPT 29 9 ""
|
||||
USE %ASF KEY 2
|
||||
INPUT S0 FLD_DESCFA
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Cl. Fisc." CODTAB
|
||||
OUTPUT FLD_TABRFA_S8 CODTAB
|
||||
OUTPUT FLD_DESCFA S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING FLD_TABRFA_S9 4
|
||||
BEGIN
|
||||
PROMPT 2 10 "Cod.IVA riferimento"
|
||||
FIELD S9
|
||||
USE %IVA
|
||||
INPUT CODTAB FLD_TABRFA_S9
|
||||
DISPLAY "Codice IVA" CODTAB
|
||||
DISPLAY "Aliquota" R0
|
||||
OUTPUT FLD_TABRFA_S9 CODTAB
|
||||
OUTPUT FLD_DESIVA S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING FLD_DESIVA 50
|
||||
BEGIN
|
||||
PROMPT 29 10 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
NUMBER FLD_TABRFA_R0 6 2
|
||||
BEGIN
|
||||
PROMPT 2 12 "Perc. ricarico medio "
|
||||
FIELD R0
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 2 11 "% di ricarico medio"
|
||||
FIELD R0
|
||||
END
|
||||
|
||||
NUMBER FLD_TABRFA_R1 12 2
|
||||
BEGIN
|
||||
PROMPT 2 14 "Costo minimo "
|
||||
FIELD R1
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 2 12 "Costo minimo "
|
||||
FIELD R1
|
||||
END
|
||||
|
||||
NUMBER FLD_TABRFA_R2 12 2
|
||||
BEGIN
|
||||
PROMPT 45 14 "massimo "
|
||||
FIELD R2
|
||||
END
|
||||
BEGIN
|
||||
PROMPT 40 12 "massimo "
|
||||
FIELD R2
|
||||
END
|
||||
|
||||
LIST FLD_TABRFA_I0 1 30
|
||||
BEGIN
|
||||
PROMPT 2 13 "Tipo costo "
|
||||
FIELD I0
|
||||
HELP "Inserire il tipo di costo"
|
||||
ITEM "1|Costo medio annuale"
|
||||
ITEM "2|Costo ultimi 3 mesi"
|
||||
ITEM "3|Costo ultimo"
|
||||
ITEM "4|Costo standard"
|
||||
ITEM "5|Maggiore ultimi due costi"
|
||||
ITEM "6|Costo massimo d'acquisto"
|
||||
ITEM "7|Costo minimo d'acquisto"
|
||||
END
|
||||
|
||||
NUMBER F_GRUPPOA 3
|
||||
BEGIN
|
||||
PROMPT 2 16 "Tipo costo "
|
||||
FIELD I0
|
||||
HELP "Inserire il tipo di costo"
|
||||
ITEM "1|Costo medio annuale"
|
||||
ITEM "2|Costo ultimi 3 mesi"
|
||||
ITEM "3|Costo ultimo"
|
||||
ITEM "4|Costo standard"
|
||||
ITEM "5|Maggiore ultimi due costi"
|
||||
ITEM "6|Costo massimo d'acquisto"
|
||||
ITEM "7|Costo minimo d'acquisto"
|
||||
PROMPT 2 14 "Conto d'acquisto "
|
||||
FIELD I0
|
||||
END
|
||||
|
||||
STRING FLD_TABRFA_S8 4
|
||||
NUMBER F_CONTOA 3
|
||||
BEGIN
|
||||
PROMPT 2 10 "Codice IVA riferimento"
|
||||
FIELD S9
|
||||
USE %IVA
|
||||
INPUT CODTAB FLD_TABRFA_S9
|
||||
DISPLAY "Codice IVA" CODTAB
|
||||
DISPLAY "Aliquota" R0
|
||||
OUTPUT F_CODIVARIF CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
PROMPT 26 14 ""
|
||||
FIELD I1
|
||||
END
|
||||
|
||||
NUMBER F_SOTTOCA 6
|
||||
BEGIN
|
||||
PROMPT 31 14 ""
|
||||
FIELD I2
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPOA
|
||||
INPUT CONTO F_CONTOA
|
||||
INPUT SOTTOCONTO F_SOTTOCA
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPOA GRUPPO
|
||||
OUTPUT F_CONTOA CONTO
|
||||
OUTPUT F_SOTTOCA SOTTOCONTO
|
||||
OUTPUT F_DESCRA DESCR
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_DESCRA 50
|
||||
BEGIN
|
||||
PROMPT 21 15 ""
|
||||
FLAG "U"
|
||||
USE LF_PCON KEY 2
|
||||
INPUT DESCR F_DESCRA
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
COPY OUTPUT F_SOTTOCA
|
||||
END
|
||||
|
||||
NUMBER F_GRUPPOV 3
|
||||
BEGIN
|
||||
PROMPT 2 16 "Conto di vendita "
|
||||
FIELD I3
|
||||
END
|
||||
|
||||
NUMBER F_CONTOV 3
|
||||
BEGIN
|
||||
PROMPT 26 16 ""
|
||||
FIELD I4
|
||||
END
|
||||
|
||||
NUMBER F_SOTTOCV 6
|
||||
BEGIN
|
||||
PROMPT 31 16 ""
|
||||
FIELD I5
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPOV
|
||||
INPUT CONTO F_CONTOV
|
||||
INPUT SOTTOCONTO F_SOTTOCV
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPOV GRUPPO
|
||||
OUTPUT F_CONTOV CONTO
|
||||
OUTPUT F_SOTTOCV SOTTOCONTO
|
||||
OUTPUT F_DESCRV DESCR
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_DESCRV 50
|
||||
BEGIN
|
||||
PROMPT 21 17 ""
|
||||
FLAG "U"
|
||||
USE LF_PCON KEY 2
|
||||
INPUT DESCR F_DESCRV
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
COPY OUTPUT F_SOTTOCV
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
@ -175,7 +175,7 @@ BEGIN
|
||||
COPY OUTPUT F_CATCONA
|
||||
END
|
||||
|
||||
STRING F_GRUPPOA 2
|
||||
NUMBER F_GRUPPOA 3
|
||||
BEGIN
|
||||
PROMPT 1 15 "Conto d'acquisto "
|
||||
FIELD LF_ANAMAG->GRUPPOA
|
||||
@ -184,14 +184,14 @@ BEGIN
|
||||
MESSAGE EMPTY ENABLE,11@
|
||||
END
|
||||
|
||||
STRING F_CONTOA 2
|
||||
NUMBER F_CONTOA 3
|
||||
BEGIN
|
||||
PROMPT 22 15 ""
|
||||
FIELD LF_ANAMAG->CONTOA
|
||||
GROUP 12
|
||||
END
|
||||
|
||||
STRING F_SOTTOCA 6
|
||||
NUMBER F_SOTTOCA 6
|
||||
BEGIN
|
||||
PROMPT 26 15 ""
|
||||
FIELD LF_ANAMAG->SOTTOCA
|
||||
@ -262,7 +262,7 @@ BEGIN
|
||||
COPY OUTPUT F_CATCONV
|
||||
END
|
||||
|
||||
STRING F_GRUPPOV 2
|
||||
NUMBER F_GRUPPOV 3
|
||||
BEGIN
|
||||
PROMPT 1 17 "Conto di vendita "
|
||||
FIELD LF_ANAMAG->GRUPPOV
|
||||
@ -271,14 +271,14 @@ BEGIN
|
||||
MESSAGE EMPTY ENABLE,21@
|
||||
END
|
||||
|
||||
STRING F_CONTOV 2
|
||||
NUMBER F_CONTOV 3
|
||||
BEGIN
|
||||
PROMPT 22 17 ""
|
||||
FIELD LF_ANAMAG->CONTOV
|
||||
GROUP 22
|
||||
END
|
||||
|
||||
STRING F_SOTTOCV 6
|
||||
NUMBER F_SOTTOCV 6
|
||||
BEGIN
|
||||
PROMPT 26 17 ""
|
||||
FIELD LF_ANAMAG->SOTTOCV
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user