Spostate le tabelle CCO e CVE da comune a ditta.

git-svn-id: svn://10.65.10.50/trunk@3412 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-08-21 10:11:10 +00:00
parent fc63b31cbd
commit 935e944d3c
5 changed files with 93 additions and 93 deletions

View File

@ -5,9 +5,9 @@ STRING F_INIZIO1 3
BEGIN BEGIN
PROMPT 2 1 "Da codice " PROMPT 2 1 "Da codice "
FLAGS "U" FLAGS "U"
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio" HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
FIELD LF_TABCOM->CODTAB FIELD LF_TABCOM->CODTAB
USE %CCO USE CCO
INPUT CODTAB F_INIZIO1 INPUT CODTAB F_INIZIO1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
@ -19,8 +19,8 @@ STRING F_FINE1 3
BEGIN BEGIN
PROMPT 2 3 "A codice " PROMPT 2 3 "A codice "
FLAGS "U" FLAGS "U"
HELP "Codice di fine. Vuoto = fine archivio" HELP "Codice di fine. Vuoto = fine archivio"
FIELD LF_TABCOM->CODTAB FIELD LF_TABCOM->CODTAB
COPY USE F_INIZIO1 COPY USE F_INIZIO1
INPUT CODTAB F_FINE1 INPUT CODTAB F_FINE1
COPY DISPLAY F_INIZIO1 COPY DISPLAY F_INIZIO1

View File

@ -7,7 +7,7 @@ BEGIN
FLAGS "U" FLAGS "U"
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio" HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
FIELD CODTAB FIELD CODTAB
USE %CVE USE CVE
INPUT CODTAB F_INIZIO1 INPUT CODTAB F_INIZIO1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0

View File

@ -16,34 +16,34 @@ END
STRING F_CODICE 2 STRING F_CODICE 2
BEGIN BEGIN
PROMPT 2 2 "Codice " PROMPT 2 2 "Codice "
HELP "Codice della categoria contabile" HELP "Codice della categoria contabile"
FIELD CODTAB FIELD CODTAB
FLAGS "U" FLAGS "U"
KEY 1 KEY 1
USE %CCO USE CCO
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione @30" S0 DISPLAY "Descrizione @30" S0
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_DESCR 50 STRING F_DESCR 50
BEGIN BEGIN
PROMPT 2 4 "Descrizione " PROMPT 2 4 "Descrizione "
HELP "Descrizione della categoria contabile" HELP "Descrizione della categoria contabile"
FIELD LF_TABCOM->S0 FIELD LF_TABCOM->S0
KEY 2 KEY 2
USE %CCO KEY 2 USE CCO KEY 2
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
INPUT S0 F_DESCR INPUT S0 F_DESCR
DISPLAY "Descrizione @30" S0 DISPLAY "Descrizione @30" S0
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
NUMBER F_GRUPPOA 3 NUMBER F_GRUPPOA 3
@ -54,84 +54,84 @@ END
NUMBER F_CONTOA 3 NUMBER F_CONTOA 3
BEGIN BEGIN
PROMPT 26 8 "" PROMPT 26 8 ""
FIELD I1 FIELD I1
END END
NUMBER F_SOTTOCA 6 NUMBER F_SOTTOCA 6
BEGIN BEGIN
PROMPT 31 8 "" PROMPT 31 8 ""
FIELD I2 FIELD I2
USE LF_PCON USE LF_PCON
INPUT GRUPPO F_GRUPPOA INPUT GRUPPO F_GRUPPOA
INPUT CONTO F_CONTOA INPUT CONTO F_CONTOA
INPUT SOTTOCONTO F_SOTTOCA INPUT SOTTOCONTO F_SOTTOCA
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOA GRUPPO OUTPUT F_GRUPPOA GRUPPO
OUTPUT F_CONTOA CONTO OUTPUT F_CONTOA CONTO
OUTPUT F_SOTTOCA SOTTOCONTO OUTPUT F_SOTTOCA SOTTOCONTO
OUTPUT F_DESCRA DESCR OUTPUT F_DESCRA DESCR
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
STRING F_DESCRA 50 STRING F_DESCRA 50
BEGIN BEGIN
PROMPT 21 9 "" PROMPT 21 9 ""
FLAG "U" FLAG "U"
USE LF_PCON KEY 2 USE LF_PCON KEY 2
INPUT DESCR F_DESCRA INPUT DESCR F_DESCRA
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCA COPY OUTPUT F_SOTTOCA
END END
NUMBER F_GRUPPOV 3 NUMBER F_GRUPPOV 3
BEGIN BEGIN
PROMPT 2 11 "Conto di vendita " PROMPT 2 11 "Conto di vendita "
FIELD I3 FIELD I3
END END
NUMBER F_CONTOV 3 NUMBER F_CONTOV 3
BEGIN BEGIN
PROMPT 26 11 "" PROMPT 26 11 ""
FIELD I4 FIELD I4
END END
NUMBER F_SOTTOCV 6 NUMBER F_SOTTOCV 6
BEGIN BEGIN
PROMPT 31 11 "" PROMPT 31 11 ""
FIELD I5 FIELD I5
USE LF_PCON USE LF_PCON
INPUT GRUPPO F_GRUPPOV INPUT GRUPPO F_GRUPPOV
INPUT CONTO F_CONTOV INPUT CONTO F_CONTOV
INPUT SOTTOCONTO F_SOTTOCV INPUT SOTTOCONTO F_SOTTOCV
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOV GRUPPO OUTPUT F_GRUPPOV GRUPPO
OUTPUT F_CONTOV CONTO OUTPUT F_CONTOV CONTO
OUTPUT F_SOTTOCV SOTTOCONTO OUTPUT F_SOTTOCV SOTTOCONTO
OUTPUT F_DESCRV DESCR OUTPUT F_DESCRV DESCR
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
STRING F_DESCRV 50 STRING F_DESCRV 50
BEGIN BEGIN
PROMPT 21 12 "" PROMPT 21 12 ""
FLAG "U" FLAG "U"
USE LF_PCON KEY 2 USE LF_PCON KEY 2
INPUT DESCR F_DESCRV INPUT DESCR F_DESCRV
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCV COPY OUTPUT F_SOTTOCV
END END
ENDPAGE ENDPAGE

View File

@ -1,6 +1,6 @@
// campi maschera batb%cve.msk // campi maschera batbcve.msk
#define F_CODICE 101 #define F_CODICE 101
#define F_DESCR 102 #define F_DESCR 102

View File

@ -21,18 +21,18 @@ BEGIN
FIELD CODTAB FIELD CODTAB
FLAGS "U" FLAGS "U"
KEY 1 KEY 1
USE %CVE USE CVE
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione @50" S0 DISPLAY "Descrizione @50" S0
DISPLAY "Provvigione" R0 DISPLAY "Provvigione" R0
DISPLAY "Gruppo" I1 DISPLAY "Gruppo" I1
DISPLAY "Conto" I2 DISPLAY "Conto" I2
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
OUTPUT F_PROVV R0 OUTPUT F_PROVV R0
OUTPUT F_GRUPPO I1 OUTPUT F_GRUPPO I1
OUTPUT F_CONTO I2 OUTPUT F_CONTO I2
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -42,7 +42,7 @@ BEGIN
HELP "Descrizione della categoria di vendita" HELP "Descrizione della categoria di vendita"
FIELD LF_TABCOM->S0 FIELD LF_TABCOM->S0
KEY 2 KEY 2
USE %CVE KEY 2 USE CVE KEY 2
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
INPUT S0 F_DESCR INPUT S0 F_DESCR
DISPLAY "Descrizione @50" S0 DISPLAY "Descrizione @50" S0