diff --git a/ce/ce0100.cpp b/ce/ce0100.cpp index ecee7d7db..4994cafc6 100755 --- a/ce/ce0100.cpp +++ b/ce/ce0100.cpp @@ -208,7 +208,7 @@ bool TCCE_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) case DLG_ATTIV: if (e == fe_button) { - TString app("ce0 -0 CCB"); + const char* const app = "ce0 -0 CCB"; TMailbox mail; TString body; body.format("%d|%d=%s|%d=%s|%d=%s", F_CODSP_CCB, F_CODESER_CCB, (const char *)get(F_CODESER), F_DATAINI_CCB, (const char *)get(F_DATAINI), diff --git a/ce/ce0500.cpp b/ce/ce0500.cpp index f058cbf98..b5bc70f3e 100755 --- a/ce/ce0500.cpp +++ b/ce/ce0500.cpp @@ -191,7 +191,8 @@ void TQuery_mask::on_search_event(TOperable_field& o) else // Filtro per attivitā { filter << "STR(" << CESPI_CODCGRA << "=" << get_int(F_GRUPPO) << ')'; - filter << "&&(" << CESPI_CODSPA << "=\"" << get(F_SPECIE) << "\")"; + TString4 specie = get(F_SPECIE); specie.rtrim(); // Toglie spazi FINALI + filter << "&&(" << CESPI_CODSPA << "=\"" << specie << "\")"; } TSorted_cursor cur(&rel, order, filter); @@ -251,7 +252,8 @@ void TQuery_mask::set_cespi_filter() else // Filtro per attivitā { filter << "STR(" << CESPI_CODCGRA << "=" << get_int(F_GRUPPO) << ')'; - filter << "&&(" << CESPI_CODSPA << "=\"" << get(F_SPECIE) << "\")"; + TString4 specie = get(F_SPECIE); specie.rtrim(); // Toglie spazi FINALI + filter << "&&(" << CESPI_CODSPA << "=\"" << specie << "\")"; } efield(F_IDCESPITE).browse()->set_filter(filter); efield(F_DESC).browse()->set_filter(filter); @@ -272,7 +274,7 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (gruppo.full()) { set(F_GRUPPO, gruppo); - set(F_SPECIE, specie); + set(F_SPECIE, specie.rtrim(), 0x2); // Forza decodifica attivita' } } //niente break!!!!! č fatto apposta per far scattare i successivi controlli su gruppo e specie case F_GRUPPO: diff --git a/ce/ce2101.cpp b/ce/ce2101.cpp index 182371abe..5ae2cde38 100755 --- a/ce/ce2101.cpp +++ b/ce/ce2101.cpp @@ -1624,9 +1624,7 @@ void TCespite::scansione_movimenti(const TDate& data_limite, bool is_valid) tmv.zero("VSPMANU"); } aggiorna_salpro(tmv, tmvam, segno); - } TDate inies, fines; - ditta_cespiti().esercizio_corrente(inies, fines); - + } } // If esistono movimenti } diff --git a/ce/celib.cpp b/ce/celib.cpp index 615fd7a5e..27cb550ce 100755 --- a/ce/celib.cpp +++ b/ce/celib.cpp @@ -50,7 +50,7 @@ void TDitta_cespiti::load_records() str.format("%04d", _esercizio); _cce = cache().get("CCE", str); - str.format("%04d%2s%4s", _esercizio, (const char*)_gruppo, (const char*)_specie); + str.format("%04d%2s%-4s", _esercizio, (const char*)_gruppo, (const char*)_specie); _ccb = cache().get("CCB", str); } @@ -294,7 +294,7 @@ bool TDitta_cespiti::on_category_event(TOperable_field& o, TField_event e, long { const char* fields = by_code ? "CODTAB[7,8]|S0|I0" : "S0|CODTAB[7,8]|I0"; const char* header = by_code ? HR("Categoria|Descrizione@60|Tipo beni") : HR("Descrizione@60|Categoria|Tipo beni"); - const char* sorter = by_code ? "CODTAB[7,8]" : "S0"; + const char* sorter = by_code ? "CODTAB[7,8]" : "UPPER(S0)"; TRelation rel("%CAC"); TSorted_cursor cur(&rel, sorter, "", by_code ? 1 : 2); diff --git a/ce/cetbccb.uml b/ce/cetbccb.uml index 47e4539bd..9740db86e 100755 --- a/ce/cetbccb.uml +++ b/ce/cetbccb.uml @@ -28,7 +28,6 @@ BEGIN OUTPUT F_CODESER_CCB CODTAB OUTPUT F_DATAINI_CCB 105@->D0 OUTPUT F_DATAFINE_CCB 105@->D1 - OUTPUT F_ANNOREG 105@->D1[7,11] CHECKTYPE REQUIRED END @@ -115,7 +114,9 @@ END NUMBER F_ANNOREG 4 BEGIN PROMT 65 6 "" - FLAGS "AD" + FLAGS "DGZ" + DRIVENBY F_CODESER_CCB + NUM_CALC MID(#F_DATAFINE_CCB,0,4) END STRING F_CODREG 3