diff --git a/ce/ce3100.cpp b/ce/ce3100.cpp index 6b3cacb36..7cd687a10 100755 --- a/ce/ce3100.cpp +++ b/ce/ce3100.cpp @@ -226,7 +226,6 @@ void TRegistro_cespiti::main_loop() TRectype darec(LF_CESPI),arec(LF_CESPI); TString filtro; // filtro sulla attivitá e categorie -// const int esercizio = _mask->get_int(F_ESERCIZIO); const TString4 catini = _mask->get(F_CATINI); const TString4 catfin = _mask->get(F_CATFIN); darec.put(CESPI_CODCGRA, _mask->get(F_GRUPPO)); @@ -260,7 +259,15 @@ void TRegistro_cespiti::main_loop() } _form->find_field('H', first_page, FR_CODDITTA).enable(show_head); _form->find_field('H', first_page, FR_RAGSOC).enable(show_head); + _form->find_field('F', last_page, FR_ESERCIZIO).enable(show_pages); _form->find_field('F', last_page, FR_PAGINA).enable(show_pages); + //scrive l'anno inizio esercizio prima del numero pagina + if (show_pages) + { + TString4 annoinizio; + annoinizio << datainizio.year(); + _form->find_field('F', last_page, FR_ESERCIZIO).set(annoinizio); + } // filtro su ammortamenti fiscali o civilistici _tipoamm = _mask->get_int(F_AMMORTAMENTI); @@ -547,7 +554,7 @@ void TRegistro_cespiti::header_registro() _form->set_testata(); //se stampa bollato -> nascondi data stampa - _form->find_field('F', last_page, FR_DATASTAMPA).show(_mask->get_int(F_TIPOREGISTRO) != 2); + _form->find_field('F', last_page, FR_DATASTAMPA).show(_mask->get_int(F_TIPOREGISTRO) != 2); _form->set_piede(); } diff --git a/ce/ce3100.h b/ce/ce3100.h index fb44d849d..7bfa1e972 100755 --- a/ce/ce3100.h +++ b/ce/ce3100.h @@ -16,6 +16,7 @@ #define FR_SITUAZIONE 12 #define FR_DATASTAMPA 13 #define FR_PAGINA 14 +#define FR_ESERCIZIO 15 #define FR_CAT 21 #define FR_D_CAT 22 diff --git a/ce/ce3100a.frm b/ce/ce3100a.frm index 21d61219e..0d0071b87 100755 --- a/ce/ce3100a.frm +++ b/ce/ce3100a.frm @@ -1944,10 +1944,16 @@ SECTION FOOTER LAST 4 MESSAGE _TODAY END + NUMERO FR_ESERCIZIO + BEGIN + KEY "anno iniziale esercizio" + PROMPT 118 2 "@bPagina@r " + END + NUMERO FR_PAGINA BEGIN KEY "Nr. pagina" - PROMPT 130 2 "@bPagina n.@r " + PROMPT 130 2 "/" END END // section footer last (footer pagina)