Corretto controllo sul stampa su bollato

git-svn-id: svn://10.65.10.50/trunk@653 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-11-17 14:46:54 +00:00
parent 383ce68690
commit d7e51227e4
4 changed files with 21 additions and 16 deletions

View File

@ -64,8 +64,6 @@ BEGIN
OUTPUT F_TIPO_DOC CODTAB OUTPUT F_TIPO_DOC CODTAB
HELP "Tipo documento" HELP "Tipo documento"
CHECKTYPE NORMAL CHECKTYPE NORMAL
// MESSAGE SHOW, 2@
// MESSAGE EMPTY HIDE, 2@
FLAGS "U" FLAGS "U"
ADD NONE ADD NONE
END END
@ -83,7 +81,6 @@ BEGIN
DISPLAY "Tipo" I0 DISPLAY "Tipo" I0
DISPLAY "Corrispettivi" B0 DISPLAY "Corrispettivi" B0
DISPLAY "Descrizione @50" S0 DISPLAY "Descrizione @50" S0
OUTPUT F_ANNOES CODTAB[1,4]
OUTPUT F_COD_REG CODTAB[5,7] OUTPUT F_COD_REG CODTAB[5,7]
OUTPUT F_TIPO_REG I0 OUTPUT F_TIPO_REG I0
OUTPUT F_CORRISP B0 OUTPUT F_CORRISP B0
@ -92,11 +89,11 @@ BEGIN
FLAGS "DU" FLAGS "DU"
END END
// Questo rimane sempre nascosto // Questo rimane quasi sempre nascosto
STRING F_TIPO_MOV 2 STRING F_TIPO_MOV 2
BEGIN BEGIN
PROMPT 68 4 "" PROMPT 68 4 ""
FIELD LF_CAUSALI->TIPOMOV FIELD TIPOMOV
FLAGS "H" FLAGS "H"
END END
@ -105,7 +102,7 @@ LISTBOX F_TIPO_MOV_1 1 20
BEGIN BEGIN
PROMPT 44 4 "Tipo mov. " PROMPT 44 4 "Tipo mov. "
HELP "Tipo di movimento generato dalla causale" HELP "Tipo di movimento generato dalla causale"
FIELD LF_CAUSALI->TIPOMOV FIELD TIPOMOV
HELP "Tipo movimento" HELP "Tipo movimento"
ITEM " |Nessuno" MESSAGE COPY,F_TIPO_MOV ITEM " |Nessuno" MESSAGE COPY,F_TIPO_MOV
ITEM "1|Fattura" MESSAGE COPY,F_TIPO_MOV ITEM "1|Fattura" MESSAGE COPY,F_TIPO_MOV
@ -250,7 +247,6 @@ BEGIN
COPY DISPLAY F_COD_CAUS COPY DISPLAY F_COD_CAUS
OUTPUT F_COD_CAUS_IM CODCAUS OUTPUT F_COD_CAUS_IM CODCAUS
CHECKTYPE NORMAL CHECKTYPE NORMAL
// MESSAGE CLEAR, F_M_770
GROUP 2 GROUP 2
END END

View File

@ -229,11 +229,14 @@ bool TPrimanota_application::changing_mask(int mode)
if (flag && _iva != nessuna_iva && !_iva_showed) if (flag && _iva != nessuna_iva && !_iva_showed)
{ {
WINDOW w = ivas().parent(); if (!ivas().dirty())
show_window(w, TRUE); {
set_front_window(w); WINDOW w = ivas().parent();
process_events(); show_window(w, TRUE);
show_window(w, FALSE); set_front_window(w);
process_events();
show_window(w, FALSE);
}
_iva_showed = TRUE; _iva_showed = TRUE;
} }

View File

@ -481,6 +481,7 @@ DATE F_DATA74TER
BEGIN BEGIN
PROMPT 54 14 "Data 74/ter " PROMPT 54 14 "Data 74/ter "
HELP "Data per aliquota IVA ex art.74 ter" HELP "Data per aliquota IVA ex art.74 ter"
WARNING "E' richiesta la data del 74/ter"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FIELD DATA74TER FIELD DATA74TER
END END
@ -490,6 +491,7 @@ BEGIN
PROMPT 45 15 "Rif.partita " PROMPT 45 15 "Rif.partita "
FLAGS "A" FLAGS "A"
HELP "Anno di riferimento partita" HELP "Anno di riferimento partita"
WARNING "E' richiesto l'anno di riferimento"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -497,6 +499,7 @@ STRING F_NUMRIF 7
BEGIN BEGIN
PROMPT 68 15 "/ " PROMPT 68 15 "/ "
HELP "Numero documento (o protocollo IVA) di riferimento" HELP "Numero documento (o protocollo IVA) di riferimento"
WARNING "E' richiesto il numero di riferimento"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END

View File

@ -1147,15 +1147,18 @@ bool TPrimanota_application::datareg_handler(TMask_field& f, KEY key)
if (!ok) if (!ok)
return f.error_box("Non esiste il libro giornale dell'esercizio %d", ae); return f.error_box("Non esiste il libro giornale dell'esercizio %d", ae);
if (f.dirty() || f.mask().query_mode()) if (f.dirty() || m.query_mode())
{ {
const long numreg = m.get_long(F_NUMREG);
const bool error = numreg == 0 || numreg > app()._lastreg;
const TLibro_giornale& gio = app().giornale(); const TLibro_giornale& gio = app().giornale();
if (dr < gio.last_print()) if (dr < gio.last_print())
{ {
f.error_box("La data dell'operazione e' antecedente al %s,\n" f.error_box("La data dell'operazione e' antecedente al %s,\n"
"ultima stampa del libro giornale dell'esercizio %d", "ultima stampa del libro giornale dell'esercizio %d",
gio.last_reg().string(), ae); gio.last_reg().string(), ae);
if (!m.edit_mode()) return FALSE; if (error) return FALSE;
} }
if (dr < gio.last_reg()) if (dr < gio.last_reg())
f.warning_box("La data dell'operazione e' antecedente al %s,\n" f.warning_box("La data dell'operazione e' antecedente al %s,\n"
@ -1191,7 +1194,7 @@ bool TPrimanota_application::datareg_handler(TMask_field& f, KEY key)
f.error_box("La data dell'operazione e' antecedente al %s,\n" f.error_box("La data dell'operazione e' antecedente al %s,\n"
"ultima stampa del registro '%s' dell'anno %d", "ultima stampa del registro '%s' dell'anno %d",
reg.last_print().string(), (const char*)codreg, dr.year()); reg.last_print().string(), (const char*)codreg, dr.year());
if (!m.edit_mode()) return FALSE; if (error) return FALSE;
} }
if (dr < reg.last_reg()) if (dr < reg.last_reg())
f.warning_box("La data dell'operazione e' antecedente al %s,\n" f.warning_box("La data dell'operazione e' antecedente al %s,\n"