Errori MI4301 e MI4316

git-svn-id: svn://10.65.10.50/trunk@3545 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-09-09 08:43:18 +00:00
parent a6b954546c
commit 43a1165373

View File

@ -6,7 +6,7 @@ TOOLBAR "" 0 20 0 2
ENDPAGE
PAGE "Tabella deleghe IVA" -1 -1 78 15
PAGE "Versamenti" -1 -1 78 15
NUMBER F_DITTA 5
BEGIN
@ -36,7 +36,7 @@ BEGIN
DISPLAY "Ditta" CODDITTA
OUTPUT F_DITTA CODDITTA
OUTPUT F_RSOC RAGSOC
CHECKTYPE NORMAL
CHECKTYPE NORMAL
WARNING "Ditta assente"
END
@ -47,16 +47,16 @@ BEGIN
CHECKTYPE REQUIRED
FLAGS "RZ"
KEY 1
USE %DEL
USE %DEL
JOIN LF_NDITTE TO %DEL INTO CODDITTA=CODTAB[1,5]
INPUT CODTAB[1,5] F_DITTA
INPUT CODTAB[6,9] F_ANNODEL
INPUT CODTAB[10,11] F_MESEDEL
INPUT CODTAB[12,12] F_TIPODEL
DISPLAY "Ditta" CODTAB[1,5]
DISPLAY "Ragione sociale@50" LF_NDITTE->RAGSOC
DISPLAY "Anno" CODTAB[6,9]
DISPLAY "Mese" CODTAB[10,11]
DISPLAY "Ditta" CODTAB[1,5]
DISPLAY "Ragione sociale@50" LF_NDITTE->RAGSOC
DISPLAY "Tipo" CODTAB[12,12]
OUTPUT F_DITTA CODTAB[1,5]
OUTPUT F_ANNODEL CODTAB[6,9]
@ -66,7 +66,7 @@ BEGIN
// VALIDATE AUTOEXIT_FUNC 2 F_CODDITTA F_ANNO
// GROUP GR_SEARCH
END
LIST F_TIPODEL 20
BEGIN
PROMPT 4 4 "Tipo versamento "
@ -85,7 +85,7 @@ BEGIN
MESSAGE ENABLE,F_MESEDEL
ITEM "7|acconti IVA"
MESSAGE "12",F_MESEDEL|DISABLE,F_MESEDEL
END
END
LIST F_MESEDEL 10
BEGIN
@ -93,10 +93,10 @@ BEGIN
HELP "Mese di versamento"
FIELD CODTAB[10,11]
FLAGS "MG"
KEY 1
KEY 1
ITEM "13|Annuale"
MESSAGE "2",F_TIPODEL
// VALIDATE MTCHECK_FUNC
// VALIDATE MTCHECK_FUNC
// WARNING "Ditta trimestrale: indicare trimestre"
END
@ -138,7 +138,7 @@ END
NUMBER F_CONCESSIONE 3
BEGIN
PROMPT 4 9 "Concessione "
PROMPT 4 9 "Concessione "
HELP "Codice concessione del comune di residenza fiscale"
FIELD S9
FLAGS "RZ"
@ -157,8 +157,8 @@ BEGIN
FIELD R0
FLAGS "R"
PICTURE "."
HELP "Importo versato"
NUM_CALC {ROUND(#THIS_FIELD, -3)}
HELP "Importo versato"
NUM_CALC {ROUND(#THIS_FIELD, -3)}
END
NUMBER F_INTERESSI 15
@ -167,7 +167,7 @@ BEGIN
FIELD R1
FLAGS "R"
PICTURE "."
HELP "Interessi da pagare"
HELP "Interessi da pagare"
END
BOOLEAN F_STAMPATO