Correzioni varie sulle impaginazioni, tolti VALIDATE AUTOEXIT.

git-svn-id: svn://10.65.10.50/trunk@2893 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-05-23 13:31:58 +00:00
parent 1019aae9ac
commit ef16db3747
6 changed files with 26 additions and 26 deletions

View File

@ -25,7 +25,7 @@ USE %NOT
INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Destinazione@50" S0
DISPLAY "Blocca immobili" B0
DISPLAY "Blocca immissione" B0
DISPLAY "Documento" B1
OUTPUT F_CODICE CODTAB
OUTPUT F_DEST S0
@ -43,7 +43,7 @@ USE %NOT KEY 2
INPUT S0 F_DEST
DISPLAY "Destinazione@50" S0
DISPLAY "Codice" CODTAB
DISPLAY "Blocca immobili" B0
DISPLAY "Blocca immissione" B0
DISPLAY "Documento" B1
OUTPUT F_CODICE CODTAB
OUTPUT F_DEST S0

View File

@ -32,7 +32,7 @@ BEGIN
COPY ALL FLD_TABOIS_CODTAB
KEY 1
FLAGS "U"
VALIDATE AUTOEXIT_FUNC 1 FLD_TABOIS_CODTAB
// VALIDATE AUTOEXIT_FUNC 1 FLD_TABOIS_CODTAB
END
STRING FLD_TABOIS_S0 40

View File

@ -5,7 +5,7 @@ TOOLBAR "" 0 20 0 2
#include <toolbar.h>
ENDPAGE
PAGE "" -1 -1 78 16
PAGE "Progressivi IVA mensili" -1 -1 78 16
NUMBER F_CODDITTA 5
BEGIN
@ -126,7 +126,7 @@ BEGIN
VALIDATE ZEROFILL_FUNC 2
END
LIST F_IMPORTO 5
LIST F_IMPORTO 7
BEGIN
PROMPT 4 9 "Tipo Importo "
HELP "Tipo importo da applicare"

View File

@ -7,7 +7,7 @@ TOOLBAR "" 0 20 0 2
ENDPAGE
PAGE "Pag.1" -1 -1 78 18
PAGE "Registri" -1 -1 78 18
NUMBER F_CODDITTA 5
BEGIN
@ -242,7 +242,7 @@ END
ENDPAGE
PAGE "Pag.2" -1 -1 78 18
PAGE "Opzioni" -1 -1 78 18
NUMBER DLG_NULL 5
BEGIN

View File

@ -11,8 +11,8 @@ Stampa Tabella Gestione Subagenti
2|@107g%s|Liquid. prov. sul pagato
[Rows]
1|CODTAB[1,2]|@2g@2s
1|CODTAB[3,4]|@10g@2s
1|CODTAB[1,5]|@2g@5s
1|CODTAB[6,7]|@10g@2s
1|S0|@21g@50s
1|R0|@73g@6,rpn|####,@@
2|R1|@21g@6,rpn|####,@@

View File

@ -5,7 +5,7 @@ TOOLBAR "" 0 20 60 2
#include <toolbar.h>
ENDPAGE
PAGE "Gestione subagenti" 11 60 14
PAGE "Tabella subagenti" 11 60 14
GROUPBOX DLG_NULL 75 7
BEGIN
@ -13,13 +13,13 @@ BEGIN
FLAGS "R"
END
STRING F_CODICE 2
STRING F_CODICE 5
BEGIN
PROMPT 2 2 "Agente "
FIELD CODTAB[1,2]
FIELD CODTAB[1,5]
KEY 1
FLAG "U"
USE %AGE
USE AGE
INPUT AGE->CODTAB F_CODICE
DISPLAY "Codice " AGE->CODTAB
DISPLAY "Descrizione@50" AGE->S0
@ -38,17 +38,17 @@ END
STRING F_NUMERO 2
BEGIN
PROMPT 2 4 "Subagente "
FIELD CODTAB[3,4]
FIELD CODTAB[6,7]
FLAG "U"
KEY 1
USE %SUA
INPUT CODTAB[1,2] F_CODICE
INPUT CODTAB[3,4] F_NUMERO
DISPLAY "Agente " CODTAB[1,2]
DISPLAY "Subagente " CODTAB[3,4]
USE SUA
INPUT CODTAB[1,5] F_CODICE
INPUT CODTAB[6,7] F_NUMERO
DISPLAY "Agente " CODTAB[1,5]
DISPLAY "Subagente " CODTAB[6,7]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODICE CODTAB[1,2]
OUTPUT F_NUMERO CODTAB[3,4]
OUTPUT F_CODICE CODTAB[1,5]
OUTPUT F_NUMERO CODTAB[6,7]
OUTPUT F_DESCR S0
CHECKTYPE REQUIRED
END
@ -58,13 +58,13 @@ BEGIN
PROMPT 21 4 ""
FIELD S0
KEY 2
USE %SUA KEY 2
USE SUA KEY 2
INPUT S0 F_DESCR
DISPLAY "Descrizione@50" S0
DISPLAY "Subagente " CODTAB[3,4]
DISPLAY "Agente " CODTAB[1,2]
OUTPUT F_CODICE CODTAB[1,2]
OUTPUT F_NUMERO CODTAB[3,4]
DISPLAY "Subagente " CODTAB[6,7]
DISPLAY "Agente " CODTAB[1,5]
OUTPUT F_CODICE CODTAB[1,5]
OUTPUT F_NUMERO CODTAB[6,7]
OUTPUT F_DESCR S0
CHECKTYPE REQUIRED
END