Correzzione errori

git-svn-id: svn://10.65.10.50/trunk@3343 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-08-08 15:43:08 +00:00
parent 4cb1eba51e
commit 48a929407b
8 changed files with 32 additions and 19 deletions

View File

@ -24,7 +24,7 @@ BEGIN
FIELD CODPROF FIELD CODPROF
HELP "Codice del profilo utente" HELP "Codice del profilo utente"
USE LF_FORM USE LF_FORM
INPUT TIPOPROF F_BASE INPUT TIPOPROF F_BASE SELECT
INPUT CODPROF F_CODE INPUT CODPROF F_CODE
DISPLAY "Profilo base" TIPOPROF DISPLAY "Profilo base" TIPOPROF
DISPLAY "Codice" CODPROF DISPLAY "Codice" CODPROF
@ -38,7 +38,13 @@ STRING F_DESC 50
BEGIN BEGIN
PROMPT 2 3 "Descrizione " PROMPT 2 3 "Descrizione "
HELP "Descrizione profilo utente" HELP "Descrizione profilo utente"
COPY ALL F_CODE USE LF_FORM KEY 2
INPUT TIPOPROF F_BASE SELECT
INPUT DESC F_DESC
DISPLAY "Descrizione@50" DESC
DISPLAY "Profilo base" TIPOPROF
DISPLAY "Codice" CODPROF
COPY OUTPUT F_CODE
FIELD DESC FIELD DESC
END END

View File

@ -348,7 +348,7 @@ bool BA3700_application::tipo_rata(TMask_field& f, KEY k)
TPagamento* pag = s->_pag; TPagamento* pag = s->_pag;
TSheet_field* shf = s->_sht; TSheet_field* shf = s->_sht;
if (k == K_TAB && pag) if (k == K_TAB && pag && f.focusdirty())
{ {
pag->set_default_ulc(""); pag->set_default_ulc("");
f.mask().set(F_ULT_CLASS,""); f.mask().set(F_ULT_CLASS,"");

View File

@ -21,6 +21,7 @@ BEGIN
DISPLAY "Data fine esercizio" D1 DISPLAY "Data fine esercizio" D1
OUTPUT F_INIZIO1 CODTAB OUTPUT F_INIZIO1 CODTAB
GROUP 1 GROUP 1
ADD NONE
END END
NUMBER F_FINE1 4 NUMBER F_FINE1 4
@ -34,6 +35,7 @@ BEGIN
COPY DISPLAY F_INIZIO1 COPY DISPLAY F_INIZIO1
OUTPUT F_FINE1 CODTAB OUTPUT F_FINE1 CODTAB
GROUP 2 GROUP 2
ADD NONE
END END
BUTTON DLG_OK 10 2 BUTTON DLG_OK 10 2

View File

@ -183,7 +183,7 @@ END
ENDPAGE ENDPAGE
PAGE "Stampa bilancio di verifica" -1 -1 74 20 PAGE "Parametri bilancio di verifica" -1 -1 74 20
RADIOBUTTON F_VERIFICA 27 RADIOBUTTON F_VERIFICA 27
BEGIN BEGIN

View File

@ -30,6 +30,7 @@ BEGIN
FLAGS "Z" FLAGS "Z"
HELP "Codice esercizio per il quale si desidera il ricalcolo dei saldi" HELP "Codice esercizio per il quale si desidera il ricalcolo dei saldi"
WARNING "Il codice esercizio e' obbligatorio" WARNING "Il codice esercizio e' obbligatorio"
ADD RUN cg0 -5 esc
END END

View File

@ -74,6 +74,7 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
WARNING "Codice non presente in tabella esercizi" WARNING "Codice non presente in tabella esercizi"
FLAGS "GRZD" FLAGS "GRZD"
ADD RUN cg0 -5 esc
END END
NUMBER F_ANNO 4 NUMBER F_ANNO 4
@ -87,6 +88,7 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
WARNING "Anno non presente in tabella esercizi" WARNING "Anno non presente in tabella esercizi"
FLAGS "GRZD" FLAGS "GRZD"
ADD RUN cg0 -5 esc
END END

View File

@ -20,6 +20,7 @@ BEGIN
DISPLAY "Data fine esercizio" D1 DISPLAY "Data fine esercizio" D1
OUTPUT F_ANNO CODTAB[1,4] OUTPUT F_ANNO CODTAB[1,4]
FLAGS "Z" FLAGS "Z"
ADD RUN cg0 -5 esc
END END
BOOLEAN F_SCARICATO BOOLEAN F_SCARICATO

View File

@ -53,6 +53,7 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
HELP "Esercizio da cui ripristinare la stampa" HELP "Esercizio da cui ripristinare la stampa"
WARNING "Esercizio assente" WARNING "Esercizio assente"
ADD RUN cg0 -5 esc
END END
STRING F_REG 3 STRING F_REG 3