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
HELP "Codice del profilo utente"
USE LF_FORM
INPUT TIPOPROF F_BASE
INPUT TIPOPROF F_BASE SELECT
INPUT CODPROF F_CODE
DISPLAY "Profilo base" TIPOPROF
DISPLAY "Codice" CODPROF
@ -38,7 +38,13 @@ STRING F_DESC 50
BEGIN
PROMPT 2 3 "Descrizione "
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
END

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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