From d13bfb3fa2e2497e976f9997cc54c357767c6c0f Mon Sep 17 00:00:00 2001 From: alex Date: Mon, 12 May 2003 15:03:40 +0000 Subject: [PATCH] Patch level : 2.0 470 Files correlati : Ricompilazione Demo : [ ] Commento : Aggiunta traduzione a i cespiti git-svn-id: svn://10.65.10.50/trunk@11114 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ce/ce0100.cpp | 19 ++---- ce/ce0400.cpp | 2 +- ce/ce0500.cpp | 149 +++++++++++++++++++++++---------------------- ce/ce0900.cpp | 38 ++++++------ ce/ce1100.cpp | 62 +++++++++---------- ce/ce1200.cpp | 120 ++++++++++++++++++------------------ ce/ce1300.cpp | 138 ++++++++++++++++++++--------------------- ce/ce1301c.uml | 9 +-- ce/ce1400.cpp | 44 +++++++------- ce/ce3200.cpp | 14 ++--- ce/ce3300.cpp | 28 ++++----- ce/ce3400.cpp | 12 ++-- ce/ce3500.cpp | 16 ++--- ce/ce3600.cpp | 2 +- ce/ce3700.cpp | 4 +- ce/ce3800.cpp | 6 +- ce/ceeur.cpp | 8 +-- ce/ceeur01.cpp | 6 +- ce/ceeur02.cpp | 20 +++--- ce/celib.cpp | 5 +- ce/cetbcce.uml | 2 + ce/cetbtmc.uml | 2 + ce/columnst.cpp | 152 ---------------------------------------------- ce/columnst.h | 53 ---------------- projects/ce.dsw | 60 ++++++++++++++++++ projects/ce0.dsp | 155 +++++++++++++++++++---------------------------- projects/ce1.dsp | 83 +++++++++---------------- projects/ce2.dsp | 43 +++---------- projects/ce3.dsp | 91 ++++++++++------------------ 29 files changed, 542 insertions(+), 801 deletions(-) delete mode 100755 ce/columnst.cpp delete mode 100755 ce/columnst.h diff --git a/ce/ce0100.cpp b/ce/ce0100.cpp index d8e6735ff..11d6c555e 100755 --- a/ce/ce0100.cpp +++ b/ce/ce0100.cpp @@ -41,7 +41,7 @@ bool TTMC_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (e == fe_close && !query_mode()) { if ((!get_bool(F_APPLICABLE1)) && (!get_bool(F_APPLICABLE2)) && (!get_bool(F_APPLICABLE3))) - return error_box("E' necessario specificare almeno un'applicabilita'"); + return error_box(TR("E' necessario specificare almeno un'applicabilita'")); } default: break; @@ -88,7 +88,7 @@ bool TCAC_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (tipo_cesp == 1 || (tipo_cesp == 2 && tipo_vinc != 3 && pmin == ZERO && pmax == ZERO)) - return error_box("Numero di anni per ammortamento costi obbligatori"); + return error_box(TR("Numero di anni per ammortamento costi obbligatori")); } } break; @@ -103,13 +103,13 @@ bool TCAC_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) { // categorie comuni if (codcat < MIN_CAT_COM) - return error_box("Le categorie comuni non possono avere\n un codice inferiore a %d", MIN_CAT_COM); + return error_box(TR("Le categorie comuni non possono avere\n un codice inferiore a %d"), MIN_CAT_COM); } else { // categorie noncomuni if (codcat >= MIN_CAT_COM) - return error_box("I codici categoria superiori o uguali\n a %d sono riservati alle Categorie Comuni",MIN_CAT_COM); + return error_box(TR("I codici categoria superiori o uguali\n a %d sono riservati alle Categorie Comuni"),MIN_CAT_COM); } } default: @@ -298,11 +298,7 @@ bool TCEtables::protected_record(TRectype& rec) void TCEtables::init_query_mode(TMask& m) { if (get_tabname() == "CCE") - { -// m.show(F_CODESER,TRUE); -// m.show(F_CODESERCONT,FALSE); m.disable(DLG_ATTIV); - } if (get_tabname() == "CCB") { m.show(F_CODSP_CCB,TRUE); @@ -312,11 +308,6 @@ void TCEtables::init_query_mode(TMask& m) void TCEtables::init_query_insert_mode(TMask& m) { - if (get_tabname() == "CCE") - { -// m.show(F_CODESER,FALSE); -// m.show(F_CODESERCONT,TRUE); - } if (get_tabname() == "CCB") { m.show(F_CODSP_CCB,FALSE); @@ -337,7 +328,7 @@ int ce0100(int argc, char* argv[]) if (argc > 2) { TString name; - name << "Tabella " << argv[2]; + name << TR("Tabella ") << argv[2]; TCEtables a; a.run(argc, argv, name); } diff --git a/ce/ce0400.cpp b/ce/ce0400.cpp index 94f0392e7..5b12186ff 100755 --- a/ce/ce0400.cpp +++ b/ce/ce0400.cpp @@ -15,6 +15,6 @@ TCespi_config_app::TCespi_config_app() : TConfig_application(CONFIG_DITTA) int ce0400 (int argc, char* argv[]) { TCespi_config_app appc; - appc.run(argc, argv, "Parametri Ditta"); + appc.run(argc, argv, TR("Parametri Ditta")); return 0; } \ No newline at end of file diff --git a/ce/ce0500.cpp b/ce/ce0500.cpp index 3a5a84ccb..e94a7bafb 100755 --- a/ce/ce0500.cpp +++ b/ce/ce0500.cpp @@ -40,43 +40,45 @@ void TQuery_mask::on_search_event(TOperable_field& o) TToken_string order, fields, header; if (o.dlg() >= F_SEARCH3) { - order.add(CESPI_STABILIM); header.add("Stabilimento"); - order.add(CESPI_REPARTO); header.add("Reparto@10"); + order.add(CESPI_STABILIM); header.add(TR("Stabilimento")); + order.add(CESPI_REPARTO); header.add(FR("Reparto@10")); } if (o.dlg() >= F_SEARCH2) { - order.add(CESPI_CODIMP); header.add("Impianto@10"); - order.add("CIM->S0"); header.add("Descrizione impianto@40"); + order.add(CESPI_CODIMP); header.add(FR("Impianto@10")); + order.add("CIM->S0"); header.add(FR("Descrizione impianto@40")); } if (o.dlg() >= F_SEARCH1) { - order.add(CESPI_CODCAT); header.add("Cat"); - order.add(CESPI_DTCOMP); header.add("Data Acq.@10"); + order.add(CESPI_CODCAT); header.add(TR("Cat")); + order.add(CESPI_DTCOMP); header.add(FR("Data Acq.@10")); } - order.add(CESPI_IDCESPITE); header.add("Codice@10"); + order.add(CESPI_IDCESPITE); header.add(FR("Codice@10")); fields = order; - fields.add(CESPI_DESC); header.add("Descrizione cespite@50"); + fields.add(CESPI_DESC); header.add(FR("Descrizione cespite@50")); TRelation rel(LF_CESPI); + + rel.add("CIM","CODTAB==CODIMP"); - TString filter; - if (get(F_SELECT)[0] == 'I') // Filtro per impianto + TString filter; + + if (get(F_SELECT) == "I") // Filtro per impianto { - rel.add("CIM","CODTAB==CODIMP"); const TString& imp = get(F_IMPIANTO); if (!imp.empty()) filter << CESPI_CODIMP << "=\"" << imp << '"'; } else // Filtro per attività { - filter << "STR(" << CESPI_CODCGRA << "=" << get(F_GRUPPO) << ')'; + filter << "STR(" << CESPI_CODCGRA << "=" << get_int(F_GRUPPO) << ')'; filter << "&&(" << CESPI_CODSPA << "=\"" << get(F_SPECIE) << "\")"; } TSorted_cursor cur(&rel, order, filter); - TCursor_sheet sht(&cur, fields, "Cespiti", header, 0, 1); + TCursor_sheet sht(&cur, fields, TR("Cespiti"), header, 0, 1); if (sht.run() == K_ENTER) { TToken_string& row = sht.row(); @@ -114,16 +116,15 @@ int TQuery_mask::calcola_stato_attivita() bool TQuery_mask::cespite_ok() const { - TLocalisamfile cespi(LF_CESPI); - cespi.put(CESPI_IDCESPITE, get(F_IDCESPITE)); - bool ok = cespi.read() == NOERR; + const TRectype & cespi = cache().get(LF_CESPI, get(F_IDCESPITE)); + const bool ok = !cespi.empty(); return ok; } void TQuery_mask::set_cespi_filter() { TString filter; - if (get(F_SELECT)[0] == 'I') // Filtro per impianto + if (get(F_SELECT) == "I") // Filtro per impianto { const TString& imp = get(F_IMPIANTO); if (!imp.empty()) @@ -131,7 +132,7 @@ void TQuery_mask::set_cespi_filter() } else // Filtro per attività { - filter << "STR(" << CESPI_CODCGRA << "=" << get(F_GRUPPO) << ')'; + filter << "STR(" << CESPI_CODCGRA << "=" << get_int(F_GRUPPO) << ')'; filter << "&&(" << CESPI_CODSPA << "=\"" << get(F_SPECIE) << "\")"; } efield(F_IDCESPITE).browse()->set_filter(filter); @@ -176,7 +177,7 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) const TRectype& cac = dc.categoria(0, NULL, get_int(F_CATEGORIA)); const int fine_validita = cac.get_date("D1").year(); if (fine_validita > 0 && fine_validita < get_int(F_ESERCIZIO)) - return error_box("Categoria scaduta nell'esercizio %d", fine_validita); + return error_box(FR("Categoria scaduta nell'esercizio %d"), fine_validita); } if (e == fe_init || e == fe_modify || e == fe_button) { @@ -184,7 +185,7 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) enable(DLG_NEWREC, !bollati && !o.empty() && !field(F_SPECIE).empty()); } if (e == fe_close && o.empty() && !cespite_ok()) - return error_box("È necessario specificare la categoria del nuovo cespite"); + return error_box(TR("È necessario specificare la categoria del nuovo cespite")); } } break; @@ -192,16 +193,18 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (e == fe_close) { if (stato_attivita() == 3 && !cespite_ok()) - return error_box("E' stato stampato il bollato dell'anno:\nnon sono permessi inserimenti"); + return error_box(TR("E' stato stampato il bollato dell'anno:\nnon sono permessi inserimenti")); } if (e == fe_modify && !o.empty() && cespite_ok()) { - TLocalisamfile salce(LF_SALCE); - salce.put(SALCE_IDCESPITE, get(F_IDCESPITE)); - salce.put(SALCE_CODES, get(F_ESERCIZIO)); - salce.put(SALCE_TPSALDO, 1); - if (salce.read() != NOERR) - return yesno_box("Non esistono saldi per l'anno selezionato:\nSi desidera continuare ugualmente?"); + TString key; + + key = get(F_IDCESPITE); + key << '|' << get(F_ESERCIZIO) << "|1"; + + const TRectype & salce = cache().get(LF_SALCE, key); + if (salce.empty()) + return yesno_box(TR("Non esistono saldi per l'anno selezionato:\nSi desidera continuare ugualmente?")); } break; default: @@ -304,17 +307,17 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (stato_attivita() == 2) { if (dtcomp < iniz) - return error_box("La data appartiene ad un esercizio già stampato su bollato"); + return error_box(TR("La data appartiene ad un esercizio già stampato su bollato")); const TRectype& cac = dc.categoria(0, NULL, get_int(F_CATEGORIA)); iniz = cac.get("D0"); if (iniz.ok() && dtcomp < iniz) - return error_box("La data è precedente all'inizio della validità della categoria"); + return error_box(TR("La data è precedente all'inizio della validità della categoria")); fine = cac.get("D1"); if (fine.ok() && dtcomp > fine) - return error_box("La data è succesiva alla fine della validità della categoria"); + return error_box(TR("La data è succesiva alla fine della validità della categoria")); } if (dc.esercizio_costituzione() && dtcomp < iniz) - return error_box("Non è possibile specificare una data antecedente all'esercizio di costituzione"); + return error_box(TR("Non è possibile specificare una data antecedente all'esercizio di costituzione")); if (tipo_cespite() != tc_materiale && dtcomp.year() >= dc.anno_tuir()) { @@ -331,29 +334,29 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) { const TDate dtcomp = field(F_DTCOMP).get(); if (dtfunz < dtcomp) - return error_box("La data di entrata in funzione deve essere successiva a quella di aquisizione"); + return error_box(FR("La data di entrata in funzione deve essere successiva a quella di aquisizione")); if (!dtcomp.ok()) - return error_box("La data di entrata in funzione non puo' essere inserita senza specificare quella di aquisizione"); + return error_box(TR("La data di entrata in funzione non puo' essere inserita senza specificare quella di aquisizione")); if (stato_attivita() == 2) { const TDate iniz = get(F_INIZIO_ES); if (dtfunz < iniz) - return error_box("La data di entrata in funzione deve essere successiva a quella di inizio esercizio"); + return error_box(TR("La data di entrata in funzione deve essere successiva a quella di inizio esercizio")); } TDitta_cespiti& dc = ditta_cespiti(); if (_tipo != tc_materiale && dtfunz != dtcomp) { if (dtcomp.year() >= dc.anno_tuir()) - return error_box("In base alla normativa del TUIR, le date di acquisizione e di entrata in funzione devono coincidere"); + return error_box(TR("In base alla normativa del TUIR, le date di acquisizione e di entrata in funzione devono coincidere")); } const TRectype& cac = dc.categoria(0, NULL, get_int(F_CATEGORIA)); const TDate iniz = cac.get("D0"); if (iniz.ok() && dtfunz < iniz) - return error_box("La data è precedente all'inizio validità della categoria"); + return error_box(TR("La data è precedente all'inizio validità della categoria")); const TDate fine = cac.get("D1"); if (fine.ok() && dtfunz > fine) - return error_box("La data è successiva alla fine validità della categoria"); + return error_box(TR("La data è successiva alla fine validità della categoria")); if (dtfunz.year() >= dc.anno_tuir()) set(F_TUIR, "X"); @@ -378,7 +381,7 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (e == fe_modify || e == fe_close) { if (o.empty() && get_bool(F_LEASING)) - return error_box("Indicare il valore del riscatto per beni in leasing"); + return error_box(TR("Indicare il valore del riscatto per beni in leasing")); test_ammissibilita_saldi(); } break; @@ -390,7 +393,7 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) TCurrency plusr; get_currency(F_PLUSREIN, plusr); const TCurrency minim = costo - noamm; if (plusr > minim) - return error_box("La plusvalenza reinvestita non puo' superare %s", minim.string(TRUE)); + return error_box(FR("La plusvalenza reinvestita non puo' superare %s"), minim.string(TRUE)); } break; case F_ELEMENTI: @@ -399,10 +402,10 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) const TDate dtcomp = field(F_DTCOMP).get(); const TDate dtiniz = field(F_INIZIO_ES).get(); if (dtcomp.ok() && dtcomp < dtiniz) - return error_box("E' necessario specificare il numero di elementi per cespiti acquisiti negli esercizi precedenti"); + return error_box(TR("E' necessario specificare il numero di elementi per cespiti acquisiti negli esercizi precedenti")); const short fields[] = { F_COSTO, F_VNONAMM, F_RIV75, F_RIV83, F_RIV90, F_RIV91, F_RIVGF, F_RIVGC, 0 }; if (one_compiled(fields)) - return error_box("E' necessario inserire il nunero degli elementi"); + return error_box(TR("E' necessario inserire il nunero degli elementi")); } break; case F_RIV90: @@ -433,8 +436,8 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (fon_amm > val_amm) { TString msg; - msg << "Il fondo ammortamento fiscale (" << fon_amm.string(TRUE) << ')'; - msg << "non puo' superare il valore da ammortizzare (" << val_amm.string(TRUE) << ')'; + msg << TR("Il fondo ammortamento fiscale (") << fon_amm.string(TRUE) << ')'; + msg << TR("non puo' superare il valore da ammortizzare (") << val_amm.string(TRUE) << ')'; return error_box(msg); } } @@ -445,7 +448,7 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (get_int(F_USOPROM) > 1 && !field(F_ANNIAMM).empty()) { if (field(F_FPRIVATO).empty() && field(F_QPERSEPRIV).empty()) - return error_box("E' necessario inserire un fondo di ammortamento privato o delle quote perse private"); + return error_box(TR("E' necessario inserire un fondo di ammortamento privato o delle quote perse private")); } } break; @@ -459,8 +462,8 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (fon_amm > val_amm) { TString msg; - msg << "Il fondo ammortamento civilistico (" << fon_amm.string(TRUE) << ')'; - msg << "non puo' superare il valore da ammortizzare (" << val_amm.string(TRUE) << ')'; + msg << TR("Il fondo ammortamento civilistico (") << fon_amm.string(TRUE) << ')'; + msg << TR("non puo' superare il valore da ammortizzare (") << val_amm.string(TRUE) << ')'; return error_box(msg); } } @@ -504,7 +507,7 @@ void TEdit_mask::protect_page(int page, TToken_string& enabling) bool TEdit_mask::test_ammissibilita_dati() { - const char* msg = insert_mode() ? "Inserimento" : "Modifica"; + const char* msg = insert_mode() ? TR("Inserimento") : TR("Modifica"); xvt_statbar_set(msg, TRUE); return FALSE; } @@ -526,12 +529,12 @@ bool TEdit_mask::test_ammissibilita_saldi() else protez = dtacq >= iniz || dtfunz >= iniz; if (protez) - msg = "Inserire gli importi nel movimento d'acquisto"; + msg = TR("Inserire gli importi nel movimento d'acquisto"); } break; case 3: protez = TRUE; - msg = "Bollato stampato: non sono ammesse modifiche"; + msg = TR("Bollato stampato: non sono ammesse modifiche"); break; default: break; @@ -545,7 +548,7 @@ bool TEdit_mask::test_ammissibilita_saldi() if (*msg) beep(1); else - msg = insert_mode() ? "Inserimento" : "Modifica"; + msg = insert_mode() ? TR("Inserimento") : TR("Modifica"); xvt_statbar_set(msg, TRUE); return protez; @@ -570,12 +573,12 @@ bool TEdit_mask::test_ammissibilita_fondi() protez = dtacq >= iniz; } if (protez) - msg = "Inserire gli importi nel movimento d'acquisto"; + msg = TR("Inserire gli importi nel movimento d'acquisto"); } break; case 3: protez = TRUE; - msg = "Bollato stampato: non sono ammesse modifiche"; + msg = TR("Bollato stampato: non sono ammesse modifiche"); break; default: protez = FALSE; break; } @@ -592,7 +595,7 @@ bool TEdit_mask::test_ammissibilita_fondi() bool prot9 = FALSE; if (!dtfunz.ok() || dtfunz >= iniz) { - msg = "Cespite non ancora entrato in funzione a inizio esercizio"; + msg = TR("Cespite non ancora entrato in funzione a inizio esercizio"); prot9 = TRUE; } else @@ -600,7 +603,7 @@ bool TEdit_mask::test_ammissibilita_fondi() const TRectype& cac = ditta_cespiti().categoria(0, NULL, get_int(F_CATEGORIA)); if (cac.get_bool("B0")) { - msg = "Categoria non ammortizzabile"; + msg = TR("Categoria non ammortizzabile"); prot9 = TRUE; } } @@ -609,7 +612,7 @@ bool TEdit_mask::test_ammissibilita_fondi() if (*msg) beep(1); else - msg = insert_mode() ? "Inserimento" : "Modifica"; + msg = insert_mode() ? TR("Inserimento") : TR("Modifica"); xvt_statbar_set(msg, TRUE); return protez; @@ -652,7 +655,7 @@ class TAnacespi : public TRelation_application private: void init_mask(TMask& m); - void kill_cespite(const TString& idcespite, int lfile, int key = 1); + bool kill_cespite(const TString& idcespite, int lfile, int key = 1); protected: // @cmember Inizializzazione dei dati dell'utente @@ -828,7 +831,7 @@ void TAnacespi::init_modify_mode(TMask& m) _emask->protect_page(2, enabling); if (!m.field(F_DTALIEN).empty()) - xvt_statbar_set("Cespite alienato: non è possibile apportare modifiche", TRUE); + xvt_statbar_set(TR("Cespite alienato: non è possibile apportare modifiche"), TRUE); } const char* TAnacespi::get_next_key() @@ -900,7 +903,7 @@ int TAnacespi::write(const TMask& m) return err; } -void TAnacespi::kill_cespite(const TString& idcespite, int lfile, int key) +bool TAnacespi::kill_cespite(const TString& idcespite, int lfile, int key) { TRelation rel(lfile); TRectype& filter = rel.curr(); @@ -913,8 +916,9 @@ void TAnacespi::kill_cespite(const TString& idcespite, int lfile, int key) { int err = curr.remove(rel.lfile()); if (err != NOERR) - error_box("Errore %d di cancellazione sul file %d", err, lfile); + return error_box(FR("Errore %d di cancellazione sul file %d"), err, lfile); } + return TRUE; } bool TAnacespi::remove() @@ -923,23 +927,22 @@ bool TAnacespi::remove() const int staat = _qmask->stato_attivita(); bool yes = FALSE; if (staat == 3) - yes = yesno_box("ATTENZIONE: il cespite è già stato stampato su bollato.\n" - "Si desidera confermare l'elimininazione?"); + yes = yesno_box(TR("ATTENZIONE: il cespite è già stato stampato su bollato.\n" + "Si desidera confermare l'elimininazione?")); else - yes = yesno_box("ATTENZIONE: verranno eliminati anche i valori relativi agli esercizi precedenti.\n" - "Si desidera confermare l'elimininazione?"); + yes = yesno_box(TR("ATTENZIONE: verranno eliminati anche i valori relativi agli esercizi precedenti.\n" + "Si desidera confermare l'elimininazione?")); if (yes) - { + { const TString16 idcespite = get_relation()->curr().get(CESPI_IDCESPITE); - kill_cespite(idcespite, LF_SALCE); - kill_cespite(idcespite, LF_MOVCE, 2); - kill_cespite(idcespite, LF_MOVAM); - kill_cespite(idcespite, LF_AMMMV); - kill_cespite(idcespite, LF_AMMCE); - TRelation_application::remove(); - } - return yes; + + if (kill_cespite(idcespite, LF_SALCE) && kill_cespite(idcespite, LF_MOVCE, 2) && + kill_cespite(idcespite, LF_MOVAM) && kill_cespite(idcespite, LF_AMMMV) && + kill_cespite(idcespite, LF_AMMCE)) + return TRelation_application::remove(); + } + return TRUE; } bool TAnacespi::user_create() @@ -964,6 +967,6 @@ bool TAnacespi::user_destroy() int ce0500(int argc, char* argv[]) { TAnacespi a; - a.run(argc, argv, "Anagrafica cespiti"); + a.run(argc, argv, TR("Anagrafica cespiti")); return 0; } diff --git a/ce/ce0900.cpp b/ce/ce0900.cpp index 430bc3f17..97d3559c8 100755 --- a/ce/ce0900.cpp +++ b/ce/ce0900.cpp @@ -51,7 +51,7 @@ bool TConversione_ce_mask::on_field_event(TOperable_field& o, TField_event e, lo } if (e == fe_close) if (sheet().checked() == 0) - return error_box("Non sono state selezionate ditte da convertire"); + return error_box(TR("Non sono state selezionate ditte da convertire")); break; case F_DITTESELEZ: if (e == fe_init) @@ -102,8 +102,8 @@ void TConversione_ce_mask::lista_ditte(TAssoc_array& ditte) const TString16 codditta = sheet().row(i).get(1); bool add = TRUE; if (already_converted(atol(codditta))) - add = yesno_box("La ditta %s potrebbe già essere stata converita:\n" - "Si desidera continuare ugualmente, azzerando gli archivi attuali?", + add = yesno_box(FR("La ditta %s potrebbe già essere stata converita:\n" + "Si desidera continuare ugualmente, azzerando gli archivi attuali?"), (const char*)codditta); if (add) ditte.add(codditta); @@ -117,7 +117,7 @@ TConversione_ce_mask::TConversione_ce_mask() _rel = new TRelation(LF_NDITTE); _cur = new TCursor(_rel); _cur->set_filterfunction(esiste_ditta); - _sheet = new TCursor_sheet(_cur, " |CODDITTA|RAGSOC", "Selezione ditte", "@1|Codice|Ragione sociale@50", 0, 1); + _sheet = new TCursor_sheet(_cur, " |CODDITTA|RAGSOC", TR("Selezione ditte"), HR("@1|Codice|Ragione sociale@50"), 0, 1); _sheet->check(-1); } @@ -175,19 +175,19 @@ bool TConversione_cespiti::daconvertire(const long ditta) void TConversione_cespiti::main_loop() { TConversione_ce_mask msk; - if (msk.run() == K_ENTER && yesno_box("Confermare la conversione dei cespiti?")) + if (msk.run() == K_ENTER && yesno_box(TR("Confermare la conversione dei cespiti?"))) { msk.lista_ditte(_ditte); if (_ditte.items() == 0) { - warning_box("Nessuna ditta selezionata"); + warning_box(TR("Nessuna ditta selezionata")); return; } open_log(); TString80 s; write_log(""); write_log("**********************************"); - s.format("Conversione cespiti del %s", (const char *) TDate(TODAY).string()); + s.format(TR("Conversione cespiti del %s"), (const char *) TDate(TODAY).string()); write_log(s); write_log("**********************************"); write_log(""); @@ -269,7 +269,7 @@ void TConversione_cespiti::open_log() log << "ceconv.log"; _log = fopen(log,"w"); if (_log == NULL) - fatal_box("Non posso aprire il file di log della conversione(%s)", (const char *) log); + fatal_box(FR("Non posso aprire il file di log della conversione(%s)"), (const char *) log); } void TConversione_cespiti::write_log(const char * line) @@ -295,7 +295,7 @@ int TConversione_cespiti::conv_file(const TFilename& ofname, int nflogicnum) TLocalisamfile* newfile = NULL; const TRectype& oldrec = oldfile.curr(); TString s; - s.format("Conversione tabella %s", (const char*) ofname); + s.format(FR("Conversione tabella %s"), (const char*) ofname); TProgind pi(oldfile.eod(), s, FALSE, TRUE); TAssoc_array converted; @@ -328,7 +328,7 @@ int TConversione_cespiti::conv_file(const TFilename& ofname, int nflogicnum) } else { - s.format("La ditta %ld indicata nel file %s non é stata selezionata per la conversione", ditta, (const char*) ofname); + s.format(FR("La ditta %ld indicata nel file %s non é stata selezionata per la conversione"), ditta, (const char*) ofname); write_log(s); } } @@ -436,7 +436,7 @@ int TConversione_cespiti::conv_tab(const TFilename& ofname, const char* tab) const bool tabella_comune = (tab[0] == '%'); TString80 message; - message.format("Conversione tabella %s", (const char*)ofname); + message.format(FR("Conversione tabella %s"), (const char*)ofname); TProgind pi(oldfile.eod(), message, FALSE, TRUE); bool to_convert = TRUE; @@ -468,7 +468,7 @@ int TConversione_cespiti::conv_tab(const TFilename& ofname, const char* tab) else { TString256 s; - s.format("La ditta %ld indicata nel file %s non è stata selezionata per la conversione", ditta, (const char*)ofname); + s.format(FR("La ditta %ld indicata nel file %s non è stata selezionata per la conversione"), ditta, (const char*)ofname); write_log(s); continue; } @@ -686,7 +686,7 @@ int TConversione_cespiti::conv_inifile(const TFilename& ofname, const char* ofpa TRectype oldrec = oldfile.curr(); TRectype newrec = newfile->curr(); TString80 message; - message.format("Conversione tabella %s", (const char*) ofname); + message.format(FR("Conversione tabella %s"), (const char*) ofname); TProgind pi(oldfile.eod(),message, FALSE, TRUE, 10); for (int err = oldfile.first(); err == NOERR; err = oldfile.next()) { @@ -702,7 +702,7 @@ int TConversione_cespiti::conv_inifile(const TFilename& ofname, const char* ofpa else { TString256 s; - s.format("La ditta %ld indicata nel file %s non é stata selezionata per la conversione", ditta, (const char*) ofname); + s.format(FR("La ditta %ld indicata nel file %s non é stata selezionata per la conversione"), ditta, (const char*) ofname); write_log(s); continue; } @@ -744,7 +744,7 @@ int TConversione_cespiti::conv_inifile(const TFilename& ofname, const char* ofpa delete newfile; } else - error_box("Errore in compattamento dati.\nFile %d : %d", nflogicnum,err); + error_box(FR("Errore in compattamento dati.\nFile %d : %d"), nflogicnum,err); return 0; } @@ -761,7 +761,7 @@ int TConversione_cespiti::conv_par(const TFilename& ofname, const char* ofpar, i TString fieldname, fieldvalue; TRectype oldrec = oldfile.curr(); TString80 message; - message.format("Conversione tabella %s", (const char*) ofname); + message.format(FR("Conversione tabella %s"), (const char*) ofname); TProgind pi(oldfile.eod(),message, FALSE, TRUE); for (int err = oldfile.first(); err == NOERR; err = oldfile.next()) { @@ -783,7 +783,7 @@ int TConversione_cespiti::conv_par(const TFilename& ofname, const char* ofpar, i else { TString256 s; - s.format("La ditta %ld indicata nel file %s non é stata selezionata per la conversione", ditta, (const char*) ofname); + s.format(FR("La ditta %ld indicata nel file %s non é stata selezionata per la conversione"), ditta, (const char*) ofname); write_log(s); continue; } @@ -838,7 +838,7 @@ int TConversione_cespiti::get_codesc(const TDate& date, const bool fatal) if (esc <= 0) { TString s; - s << "La ditta " << get_firm() << " non ha un esercizio con data iniziale "; + s << TR("La ditta ") << get_firm() << TR(" non ha un esercizio con data iniziale "); s << date.string(); write_log(s); if (fatal) @@ -890,6 +890,6 @@ int TConversione_cespiti::zap_file(int lf) const int ce0900(int argc, char* argv[]) { TConversione_cespiti a ; - a.run(argc, argv, "Conversione cespiti"); + a.run(argc, argv, TR("Conversione cespiti")); return 0; } \ No newline at end of file diff --git a/ce/ce1100.cpp b/ce/ce1100.cpp index 9c87c9a41..9efdcb86f 100755 --- a/ce/ce1100.cpp +++ b/ce/ce1100.cpp @@ -46,23 +46,23 @@ void TQuery_mask::on_search_event(TOperable_field& o) TToken_string order, fields, header; if (o.dlg() >= F_SEARCH3) { - order.add(CESPI_STABILIM); header.add("Stabilimento"); - order.add(CESPI_REPARTO); header.add("Reparto@10"); + order.add(CESPI_STABILIM); header.add(TR("Stabilimento")); + order.add(CESPI_REPARTO); header.add(FR("Reparto@10")); } if (o.dlg() >= F_SEARCH2) { - order.add(CESPI_CODIMP); header.add("Impianto@10"); + order.add(CESPI_CODIMP); header.add(FR("Impianto@10")); } if (o.dlg() >= F_SEARCH1) { - order.add(CESPI_CODCAT); header.add("Cat"); - order.add(CESPI_DTCOMP); header.add("Data Acq.@10"); + order.add(CESPI_CODCAT); header.add(TR("Cat")); + order.add(CESPI_DTCOMP); header.add(FR("Data Acq.@10")); } - order.add(CESPI_IDCESPITE); header.add("Codice@10"); + order.add(CESPI_IDCESPITE); header.add(FR("Codice@10")); fields = order; - fields.add(CESPI_DESC); header.add("Descrizione@50"); + fields.add(CESPI_DESC); header.add(FR("Descrizione@50")); TRelation rel(LF_CESPI); @@ -80,7 +80,7 @@ void TQuery_mask::on_search_event(TOperable_field& o) } TSorted_cursor cur(&rel, order, filter); - TCursor_sheet sht(&cur, fields, "Cespiti", header, 0, 1); + TCursor_sheet sht(&cur, fields, TR("Cespiti"), header, 0, 1); if (sht.run() == K_ENTER) { TToken_string& row = sht.row(); @@ -111,9 +111,8 @@ int TQuery_mask::calcola_stato_attivita() bool TQuery_mask::cespite_ok() const { - TLocalisamfile cespi(LF_CESPI); - cespi.put(CESPI_IDCESPITE, get(F_IDCESPITE)); - bool ok = cespi.read() == NOERR; + const TRectype & cespi = cache().get(LF_CESPI, get(F_IDCESPITE)); + const bool ok = !cespi.empty(); return ok; } @@ -192,38 +191,37 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (e == fe_close) { if (!cespite_ok()) - return error_box("Inserire un cespite valido"); //controlla che esista il cespite + return error_box(TR("Inserire un cespite valido")); //controlla che esista il cespite if (stato_attivita() == 1) - warning_box("E' stato stampato il bollato dell'anno:\nnon sono permesse forzature"); //il bollato é stato stampato + warning_box(TR("E' stato stampato il bollato dell'anno:\nnon sono permesse forzature")); //il bollato é stato stampato - TLocalisamfile salce(LF_SALCE); // controlla che esista almeno un saldo - salce.put(SALCE_IDCESPITE, get(F_IDCESPITE)); - salce.put(SALCE_CODES, get(F_ESERCIZIO)); - salce.put(SALCE_TPSALDO, 1); - if (salce.read() != NOERR) - return error_box("Non esistono saldi per l'anno selezionato"); + TString key; + + key = get(F_IDCESPITE); + key << '|' << get(F_ESERCIZIO) << "|1"; + + const TRectype & salce = cache().get(LF_SALCE, key); + if (salce.empty()) + return error_box(TR("Non esistono saldi per l'anno selezionato")); - TLocalisamfile ammce(LF_AMMCE); // controlla che esista almeno un ammortamento (sennó che forzamo?) - ammce.put(AMMCE_IDCESPITE, get(F_IDCESPITE)); - ammce.put(AMMCE_CODES, get(F_ESERCIZIO)); - ammce.put(AMMCE_TPSALDO, 1); - ammce.put(AMMCE_TPAMM, 1); - if (ammce.read() != NOERR) - return error_box("Non esistono ammortamenti per l'anno selezionato"); + key << "|1"; + const TRectype &ammce = cache().get(LF_AMMCE, key); // controlla che esista almeno un ammortamento (sennó che forzamo?) + if (ammce.empty()) + return error_box(TR("Non esistono ammortamenti per l'anno selezionato")); TCespite ces (get(F_IDCESPITE)); // controlla che la categoria del cespite sia ammortizzabile const TRectype& categoria = ces.categoria(); bool non_ammortizzabile = categoria.get_bool("B0"); if (non_ammortizzabile) - return error_box("La categoria del cespite selezionato non é ammortizzabile"); + return error_box(TR("La categoria del cespite selezionato non é ammortizzabile")); calc_res(TRUE); // controllo dei residui fiscale e civilistico in ingresso (prec=TRUE) if (_residuof==ZERO) - return error_box("Impossibile forzare ammortamento perché non esiste residuo fiscale da ammortizzare per il cespite"); + return error_box(TR("Impossibile forzare ammortamento perché non esiste residuo fiscale da ammortizzare per il cespite")); if (_residuoc==ZERO) - return error_box("Impossibile forzare ammortamento perché non esiste residuo civilistico da ammortizzare per il cespite"); + return error_box(TR("Impossibile forzare ammortamento perché non esiste residuo civilistico da ammortizzare per il cespite")); } @@ -304,7 +302,7 @@ bool TForce_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) { real sumf = get_real(F_AMMNOR_F)+get_real(F_AMMACC_F)+get_real(F_AMMANT_F)+get_real(F_QUOTE_PERSE)+get_real(F_PRIVATO)+get_real(F_QUOTE_PRIV); if (sumf > _residuof_ini) - return error_box("Attenzione: l'ammortamento richiesto supera il residuo fiscale del cespite"); + return error_box(TR("Attenzione: l'ammortamento richiesto supera il residuo fiscale del cespite")); } break; case F_AMMNOR_C: // controlla che residuoc sia < della somma dei campi quota civilistici @@ -314,7 +312,7 @@ bool TForce_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) { real sumc = get_real(F_AMMNOR_C)+get_real(F_AMMACC_C)+get_real(F_AMMANT_C); if (sumc > _residuoc_ini) - return error_box("Attenzione: l'ammortamento richiesto supera il residuo civilistico del cespite"); + return error_box(TR("Attenzione: l'ammortamento richiesto supera il residuo civilistico del cespite")); } break; default: @@ -512,7 +510,7 @@ bool TForza_amm_cespi::user_destroy() int ce1100(int argc, char* argv[]) { TForza_amm_cespi a; - a.run(argc, argv, "Forzatura ammortamento su cespiti"); + a.run(argc, argv, TR("Forzatura ammortamento su cespiti")); return 0; } diff --git a/ce/ce1200.cpp b/ce/ce1200.cpp index 5b57e40cb..7110f9bce 100755 --- a/ce/ce1200.cpp +++ b/ce/ce1200.cpp @@ -42,7 +42,7 @@ public: real get_residuoc() const { return _residuoc; } real get_plusminusf() const { return _difff; } real get_plusminusc() const { return _diffc; } - void calc_res_mov(TCespite& ces, const TRectype& movce, TRectype& ammmv); + void calc_res_mov(TCespite& ces, const TRectype& movce, const TRectype& ammmv); TForce_mov_qmask(); }; @@ -80,19 +80,20 @@ int TForce_mov_qmask::calcola_ammo_eliminate() return _ammoelim; } -void TForce_mov_qmask::calc_res_mov(TCespite& ces, const TRectype& movce, TRectype& ammmv) +void TForce_mov_qmask::calc_res_mov(TCespite& ces, const TRectype& movce, const TRectype& ammmv) { // calcolo ammortamento sul cespite (per sit. fiscale(tpamm=1) o civilistica(tpamm=2)) const TDate dtmov = movce.get_date(MOVCE_DTMOV); const int tpamm = ammmv.get_int(AMMMV_TPAMM); ces.calc_amm(tpamm, dtmov); TLocalisamfile f_ammmv (LF_AMMMV); - ammmv.read(f_ammmv); //il record di movam si rilegge in versione aggiornata dal calc_amm + f_ammmv.curr() = ammmv; + f_ammmv.read(); //il record di movam si rilegge in versione aggiornata dal calc_amm const real impven = movce.get_real(MOVCE_IMPVEN); - real plus = ammmv.get_real(AMMMV_PLUS); + real plus = f_ammmv.curr().get_real(AMMMV_PLUS); if (plus == ZERO) - plus = - ammmv.get_real(AMMMV_MINUS); + plus = - f_ammmv.curr().get_real(AMMMV_MINUS); const real residuo = impven - plus; // determinazione del residuo fiscale @@ -119,7 +120,7 @@ bool TForce_mov_qmask::on_field_event(TOperable_field& o, TField_event e, long j calcola_stato_attivita(); calcola_ammo_eliminate(); if (_ammoelim != 1) - return error_box("Non previsti ammortamenti sulle parti eliminate"); + return error_box(TR("Non previsti ammortamenti sulle parti eliminate")); } break; @@ -141,9 +142,9 @@ bool TForce_mov_qmask::on_field_event(TOperable_field& o, TField_event e, long j if (e == fe_close) { if (stato_attivita() == 1) - warning_box("E' stato stampato il bollato dell'anno:\nnon sono permesse forzature"); + warning_box(TR("E' stato stampato il bollato dell'anno:\nnon sono permesse forzature")); if (ammo_eliminate() == 0) - warning_box("Non é previsto l'ammortamento sulle parti eliminate nell'esercizio selezionato"); + warning_box(TR("Non é previsto l'ammortamento sulle parti eliminate nell'esercizio selezionato")); } break; @@ -153,75 +154,78 @@ bool TForce_mov_qmask::on_field_event(TOperable_field& o, TField_event e, long j const TRectype& curr_movce = cache().get(LF_MOVCE, get(F_IDMOV)); //seleziona il cespite corrente in base al movimento const TString16 idcespite = curr_movce.get(MOVCE_IDCESPITE); //selezionato nella maschera (qsto x poter lasciare idcespite vuoto) - TLocalisamfile salce(LF_SALCE); // controlla che esista il saldo iniziale nell'anno selezionato - salce.put(SALCE_IDCESPITE, idcespite); - salce.put(SALCE_CODES, get(F_ESERCIZIO)); - salce.put(SALCE_TPSALDO, 1); - if (salce.read() != NOERR) - return error_box("Non esistono saldi per l'anno selezionato"); + TString key; + + key = idcespite; + key << '|' << get(F_ESERCIZIO) << "|1"; + + const TRectype & salce = cache().get(LF_SALCE, key); + if (salce.empty()) + return error_box(TR("Non esistono saldi per l'anno selezionato")); - TLocalisamfile ammce(LF_AMMCE); // controlla che esista l'ammortamento iniziale nell'anno selezionato - ammce.put(AMMCE_IDCESPITE, idcespite); - ammce.put(AMMCE_CODES, get(F_ESERCIZIO)); - ammce.put(AMMCE_TPSALDO, 1); - ammce.put(AMMCE_TPAMM, 1); - if (ammce.read() != NOERR) - return error_box("Non esistono ammortamenti per l'anno selezionato"); + key << "|1"; + const TRectype & ammce = cache().get(LF_AMMCE, key); // controlla che esista almeno un ammortamento (sennó che forzamo?) + if (ammce.empty()) + return error_box(TR("Non esistono ammortamenti per l'anno selezionato")); TCespite ces (idcespite); // controlla che la categoria del cespite sia ammortizzabile const TRectype& categoria = ces.categoria(); bool non_ammortizzabile = categoria.get_bool("B0"); if (non_ammortizzabile) - return error_box("Ammortamenti non effettuabili perché la categoria del cespite non é ammortizzabile"); + return error_box(TR("Ammortamenti non effettuabili perché la categoria del cespite non é ammortizzabile")); if (!curr_movce.empty()) { const TRectype& curr_tmc = cache().get("%TMC", curr_movce.get(MOVCE_CODMOV)); if (!curr_tmc.get_bool("B4")) // non ammessi ammortamenti sul tipomov selezionato - return error_box("Non sono ammessi ammortamenti su questo tipo movimento"); + return error_box(TR("Non sono ammessi ammortamenti su questo tipo movimento")); if (!curr_tmc.get_int("I0") == 1) // non ammessi ammortamenti su movimenti di rettifica - return error_box("Non sono ammessi ammortamenti sulle rettifiche"); + return error_box(TR("Non sono ammessi ammortamenti sulle rettifiche")); const TDate dtmov = curr_movce.get_date(MOVCE_DTMOV); // controlla che datamovimento sia inclusa nell'esercizio selezionato const TDate dataini = get(F_INIZIO_ES); const TDate datafine = get(F_FINE_ES); if ( dtmov < dataini || dtmov > datafine) - return error_box("Il movimento selezionato non é di competenza dell'esercizio selezionato"); + return error_box(TR("Il movimento selezionato non é di competenza dell'esercizio selezionato")); } - TLocalisamfile movam(LF_MOVAM); // controlla la consistenza dei movimenti fondi sui movimenti - movam.put(MOVAM_IDCESPITE, idcespite); - movam.put(MOVAM_IDMOV, get(F_IDMOV)); - movam.put(MOVAM_TPAMM, 1); - if (movam.read() != NOERR) - return error_box("Movimenti dei fondi fiscali incoerenti per il movimento selezionato"); - TRectype movam1 = movam.curr(); + key.format("%s|%s|1", (const char *) idcespite, (const char *) get(F_IDMOV)); + + { + const TRectype & movam = cache().get(LF_MOVAM, key); + if (movam.empty()) + return error_box(TR("Movimenti dei fondi fiscali incoerenti per il movimento selezionato")); + } - movam.put(MOVAM_IDCESPITE, idcespite); - movam.put(MOVAM_IDMOV, get(F_IDMOV)); - movam.put(MOVAM_TPAMM, 2); - if (movam.read() != NOERR) - return error_box("Movimenti dei fondi civilistici incoerenti per il movimento selezionato"); - TRectype movam2 = movam.curr(); + key.format("%s|%s|2", (const char *) idcespite, (const char *) get(F_IDMOV)); - TLocalisamfile ammmv(LF_AMMMV); // controlla la consistenza degli ammortamenti sui movimenti - ammmv.put(AMMMV_IDCESPITE, idcespite); - ammmv.put(AMMMV_IDMOV, get(F_IDMOV)); - ammmv.put(AMMMV_TPAMM, 1); - if (ammmv.read() != NOERR) - return error_box("Ammortamenti fiscali sui movimenti incoerenti per il movimento selezionato"); - calc_res_mov(ces, curr_movce, ammmv.curr()); //calcolo del residuo fiscale in uscita maschera di selezione - if (_residuof==ZERO) - return error_box("Impossibile forzare ammortamento perché non esiste residuo fiscale\nda ammortizzare per le parti eliminate del cespite"); + { + const TRectype & movam = cache().get(LF_MOVAM, key); + if (movam.empty()) + return error_box(TR("Movimenti dei fondi civilistici incoerenti per il movimento selezionato")); + } - ammmv.put(AMMMV_IDCESPITE, idcespite); - ammmv.put(AMMMV_IDMOV, get(F_IDMOV)); - ammmv.put(AMMMV_TPAMM, 2); - if (ammmv.read() != NOERR) - return error_box("Ammortamenti civilistici sui movimenti incoerenti per il movimento selezionato"); - calc_res_mov(ces, curr_movce, ammmv.curr()); //calcolo del residuo civilistico in uscita maschera di selezione - if (_residuoc==ZERO) - return error_box("Impossibile forzare ammortamento perché non esiste residuo civilistico\nda ammortizzare per le parti eliminate del cespite"); + key.format("%s|%s|1", (const char *) idcespite, (const char *) get(F_IDMOV)); + + { + const TRectype & ammmv = cache().get(LF_AMMMV, key); // controlla la consistenza degli ammortamenti sui movimenti + if (ammmv.empty()) + return error_box(TR("Ammortamenti fiscali sui movimenti incoerenti per il movimento selezionato")); + calc_res_mov(ces, curr_movce, ammmv); //calcolo del residuo fiscale in uscita maschera di selezione + if (_residuof==ZERO) + return error_box(TR("Impossibile forzare ammortamento perché non esiste residuo fiscale\nda ammortizzare per le parti eliminate del cespite")); + } + + key.format("%s|%s|2", (const char *) idcespite, (const char *) get(F_IDMOV)); + + { + const TRectype & ammmv = cache().get(LF_AMMMV, key); // controlla la consistenza degli ammortamenti sui movimenti + if (ammmv.empty()) + return error_box(TR("Ammortamenti civilistici sui movimenti incoerenti per il movimento selezionato")); + calc_res_mov(ces, curr_movce, ammmv); //calcolo del residuo civilistico in uscita maschera di selezione + if (_residuoc==ZERO) + return error_box(TR("Impossibile forzare ammortamento perché non esiste residuo civilistico\nda ammortizzare per le parti eliminate del cespite")); + } } break; @@ -295,7 +299,7 @@ bool TForce_mov_fmask::on_field_event(TOperable_field& o, TField_event e, long j real sumf = get_real(F_AMMNOR_F)+get_real(F_AMMACC_F)+get_real(F_AMMANT_F)+get_real(F_QUOTE_PERSE)+get_real(F_PRIVATO)+get_real(F_QUOTE_PRIV); real maxresf = get_real(F_RIS_AMMNOR_F)+get_real(F_RIS_AMMACC_F)+get_real(F_RIS_AMMANT_F)+get_real(F_RIS_QUOTE_PERSE)+get_real(F_RIS_PRIVATO)+get_real(F_RIS_QUOTE_PRIV)+get_real(F_RESIDUO_F); if (sumf > maxresf) - return error_box("Attenzione: l'ammortamento richiesto supera il residuo fiscale delle parti eliminate"); + return error_box(TR("Attenzione: l'ammortamento richiesto supera il residuo fiscale delle parti eliminate")); } break; @@ -307,7 +311,7 @@ bool TForce_mov_fmask::on_field_event(TOperable_field& o, TField_event e, long j real sumc = get_real(F_AMMNOR_C)+get_real(F_AMMACC_C)+get_real(F_AMMANT_C); real maxresc = get_real(F_RIS_AMMNOR_C)+get_real(F_RIS_AMMACC_C)+get_real(F_RIS_AMMANT_C)+get_real(F_RESIDUO_C); if (sumc > maxresc) - return error_box("Attenzione: l'ammortamento richiesto supera il residuo civilistico delle parti eliminate"); + return error_box(TR("Attenzione: l'ammortamento richiesto supera il residuo civilistico delle parti eliminate")); } break; default: @@ -528,6 +532,6 @@ bool TForza_amm_movce::user_destroy() int ce1200(int argc, char* argv[]) { TForza_amm_movce fm; - fm.run(argc, argv, "Forzatura ammortamento sui movimenti"); + fm.run(argc, argv, TR("Forzatura ammortamento sui movimenti")); return 0; } \ No newline at end of file diff --git a/ce/ce1300.cpp b/ce/ce1300.cpp index 343ecb80b..8a639fd81 100755 --- a/ce/ce1300.cpp +++ b/ce/ce1300.cpp @@ -79,23 +79,23 @@ void TSelam_qmask::on_search_event(TOperable_field& o) TToken_string order, fields, header; if (o.dlg() >= F_SEARCH3) { - order.add(CESPI_STABILIM); header.add("Stabilimento"); - order.add(CESPI_REPARTO); header.add("Reparto@10"); + order.add(CESPI_STABILIM); header.add(TR("Stabilimento")); + order.add(CESPI_REPARTO); header.add(FR("Reparto@10")); } if (o.dlg() >= F_SEARCH2) { - order.add(CESPI_CODIMP); header.add("Impianto@10"); + order.add(CESPI_CODIMP); header.add(FR("Impianto@10")); } if (o.dlg() >= F_SEARCH1) { - order.add(CESPI_CODCAT); header.add("Cat"); - order.add(CESPI_DTCOMP); header.add("Data Acq.@10"); + order.add(CESPI_CODCAT); header.add(TR("Cat")); + order.add(CESPI_DTCOMP); header.add(FR("Data Acq.@10")); } - order.add(CESPI_IDCESPITE); header.add("Codice@10"); + order.add(CESPI_IDCESPITE); header.add(FR("Codice@10")); fields = order; - fields.add(CESPI_DESC); header.add("Descrizione@50"); + fields.add(CESPI_DESC); header.add(FR("Descrizione@50")); TRelation rel(LF_CESPI); @@ -104,7 +104,7 @@ void TSelam_qmask::on_search_event(TOperable_field& o) filter << CESPI_CODIMP << "==" << get(F_IMPIANTO); TSorted_cursor cur(&rel, order, filter); - TCursor_sheet sht(&cur, fields, "Cespiti", header, 0, 1); + TCursor_sheet sht(&cur, fields, TR("Cespiti"), header, 0, 1); if (sht.run() == K_ENTER) { TToken_string& row = sht.row(); @@ -135,9 +135,8 @@ int TSelam_qmask::calcola_stato_attivita() bool TSelam_qmask::cespite_ok() const { - TLocalisamfile cespi(LF_CESPI); - cespi.put(CESPI_IDCESPITE, get(F_IDCESPITE)); - bool ok = cespi.read() == NOERR; + const TRectype & cespi = cache().get(LF_CESPI, get(F_IDCESPITE)); + const bool ok = !cespi.empty(); return ok; } @@ -188,15 +187,15 @@ bool TSelam_qmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (e == fe_close) { if (!cespite_ok()) - return error_box("Inserire un cespite valido"); //controlla che esista il cespite + return error_box(TR("Inserire un cespite valido")); //controlla che esista il cespite if (stato_attivita() == 1) - warning_box("E' stato stampato il bollato dell'anno:\nnon sono permesse modifiche"); //il bollato é stato stampato + warning_box(TR("E' stato stampato il bollato dell'anno:\nnon sono permesse modifiche")); //il bollato é stato stampato TCespite ces (get(F_IDCESPITE)); // controlla che la categoria del cespite sia ammortizzabile const TRectype& categoria = ces.categoria(); bool non_ammortizzabile = categoria.get_bool("B0"); if (non_ammortizzabile) - return error_box("Impossibile effettuare ammortamenti perché il cespite\nappartiene ad una categoria di beni non ammortizzabili"); + return error_box(TR("Impossibile effettuare ammortamenti perché il cespite\nappartiene ad una categoria di beni non ammortizzabili")); int materiale = categoria.get_int("I0"); app().set_tipo_beni(materiale); //inizializza la variabile tipo @@ -204,7 +203,7 @@ bool TSelam_qmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (materiale == 0) // controlla che il cespite non sia per caso in leasing { // solo i cespiti materiali possono essere in leasing.. if (ces.get_bool(CESPI_LEASING) == TRUE) - return error_box("Impossibile impostare le scelte per cespiti ceduti in leasing"); + return error_box(TR("Impossibile impostare le scelte per cespiti ceduti in leasing")); } const TDate& datafunz = ces.get_date("DTFUNZ"); // se la data di entrata in funzione non é nulla.... @@ -213,34 +212,35 @@ bool TSelam_qmask::on_field_event(TOperable_field& o, TField_event e, long jolly calc_res(TRUE); // controllo dei residui fiscale e civilistico in ingresso (prec=TRUE) if (_residuof==ZERO) { - message_box("Il valore fiscale del cespite risulta giá completamente ammortizzato"); + message_box(TR("Il valore fiscale del cespite risulta giá completamente ammortizzato")); return TRUE; } if (_residuoc==ZERO) { - message_box("Il valore civilistico del cespite risulta giá completamente ammortizzato"); + message_box(TR("Il valore civilistico del cespite risulta giá completamente ammortizzato")); return TRUE; } } - TLocalisamfile ammce(LF_AMMCE); // controlla eventuali forzature precedenti - ammce.put(AMMCE_IDCESPITE, get(F_IDCESPITE)); - ammce.put(AMMCE_CODES, get(F_ESERCIZIO)); - ammce.put(AMMCE_TPSALDO, 2); - ammce.put(AMMCE_TPAMM, 1); - if (ammce.read() == NOERR) - { - if (ammce.get_bool(AMMCE_FZPER) == TRUE) - return error_box("Sul cespite sono state forzate le Percentuali:\nprocedere dalla forzatura ammortamenti su cespite"); - if (ammce.get_bool(AMMCE_FZQUO) == TRUE) - return error_box("Sul cespite sono state forzate le Quote:\nprocedere dalla forzatura ammortamenti su cespite"); - } + TString key; + + key = get(F_IDCESPITE); + key << '|' << get(F_ESERCIZIO) << "|2|1"; + + const TRectype & ammce = cache().get(LF_AMMCE, key); + if (!ammce.empty()) + { + if (ammce.get_bool(AMMCE_FZPER) == TRUE) + return error_box(TR("Sul cespite sono state forzate le Percentuali:\nprocedere dalla forzatura ammortamenti su cespite")); + if (ammce.get_bool(AMMCE_FZQUO) == TRUE) + return error_box(TR("Sul cespite sono state forzate le Quote:\nprocedere dalla forzatura ammortamenti su cespite")); + } - TLocalisamfile salce(LF_SALCE); // controlla se ammesso ammortamento 100% per beni inferiori a 516.46 Euro - salce.put(SALCE_IDCESPITE, get(F_IDCESPITE)); - salce.put(SALCE_CODES, get(F_ESERCIZIO)); - salce.put(SALCE_TPSALDO, 1); + key = get(F_IDCESPITE); + key << '|' << get(F_ESERCIZIO) << "|1"; + const TRectype & salce = cache().get(LF_SALCE, key); // controlla se ammesso ammortamento 100% per beni inferiori a 516.46 Euro + _ammo100 = FALSE; _uniprice = 516.46; if (! salce.get_date(SALCE_DTSTBOLL).ok()) @@ -340,10 +340,10 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (get_bool(F_AMM100_CE) == FALSE) { if (test_min(F_AMMFISC_NOR_CE, F_NORMIN)) // controlla se si producono quote perse fiscali - warning_box("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" - "Se non si seleziona l'ammortamento ritardato verranno generate delle quote perse"); + warning_box(TR("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" + "Se non si seleziona l'ammortamento ritardato verranno generate delle quote perse")); if (test_max(F_AMMFISC_NOR_CE, F_AMMFISC_ANT_CE, F_AMMFISC_ACC_CE)) // controlla totale percentuali impostate fiscali - return error_box("Il totale delle percentuali di ammortamento fiscale supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento fiscale supera il 100%")); } } break; @@ -352,7 +352,7 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (e == fe_modify || e == fe_close) { if (test_max(F_AMMFISC_NOR_CE, F_AMMFISC_ANT_CE, F_AMMFISC_ACC_CE)) // controlla totale percentuali impostate fiscali - return error_box("Il totale delle percentuali di ammortamento fiscale supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento fiscale supera il 100%")); } break; @@ -360,10 +360,10 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (e == fe_modify || e == fe_close) { if (test_max(F_AMMFISC_NOR_CE, F_AMMFISC_ANT_CE, F_AMMFISC_ACC_CE)) // controlla totale percentuali impostate fiscali - return error_box("Il totale delle percentuali di ammortamento fiscale supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento fiscale supera il 100%")); if (!o.empty() && test_min(F_AMMFISC_NOR_CE, F_NORMAX)) - return error_box("E' necessario completare l'ammortamento normale fiscale prima di calcolare quello anticipato fiscale"); + return error_box(TR("E' necessario completare l'ammortamento normale fiscale prima di calcolare quello anticipato fiscale")); } break; @@ -371,7 +371,7 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (e == fe_modify || e == fe_close) { if (test_max(F_AMMCIV_NOR_CE, F_AMMCIV_ANT_CE, F_AMMCIV_ACC_CE)) // controlla totale percentuali impostate civilistiche - return error_box("Il totale delle percentuali di ammortamento civilistico supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento civilistico supera il 100%")); } break; @@ -379,10 +379,10 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (e == fe_modify || e == fe_close) { if (test_max(F_AMMCIV_NOR_CE, F_AMMCIV_ANT_CE, F_AMMCIV_ACC_CE)) // controlla totale percentuali impostate civilistiche - return error_box("Il totale delle percentuali di ammortamento civilistico supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento civilistico supera il 100%")); if (!o.empty() && test_min(F_AMMCIV_NOR_CE, F_NORMAX)) - return error_box("E' necessario completare l'ammortamento normale civilistico prima di calcolare quello anticipato civilistico"); + return error_box(TR("E' necessario completare l'ammortamento normale civilistico prima di calcolare quello anticipato civilistico")); } break; @@ -390,7 +390,7 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (e == fe_modify || e == fe_close) { if (test_max(F_AMMCIV_NOR_CE, F_AMMCIV_ANT_CE, F_AMMCIV_ACC_CE)) // controlla totale percentuali impostate civilistiche - return error_box("Il totale delle percentuali di ammortamento civilistico supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento civilistico supera il 100%")); } break; @@ -400,9 +400,9 @@ bool TSelam_mmask::on_field_event(TOperable_field& o, TField_event e, long jolly if (get_bool(F_AMMRIT_CE) == TRUE) { if ((get_real(F_AMMFISC_NOR_CE) >= get_real(F_NORMIN)) || (get_real(F_AMMCIV_NOR_CE) >= get_real(F_NORMIN))) - return error_box("Indicata la scelta di ammortamento ritardato ma il Normale supera il Minimo ministeriale"); + return error_box(TR("Indicata la scelta di ammortamento ritardato ma il Normale supera il Minimo ministeriale")); if (get_real(F_AMMFISC_ACC_CE) != 0 || get_real(F_AMMCIV_ACC_CE) != 0) - return error_box("Impossibile scegliere contemporaneamente ammortamento Accelerato e Ritardato"); + return error_box(TR("Impossibile scegliere contemporaneamente ammortamento Accelerato e Ritardato")); } } break; @@ -458,7 +458,7 @@ bool TSelam_imask::on_field_event(TOperable_field& o, TField_event e, long jolly { TCespite ces = get(F_IDCESPITE); if ( (ces.get_int(CESPI_VINCOLO) != 2) && ( (get(F_AMMFISC_CE) > get(F_ALIQMAX)) || (get(F_AMMCIV_CE) > get(F_ALIQMAX)) ) ) - return error_box("L' ammortamento richiesto supera il limite della categoria"); + return error_box(TR("L' ammortamento richiesto supera il limite della categoria")); } break; @@ -505,23 +505,23 @@ bool TSelam_pmask::on_field_event(TOperable_field& o, TField_event e, long jolly { real amm_fisc = o.get(); if (amm_fisc == ZERO) //controlla l'obbligatorietá e la validitá dei campi (fiscale) - return error_box("Compilare l'ammortamento scelto"); + return error_box(TR("Compilare l'ammortamento scelto")); else { if (amm_fisc < get_real(F_ALIQMIN)) - return error_box("L'ammortamento scelto é inferiore al minimo da Tabella"); + return error_box(TR("L'ammortamento scelto é inferiore al minimo da Tabella")); if (amm_fisc > get_real(F_ALIQMAX)) - return error_box("L'ammortamento scelto é superiore al minimo da Tabella"); + return error_box(TR("L'ammortamento scelto é superiore al minimo da Tabella")); } } } else { real anni_ammo = get_real(F_ANNIAMMOREQ); - if ((anni_ammo == 0) && ces.get_bool(CESPI_LEASING) == TRUE) - return error_box("Compilare gli anni ammortamento richiesti"); + if ((anni_ammo == ZERO) && ces.get_bool(CESPI_LEASING) == TRUE) + return error_box(TR("Compilare gli anni ammortamento richiesti")); else if (anni_ammo > get_int(F_ENTROANNI)) - return error_box("Il numero di anni di ammortamento scelti supera il limite da tabella"); + return error_box(TR("Il numero di anni di ammortamento scelti supera il limite da tabella")); } } break; @@ -613,20 +613,20 @@ void TSelect_ammoces::init_mask(TMask& m) const TString16 idcespite = m.get(F_IDCESPITE); const TCespite ces (idcespite); - TLocalisamfile catdi(LF_CATDI); //legge i valori dal file CATDI e li mette nei campi solo output delle msk - catdi.put(CATDI_CODES, m.get_int(F_ESERCIZIO)); - catdi.put(CATDI_CODCGRA, m.get_int(F_GRUPPO)); - catdi.put(CATDI_CODSPA, m.get(F_SPECIE)); - catdi.put(CATDI_CODCAT, m.get_int(F_CATEGORIA)); - if (catdi.read() != NOERR) - catdi.zero(); + TString key; + + key = m.get(F_ESERCIZIO); + key << '|' << m.get(F_GRUPPO) << '|'; + key << m.get(F_SPECIE) << '|'; + key << m.get(F_CATEGORIA); + + const TRectype & catdi = cache().get(LF_CATDI, key); //legge i valori dal file CATDI e li mette nei campi solo output delle msk const int annofunz = m.get_date(F_DTFUNZ).year(); //getta l'anno di entrata in funzione del cespite - TLocalisamfile salce1(LF_SALCE); - salce1.put(SALCE_IDCESPITE, m.get(F_IDCESPITE)); - salce1.put(SALCE_CODES, m.get_int(F_ESERCIZIO)); - salce1.put(SALCE_TPSALDO, 1); - + key = m.get(F_IDCESPITE); + key << '|' << m.get(F_ESERCIZIO) << "|1"; + const TRectype & salce1 = cache().get(LF_SALCE, key); + switch (_tipo) { case 1: //immateriali @@ -684,12 +684,12 @@ void TSelect_ammoces::init_mask(TMask& m) if (ces.get_int(CESPI_VINCOLO) == 3) //se il cespite é a quote costanti... { - if (salce1.read() == NOERR) + if (!salce1.empty()) { if (salce1.get_int(SALCE_ANNIAMM) != 0) //controlla la modificabilitá delle scelte dopo il primo anno { m.disable(DLG_SAVEREC); - error_box("Ammortamento in quote costanti:\nimpossibile modificare le scelte dopo il primo esercizio di ammortamento"); + error_box(TR("Ammortamento in quote costanti:\nimpossibile modificare le scelte dopo il primo esercizio di ammortamento")); } else { @@ -703,7 +703,7 @@ void TSelect_ammoces::init_mask(TMask& m) if (m.get_int(F_ENTROANNI) <= m.get_int(F_NUMESERAMM)) { m.disable(DLG_SAVEREC); - error_box("Impossibile proseguire:\nammortamento oltre il limite di anni della Tabella"); + error_box(TR("Impossibile proseguire:\nammortamento oltre il limite di anni della Tabella")); } } break; @@ -712,7 +712,7 @@ void TSelect_ammoces::init_mask(TMask& m) { _aliqmax = ces.get_real(CESPI_PMAT); // calcola i valori predefiniti delle aliquote limite per cespiti materiali _aliqmin = _aliqmax * 0.5; - if (salce1.read() == NOERR) + if (!salce1.empty()) { if (ces.get_bool(CESPI_USATO) == FALSE) { @@ -784,7 +784,7 @@ void TSelect_ammoces::init_modify_mode(TMask& m) int ce1300(int argc, char* argv[]) { TSelect_ammoces a; - a.run(argc, argv, "Scelta ammortamento per cespite"); + a.run(argc, argv, TR("Scelta ammortamento per cespite")); return 0; } diff --git a/ce/ce1301c.uml b/ce/ce1301c.uml index b0e0b54ac..fdd2f75e1 100755 --- a/ce/ce1301c.uml +++ b/ce/ce1301c.uml @@ -253,14 +253,7 @@ END NUMBER F_ANNIAMMOREQ 8 BEGIN PROMPT 65 20 "" - FIELD ANNIRIC - GROUP 1 -END - -NUMBER F_ANNIAMMOREQ2 8 -BEGIN - PROMPT 65 20 "" - FIELD 69@->ANNIRIC + FIELD 139->ANNIRIC GROUP 1 END diff --git a/ce/ce1400.cpp b/ce/ce1400.cpp index bd2a5bd68..7f969e365 100755 --- a/ce/ce1400.cpp +++ b/ce/ce1400.cpp @@ -96,7 +96,7 @@ bool TSac_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) set(o.dlg() == F_CATEGORIA ? F_DESC_CAT : F_DESC_CAT2, cac.get("S0")); if (cac.get_bool("B0")) - return error_box("Categoria non ammortizzabile"); + return error_box(TR("Categoria non ammortizzabile")); const int tb = cac.get_int("I0"); app().set_tipo_beni(tb); @@ -106,16 +106,16 @@ bool TSac_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) { const bool amm_per_anni = cac.get_int("I1") <= 1; if (amm_per_anni) - return error_box("La categoria prevede un ammortamento per anni:\n" - "Effettuare le scelte sul cespite"); + return error_box(TR("La categoria prevede un ammortamento per anni:\n" + "Effettuare le scelte sul cespite")); } break; case 2: // Costi pluriennali { const int vincolo = cac.get_int("I2"); if (vincolo == 3) // Quote - return error_box("La categoria prevede un ammortamento per quote costanti:\n" - "Effettuare le scelte sul cespite"); + return error_box(TR("La categoria prevede un ammortamento per quote costanti:\n" + "Effettuare le scelte sul cespite")); } break; default: @@ -123,7 +123,7 @@ bool TSac_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) } } if (!ok && !o.empty() && o.dlg() == F_CATEGORIA2) - return error_box("E' neccessario specificare una categoria valida"); + return error_box(TR("E' neccessario specificare una categoria valida")); if (ok && e == fe_button && o.dlg() == F_CATEGORIA) send_key(K_ENTER, 0); } @@ -209,57 +209,57 @@ bool TMat_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) if (e == fe_modify || e == fe_close) { if (test_min(F_NORFIS_87, F_MIN_87)) - warning_box("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" - "Se non si seleziona l'ammortamento ritardato verrano generate delle quote perse"); + warning_box(TR("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" + "Se non si seleziona l'ammortamento ritardato verrano generate delle quote perse")); if (test_max(F_NORFIS_87, F_ANTFIS_87, F_ACCFIS)) - return error_box("Il totale delle percentuali di ammortamento supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento supera il 100%")); if (test_rit(F_NORFIS_87, F_MIN_87)) - return error_box("In caso di ammortamento ritardato si deve specificare una quota inferiore al minimo ministeriale"); + return error_box(TR("In caso di ammortamento ritardato si deve specificare una quota inferiore al minimo ministeriale")); } break; case F_NORFIS_88: if (e == fe_modify || e == fe_close) { if (test_min(F_NORFIS_88, F_MIN_88)) - warning_box("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" - "Se non si seleziona l'ammortamento ritardato verrano generate delle quote perse"); + warning_box(TR("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" + "Se non si seleziona l'ammortamento ritardato verrano generate delle quote perse")); if (test_max(F_NORFIS_88, F_ANTFIS_88, F_ACCFIS)) - return error_box("Il totale delle percentuali di ammortamento supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento supera il 100%")); if (test_rit(F_NORFIS_88, F_MIN_88)) - return error_box("In caso di ammortamento ritardato si deve specificare una quota inferiore al minimo ministeriale"); + return error_box(TR("In caso di ammortamento ritardato si deve specificare una quota inferiore al minimo ministeriale")); } break; case F_NORFIS_89: if (e == fe_modify || e == fe_close) { if (test_min(F_NORFIS_89, F_MIN_89)) - warning_box("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" - "Se non si seleziona l'ammortamento ritardato verrano generate delle quote perse"); + warning_box(TR("L'ammortamento normale è inferiore al minimo della tabella ministeriale:\n" + "Se non si seleziona l'ammortamento ritardato verrano generate delle quote perse")); if (test_max(F_NORFIS_89, F_ANTFIS_89, F_ACCFIS)) - return error_box("Il totale delle percentuali di ammortamento supera il 100%"); + return error_box(TR("Il totale delle percentuali di ammortamento supera il 100%")); if (test_rit(F_NORFIS_89, F_MIN_89)) - return error_box("In caso di ammortamento ritardato si deve specificare una quota inferiore al minimo ministeriale"); + return error_box(TR("In caso di ammortamento ritardato si deve specificare una quota inferiore al minimo ministeriale")); } break; case F_ANTFIS_87: if (e == fe_modify || e == fe_close) { if (!o.empty() && !is_max(F_NORFIS_87, F_MAX_87)) - return error_box("E' necessario completare l'ammortamento normale prima di calcolare quello anticipato"); + return error_box(TR("E' necessario completare l'ammortamento normale prima di calcolare quello anticipato")); } break; case F_ANTFIS_88: if (e == fe_modify || e == fe_close) { if (!o.empty() && !is_max(F_NORFIS_88, F_MAX_88)) - return error_box("E' necessario completare l'ammortamento normale prima di calcolare quello anticipato"); + return error_box(TR("E' necessario completare l'ammortamento normale prima di calcolare quello anticipato")); } break; case F_ANTFIS_89: if (e == fe_modify || e == fe_close) { if (!o.empty() && !is_max(F_NORFIS_89, F_MAX_89)) - return error_box("E' necessario completare l'ammortamento normale prima di calcolare quello anticipato"); + return error_box(TR("E' necessario completare l'ammortamento normale prima di calcolare quello anticipato")); } break; default: @@ -470,6 +470,6 @@ void TScelta_amm_cat::init_modify_mode(TMask& m) int ce1400(int argc, char* argv[]) { TScelta_amm_cat sac; - sac.run(argc, argv, "Scelta ammortamento per categoria"); + sac.run(argc, argv, TR("Scelta ammortamento per categoria")); return 0; } diff --git a/ce/ce3200.cpp b/ce/ce3200.cpp index 21d4afd8f..c2864ae68 100755 --- a/ce/ce3200.cpp +++ b/ce/ce3200.cpp @@ -76,7 +76,7 @@ bool TStampastorico_mask::on_field_event(TOperable_field& o, TField_event e, lon if (e == fe_close) { if (!get_bool(F_SITFISC) && !get_bool(F_SITCIV) && !get_bool(F_SITGEST)) - return error_box("Selezionare almeno una delle Situazioni da stampare"); + return error_box(TR("Selezionare almeno una delle Situazioni da stampare")); } break; default: break; @@ -139,13 +139,13 @@ void TStampa_storico::print_header( const int tipo ) switch(tipo) //in base al(ai) tipo(i) di situazione cambia una riga dell'header { case 1: - _form->find_field('H', odd_page, FF_SITUAZIONE).set("fiscale"); + _form->find_field('H', odd_page, FF_SITUAZIONE).set(TR("fiscale")); break; case 2: - _form->find_field('H', odd_page, FF_SITUAZIONE).set("civilistica"); + _form->find_field('H', odd_page, FF_SITUAZIONE).set(TR("civilistica")); break; case 3: - _form->find_field('H', odd_page, FF_SITUAZIONE).set("gestionale"); + _form->find_field('H', odd_page, FF_SITUAZIONE).set(TR("gestionale")); break; } _form->set_testata(); @@ -170,7 +170,7 @@ void TStampa_storico::stampa_rigauno( bool errore) if ((datasaldo >= dtcomp && numele > 0) || (datasaldo == dtcomp && numele == 0)) //datasaldo >= data acquisto { section1.find_field(FF_DATAUNO).set(datasaldo); - section1.find_field(FF_DESCRUNO).set("Ripresa saldi"); + section1.find_field(FF_DESCRUNO).set(TR("Ripresa saldi")); section1.find_field(FF_NUMELEUNO).set(_form->cursor()->curr(LF_SALCE).get("NUMELE")); real sum = recsalce.get_real("CSTO"); sum -= recsalce.get_real("VNONAMM"); @@ -189,7 +189,7 @@ void TStampa_storico::stampa_rigauno( bool errore) } else // se datasaldo < data acquisto sono sbagliate le date { - section1.find_field(FF_DESCRUNO).set("Date non congruenti sui saldi iniziali"); + section1.find_field(FF_DESCRUNO).set(TR("Date non congruenti sui saldi iniziali")); errore = TRUE; } @@ -591,6 +591,6 @@ void TStampa_storico::main_loop() int ce3200(int argc, char* argv[]) { TStampa_storico a; - a.run(argc,argv,"Stampa schede cespiti"); + a.run(argc,argv,TR("Stampa schede cespiti")); return 0; } \ No newline at end of file diff --git a/ce/ce3300.cpp b/ce/ce3300.cpp index 367c3b9e6..052f7698a 100755 --- a/ce/ce3300.cpp +++ b/ce/ce3300.cpp @@ -76,7 +76,7 @@ bool TStampaprospetto_mask::on_field_event(TOperable_field& o, TField_event e, l if (e == fe_close) { if (!get_bool(F_SITFISC) && !get_bool(F_SITCIV) && !get_bool(F_SITGEST)) //deve essere selezionata almeno 1 situaz. - return error_box("Selezionare almeno una delle Situazioni da stampare"); + return error_box(TR("Selezionare almeno una delle Situazioni da stampare")); } break; default: break; @@ -204,26 +204,26 @@ void TStampa_prospetto::set_intestazione( const int tipo, const int ordinamento) // in base all'ordinamento (per categoria o per impianto) scrive la riga con codice e descrizione if (ordinamento == 0) { - _form->find_field('H', first_page, FR_INT_COD).set("@bCat.@r"); - _form->find_field('H', first_page, FR_INT_DESC).set("@bDescrizione categoria@r"); + _form->find_field('H', first_page, FR_INT_COD).set(FR("@bCat.@r")); + _form->find_field('H', first_page, FR_INT_DESC).set(FR("@bDescrizione categoria@r")); } else { - _form->find_field('H', first_page, FR_INT_COD).set("Imp."); - _form->find_field('H', first_page, FR_INT_DESC).set(" Descr. impianto"); + _form->find_field('H', first_page, FR_INT_COD).set(TR("Imp.")); + _form->find_field('H', first_page, FR_INT_DESC).set(TR(" Descr. impianto")); } //in base al(ai) tipo(i) di situazione cambia una riga dell'header switch(tipo) { case 1: - _form->find_field('H', first_page, FR_SITUAZIONE).set("fiscale"); + _form->find_field('H', first_page, FR_SITUAZIONE).set(TR("fiscale")); break; case 2: - _form->find_field('H', first_page, FR_SITUAZIONE).set("civilistica"); + _form->find_field('H', first_page, FR_SITUAZIONE).set(TR("civilistica")); break; case 3: - _form->find_field('H', first_page, FR_SITUAZIONE).set("gestionale"); + _form->find_field('H', first_page, FR_SITUAZIONE).set(TR("gestionale")); break; } _form->set_testata(); @@ -268,12 +268,12 @@ void TStampa_prospetto::stampa_totali_tipo(TTipo_cespite tcesp) { // scrive il tipo di cespiti di cui calcola il totale set_field(FR_TC_CAT,""); - TString80 tipodescr = "TOTALI BENI "; + TString80 tipodescr = TR("TOTALI BENI "); switch (tcesp) { - case tc_pluriennale: tipodescr << "PLURIENNALI"; break; - case tc_immateriale: tipodescr << "IMMATERIALI"; break; - default: tipodescr << "MATERIALI"; break; + case tc_pluriennale: tipodescr << TR("PLURIENNALI"); break; + case tc_immateriale: tipodescr << TR("IMMATERIALI"); break; + default: tipodescr << TR("MATERIALI"); break; } set_field(FR_TC_D_CAT,tipodescr); @@ -288,7 +288,7 @@ void TStampa_prospetto::stampa_totali_generali() { // scrive TOTALI GENERALI set_field(FR_TC_CAT,""); - set_field(FR_TC_D_CAT,"TOTALI GENERALI"); + set_field(FR_TC_D_CAT,TR("TOTALI GENERALI")); // riempie il body con i totali generali per situazione selezionata fill_body(_gen); @@ -588,6 +588,6 @@ void TStampa_prospetto::main_loop() int ce3300(int argc, char* argv[]) { TStampa_prospetto a; - a.run(argc,argv,"Stampa prospetto cespiti"); + a.run(argc,argv,TR("Stampa prospetto cespiti")); return 0; } \ No newline at end of file diff --git a/ce/ce3400.cpp b/ce/ce3400.cpp index bc19f613f..11d280057 100755 --- a/ce/ce3400.cpp +++ b/ce/ce3400.cpp @@ -240,7 +240,7 @@ void TPR_app::print_categoria(const TString& codtab) { TPrint_section& header = _form->categoria(); - header.find_field(F_CODTAB).set_prompt(_order == 1 ? "@bCategoria@r " : "@bImpianto@r "); + header.find_field(F_CODTAB).set_prompt(_order == 1 ? FR("@bCategoria@r ") : TR("@bImpianto@r ")); header.find_field(F_CODTAB).set(codtab); TString80 descr; if (_order == 1) @@ -268,7 +268,7 @@ void TPR_app::print_cespite(const TRectype& cespi, const TRectype& salini) TTotalizer tot; tot.add_rec(salini); - print_total(tot, "@bSaldi@r"); + print_total(tot, FR("@bSaldi@r")); _tot_grp += tot; } @@ -309,7 +309,7 @@ void TPR_app::print_movimenti(const TRectype& salini) tot.add_rec(movsem, segno); } } - print_total(tot, "@bRivalutazioni nell'esercizio@r"); + print_total(tot, FR("@bRivalutazioni nell'esercizio@r")); totces += tot; _tot_grp += tot; } @@ -335,7 +335,7 @@ void TPR_app::print_total(TTotalizer& tot, const char* prompt) if (prompt == NULL) { _form->print_separator(); - prompt = _order == 1 ? "@bTotale categoria@r " : "@bTotale impianto@r "; + prompt = _order == 1 ? FR("@bTotale categoria@r ") : FR("@bTotale impianto@r "); } TPrint_section& body = _form->totale(); @@ -459,7 +459,7 @@ void TPR_app::main_loop() print_total(_tot_grp); _tot_gen += _tot_grp; _form->print_separator(); - print_total(_tot_gen, "@bTOTALE GENERALE@r"); + print_total(_tot_gen, FR("@bTOTALE GENERALE@r")); printer().formfeed(); } @@ -471,6 +471,6 @@ void TPR_app::main_loop() int ce3400(int argc, char* argv[]) { TPR_app app; - app.run(argc, argv, "Prospetto rivalutazioni"); + app.run(argc, argv, TR("Prospetto rivalutazioni")); return 0; } diff --git a/ce/ce3500.cpp b/ce/ce3500.cpp index ac1835baa..6e3ef52c7 100755 --- a/ce/ce3500.cpp +++ b/ce/ce3500.cpp @@ -46,9 +46,9 @@ const TString& TLC_form::decode_group(const char* codtab, int mode) const int order = mode > 0 ? mode : _order; _str = "@b"; if (mode > 0) // Riga - _str << "@r" << (order==1 ? "Cat." : "Imp.") << codtab << ' '; + _str << "@r" << (order==1 ? TR("Cat.") : TR("Imp.")) << codtab << ' '; else // Testata - _str << (order==1 ? "Categoria" : "Impianto") << "@r " << codtab << ' '; + _str << (order==1 ? TR("Categoria") : TR("Impianto")) << "@r " << codtab << ' '; if (order == 1) { @@ -90,17 +90,17 @@ bool TLC_form::validate(TForm_item& fld, TToken_string& val) bool yes = cespi.get_bool(CESPI_VEIDIP); if (!yes) yes = cespi.get_int(CESPI_USOPROM) > 1; - fld.set(yes ? "Si" : "No"); + fld.set(yes ? TR("Si") : TR("No")); return TRUE; } if (stricmp(cmd, "_TPSPEMAN") == 0) { switch(cespi.get_int(CESPI_TPSPEMAN)) { - case 2: fld.set("Incluso 5%"); break; - case 3: fld.set("Incluso 24%"); break; - case 4: fld.set("Art.14 L.449/97"); break; - default: fld.set("Escluso"); break; + case 2: fld.set(TR("Incluso 5%")); break; + case 3: fld.set(TR("Incluso 24%")); break; + case 4: fld.set(TR("Art.14 L.449/97")); break; + default: fld.set(TR("Escluso")); break; } return TRUE; } @@ -297,6 +297,6 @@ void TLC_app::main_loop() int ce3500(int argc, char* argv[]) { TLC_app app; - app.run(argc, argv, "Lista Cespiti"); + app.run(argc, argv, TR("Lista Cespiti")); return 0; } diff --git a/ce/ce3600.cpp b/ce/ce3600.cpp index 1aa7290f8..8e4b41e4e 100755 --- a/ce/ce3600.cpp +++ b/ce/ce3600.cpp @@ -185,6 +185,6 @@ void TLM_app::main_loop() int ce3600(int argc, char* argv[]) { TLM_app app; - app.run(argc, argv, "Lista Movimenti"); + app.run(argc, argv, TR("Lista Movimenti")); return 0; } diff --git a/ce/ce3700.cpp b/ce/ce3700.cpp index e95e62e6b..2c76e2511 100755 --- a/ce/ce3700.cpp +++ b/ce/ce3700.cpp @@ -63,7 +63,7 @@ bool TECUP_mask::on_field_event(TOperable_field& f, TField_event e, long jolly) if (get_bool(F_USOPROM1+up)) break; if (up < 0) - return error_box("E' necessario specificare almeno una percentuale di deducibilità"); + return error_box(TR("E' necessario specificare almeno una percentuale di deducibilità")); } break; default: break; @@ -144,6 +144,6 @@ void TECUP_app::main_loop() int ce3700(int argc, char* argv[]) { TECUP_app app; - app.run(argc, argv, "Cespiti uso promisquo"); + app.run(argc, argv, TR("Cespiti uso promisquo")); return 0; } diff --git a/ce/ce3800.cpp b/ce/ce3800.cpp index 9c554bd00..aee087fd2 100755 --- a/ce/ce3800.cpp +++ b/ce/ce3800.cpp @@ -53,7 +53,7 @@ const TString& TECFE_form::decode_group(const char* codtab, int mode) { const int order = mode > 0 ? mode : _order; _str = "@b"; - _str << (order==1 ? "Categoria" : "Impianto") << "@r " << codtab << ' '; + _str << (order==1 ? TR("Categoria") : TR("Impianto")) << "@r " << codtab << ' '; if (order == 1) { const TRectype& cat = ditta_cespiti().categoria(0, NULL, atoi(codtab)); @@ -171,7 +171,7 @@ bool TECFE_app::elenco_filter(const TRelation* rel) void TECFE_app::main_loop() { TECFE_mask m; - m.set_caption("Elenco fine esercizio"); + m.set_caption(TR("Elenco fine esercizio")); ditta_cespiti().init_mask(m); while (m.run() != K_QUIT) @@ -269,6 +269,6 @@ void TECFE_app::main_loop() int ce3800(int argc, char* argv[]) { TECFE_app app; - app.run(argc, argv, "Elenco fine esercizio"); + app.run(argc, argv, TR("Elenco fine esercizio")); return 0; } diff --git a/ce/ceeur.cpp b/ce/ceeur.cpp index d01d2ef1a..d9212371a 100755 --- a/ce/ceeur.cpp +++ b/ce/ceeur.cpp @@ -146,7 +146,7 @@ bool TEuro_app::goto_euro(long ditta) prefix().set_codditta(ditta); } if (!ok) - error_box("Impossibile utilizzare lo studio in euro '%s'", (const char*)eur); + error_box(FR("Impossibile utilizzare lo studio in euro '%s'"), (const char*)eur); return ok; } @@ -167,7 +167,7 @@ bool TEuro_app::goto_lire(long ditta) prefix().set_codditta(ditta); } if (!ok) - error_box("Impossibile utilizzare lo studio in lire '%s'", (const char*)lit); + error_box(FR("Impossibile utilizzare lo studio in lire '%s'"), (const char*)lit); return ok; } @@ -221,7 +221,7 @@ bool TEuro_app::copy_dir(const char* src, const char* dst) const list_files(file1, files); TString str; - str << "Copia da " << src << " a " << dst << "..."; + str << TR("Copia da ") << src << TR(" a ") << dst << "..."; TProgind pi(files.items(), str, FALSE, TRUE); FOR_EACH_ARRAY_ROW(files, i, file) { @@ -281,7 +281,7 @@ void TEuro_app::convert_file(int lf, const char* cnv, const char* res, record_ha TRectype& receur = fileur.curr(); TString str; - str << "Conversione " << rel.lfile().description() << " ..."; + str << TR("Conversione ") << rel.lfile().description() << " ..."; TToken_string conv(cnv); TToken_string azze(res); diff --git a/ce/ceeur01.cpp b/ce/ceeur01.cpp index 0819a3453..9bad10a04 100755 --- a/ce/ceeur01.cpp +++ b/ce/ceeur01.cpp @@ -233,7 +233,7 @@ KEY TEuro01_app::convert_firm(long ditta) KEY k = m.run(); if (k == K_ENTER) { - if (already_present && !yesno_box("Si conferma la sovrascrittura dei cespiti della ditta %ld in Euro?", ditta)) + if (already_present && !yesno_box(FR("Si conferma la sovrascrittura dei cespiti della ditta %ld in Euro?"), ditta)) return K_ESC; do_copy = m.get_bool(F11_COPY); @@ -415,7 +415,7 @@ bool TEuro01_app::create() { TFilename lit, eur; if (!app().get_aree_dati(lit, eur)) - return error_box("Non esiste lo studio in Euro di destinazione"); + return error_box(TR("Non esiste lo studio in Euro di destinazione")); return TEuro_app::create(); } @@ -435,7 +435,7 @@ void TEuro01_app::main_loop() int ceeur01(int argc, char* argv[]) { TEuro01_app ma; - ma.run(argc, argv, "Conversione Cespiti Euro"); + ma.run(argc, argv, TR("Conversione Cespiti Euro")); return 0; } diff --git a/ce/ceeur02.cpp b/ce/ceeur02.cpp index 4207e747b..8b8122a08 100755 --- a/ce/ceeur02.cpp +++ b/ce/ceeur02.cpp @@ -126,7 +126,7 @@ real TEuro02_app::fondo(const TRelation& rel, int tipo_sit) const void TEuro02_app::print_arr(int tipo_sit) const { - TViswin vw(NULL, "Controllo arrotondamenti", FALSE, TRUE, FALSE, 0, 0, 0, 0, FALSE); + TViswin vw(NULL, TR("Controllo arrotondamenti"), FALSE, TRUE, FALSE, 0, 0, 0, 0, FALSE); vw.maximize(); vw.open_modal(); @@ -171,21 +171,21 @@ void TEuro02_app::print_arr(int tipo_sit) const if (err <= -0.01 || err >= 0.01) { TString str; - str << "Cespite " << idcespite << " - " << cespi.get(CESPI_DESC); - str << " - Situazione "; + str << TR("Cespite ") << idcespite << " - " << cespi.get(CESPI_DESC); + str << TR(" - Situazione "); switch (tipo_sit) { - case 2: str << "Civilistica"; break; - case 3: str << "Gestionale"; break; - default: str << "Fiscale"; break; + case 2: str << TR("Civilistica"); break; + case 3: str << TR("Gestionale"); break; + default: str << TR("Fiscale"); break; } vw.add_line(str); str.cut(0); - str << "Residuo in Lire " << residuo_lit.string("."); - str << " - Residuo in Euro " << residuo_eur.string(".2"); + str << TR("Residuo in Lire ") << residuo_lit.string("."); + str << TR(" - Residuo in Euro ") << residuo_eur.string(".2"); vw.add_line(str); str.cut(0); - str << "Errore di arrotondamento in Euro " << err.string(".2"); + str << TR("Errore di arrotondamento in Euro ") << err.string(".2"); vw.add_line(str); str.cut(0); vw.add_line(str); @@ -212,7 +212,7 @@ void TEuro02_app::main_loop() int ceeur02(int argc, char* argv[]) { TEuro02_app aa; - aa.run(argc, argv, "Controllo arrotondamenti"); + aa.run(argc, argv, TR("Controllo arrotondamenti")); return 0; } diff --git a/ce/celib.cpp b/ce/celib.cpp index 098ac29cc..522d7ed95 100755 --- a/ce/celib.cpp +++ b/ce/celib.cpp @@ -1,6 +1,7 @@ #include #include #include +#include #include "celib.h" @@ -266,7 +267,7 @@ bool TDitta_cespiti::on_category_event(TOperable_field& o, TField_event e, long if (e == fe_button) { const char* fields = by_code ? "CODTAB[7,8]|S0|I0" : "S0|CODTAB[7,8]|I0"; - const char* header = by_code ? "Categoria|Descrizione@60|Tipo beni" : "Descrizione@60|Categoria|Tipo beni"; + 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"; TRelation rel("%CAC"); @@ -289,7 +290,7 @@ bool TDitta_cespiti::on_category_event(TOperable_field& o, TField_event e, long rec.put("S0", fld.get()); recno = cur.read(); } - TCursor_sheet sht(&cur, fields, "Categorie dei cespiti", header, 0, 1); + TCursor_sheet sht(&cur, fields, TR("Categorie dei cespiti"), header, 0, 1); sht.select(recno); if (sht.run() == K_ENTER) { diff --git a/ce/cetbcce.uml b/ce/cetbcce.uml index ea16b6187..b4df0c1c9 100755 --- a/ce/cetbcce.uml +++ b/ce/cetbcce.uml @@ -134,4 +134,6 @@ BEGIN PROMPT 41 15 "Coefficiente di durata " FLAGS "DG" FIELD S5 +END +ENDPAGE END \ No newline at end of file diff --git a/ce/cetbtmc.uml b/ce/cetbtmc.uml index 93cad7c7b..ed11b01bc 100755 --- a/ce/cetbtmc.uml +++ b/ce/cetbtmc.uml @@ -265,3 +265,5 @@ BEGIN ITEM "O|Obbl" FIELD S5[13,13] END +ENDPAGE +END \ No newline at end of file diff --git a/ce/columnst.cpp b/ce/columnst.cpp deleted file mode 100755 index d4be48116..000000000 --- a/ce/columnst.cpp +++ /dev/null @@ -1,152 +0,0 @@ -// sqlcols.cpp: implementation of the CColumns class -// -// This is a part of the Microsoft Foundation Classes C++ library. -// Copyright (C) 1992-1993 Microsoft Corporation -// All rights reserved. -// -// This source code is only intended as a supplement to the -// Microsoft Foundation Classes Reference and Microsoft -// QuickHelp and/or WinHelp documentation provided with the library. -// See these sources for detailed information regarding the -// Microsoft Foundation Classes product. - - -#include "stdafx.h" -#include "columnst.h" - -///////////////////////////////////////////////////////////////////////////// -// CColumns implementation - -// IMPLEMENT_DYNAMIC(CColumns, CRecordset) - -CColumns::CColumns(CDatabase* pDatabase) - : CRecordset(pDatabase) -{ - //{{AFX_FIELD_INIT(CColumns) - m_strQualifier = ""; - m_strOwner = ""; - m_strTableName = ""; - m_strColumnName = ""; - m_nDataType = 0; - m_strTypeName = ""; - m_lPrecision = 0; - m_lLength = 0; - m_nScale = 0; - m_nRadix = 0; - m_nFields = 11; - //}}AFX_FIELD_INIT - m_strQualifierParam = ""; - m_strOwnerParam = ""; - m_strTableNameParam = ""; - m_strColumnNameParam = ""; -} - -BOOL CColumns::Open(UINT nOpenType /* = snapshot */, - LPCSTR lpszSQL /* = NULL */, DWORD dwOptions /* = none */) -{ - RETCODE nRetCode; - ASSERT(lpszSQL == NULL); - - // Allocation and opening of database not supported - if (m_hstmt == SQL_NULL_HSTMT) - { - CString strDefaultConnect; - TRY - { - if (m_pDatabase == NULL) - { - m_pDatabase = new CDatabase(); - m_bRecordsetDb = TRUE; - } - - strDefaultConnect = GetDefaultConnect(); - // If not already opened, attempt to open - if (!m_pDatabase->IsOpen() && - !m_pDatabase->Open("", FALSE, FALSE, strDefaultConnect)) - return FALSE; - - AFX_SQL_SYNC(::SQLAllocStmt(m_pDatabase->m_hdbc, &m_hstmt)); - if (!Check(nRetCode)) - ThrowDBException(SQL_INVALID_HANDLE); - } - CATCH_ALL(e) - { -#ifdef _DEBUG - if (afxTraceFlags & 0x20) - TRACE0("Error: CDatabase create for CRecordset failed\n"); -#endif // _DEBUG - strDefaultConnect.Empty(); - if (m_bRecordsetDb) - { - delete m_pDatabase; - m_pDatabase = NULL; - } - ASSERT(m_hstmt == SQL_NULL_HSTMT); - THROW_LAST(); - } - END_CATCH_ALL - } - - TRY - { - // set any options, like timeouts, scrolling options - OnSetOptions(m_hstmt); - - // call the ODBC catalog function with data member params - RETCODE nRetCode; - AFX_SQL_ASYNC(this, ::SQLColumns(m_hstmt, - (m_strQualifierParam.IsEmpty()? (UCHAR FAR *)NULL: (UCHAR FAR *)(const char*)m_strQualifierParam), SQL_NTS, - (m_strOwnerParam.IsEmpty()? (UCHAR FAR *)NULL: (UCHAR FAR *)(const char*)m_strOwnerParam), SQL_NTS, - (m_strTableNameParam.IsEmpty()? (UCHAR FAR *)NULL: (UCHAR FAR *)(const char*)m_strTableNameParam), SQL_NTS, - NULL, SQL_NTS)); - if (!Check(nRetCode)) - { - AfxThrowDBException(nRetCode, m_pDatabase, m_hstmt); - } -#ifdef WIN32 - AllocStatusArrays(); - AllocAndCacheFieldInfo(); - AllocRowset(); -#endif - // load first record - MoveFirst(); - } - CATCH_ALL(e) - { - Close(); - THROW_LAST(); - } - END_CATCH_ALL - return TRUE; -} - -CString CColumns::GetDefaultConnect() -{ - // this minimal connect string will cause ODBC login dialog to be brought up - return "ODBC;"; -} - -CString CColumns::GetDefaultSQL() -{ - // there is no default SQL - a direct ODBC call is made instead - ASSERT(FALSE); - return "!"; -} - -void CColumns::DoFieldExchange(CFieldExchange* pFX) -{ - //{{AFX_FIELD_MAP(CColumns) - pFX->SetFieldType(CFieldExchange::outputColumn); - RFX_Text(pFX, "table_qualifier", m_strQualifier); - RFX_Text(pFX, "table_owner", m_strOwner); - RFX_Text(pFX, "table_name", m_strTableName); - RFX_Text(pFX, "column_name", m_strColumnName); - RFX_Int(pFX, "data_type", m_nDataType); - RFX_Text(pFX, "type_name", m_strTypeName); - RFX_Long(pFX, "precision", m_lPrecision); - RFX_Long(pFX, "length", m_lLength); - RFX_Int(pFX, "scale", m_nScale); - RFX_Int(pFX, "radix", m_nRadix); - RFX_Int(pFX, "nullable", m_nNullable); - //}}AFX_FIELD_MAP -} diff --git a/ce/columnst.h b/ce/columnst.h deleted file mode 100755 index edd9f6e2d..000000000 --- a/ce/columnst.h +++ /dev/null @@ -1,53 +0,0 @@ -// columnst.h : interface of the CColumns class -// -// This is a part of the Microsoft Foundation Classes C++ library. -// Copyright (C) 1992-1993 Microsoft Corporation -// All rights reserved. -// -// This source code is only intended as a supplement to the -// Microsoft Foundation Classes Reference and Microsoft -// QuickHelp and/or WinHelp documentation provided with the library. -// See these sources for detailed information regarding the -// Microsoft Foundation Classes product. - -///////////////////////////////////////////////////////////////////////////// - -#ifndef __AFXWIN_H__ - #error include 'stdafx.h' before including this file for PCH -#endif - -class CColumns : public CRecordset -{ -// DECLARE_DYNAMIC(CColumns) - -public: - CColumns(CDatabase* pDatabase = NULL); - BOOL Open(UINT nOpenType = snapshot, LPCSTR lpszSQL = NULL, DWORD dwOptions = none); - -// Field/Param Data - //{{AFX_FIELD(CColumns, CRecordset) - CString m_strQualifier; - CString m_strOwner; - CString m_strTableName; - CString m_strColumnName; - int m_nDataType; - CString m_strTypeName; - long m_lPrecision; - long m_lLength; - int m_nScale; - int m_nRadix; - int m_nNullable; - //}}AFX_FIELD - - // Table we're enumerating columns for - CString m_strQualifierParam; - CString m_strOwnerParam; - CString m_strTableNameParam; - CString m_strColumnNameParam; - -// Implementation -protected: - virtual CString GetDefaultConnect(); // default connection string - virtual CString GetDefaultSQL(); // default SQL for Recordset - virtual void DoFieldExchange(CFieldExchange* pFX); // RFX support -}; diff --git a/projects/ce.dsw b/projects/ce.dsw index fc191da68..c7be348e1 100755 --- a/projects/ce.dsw +++ b/projects/ce.dsw @@ -3,6 +3,42 @@ Microsoft Developer Studio Workspace File, Format Version 6.00 ############################################################################### +Project: "AgaLib"=.\AgaLib.dsp - Package Owner=<4> + +Package=<5> +{{{ +}}} + +Package=<4> +{{{ +}}} + +############################################################################### + +Project: "ce"=.\ce.dsp - Package Owner=<4> + +Package=<5> +{{{ +}}} + +Package=<4> +{{{ + Begin Project Dependency + Project_Dep_Name ce0 + End Project Dependency + Begin Project Dependency + Project_Dep_Name ce1 + End Project Dependency + Begin Project Dependency + Project_Dep_Name ce2 + End Project Dependency + Begin Project Dependency + Project_Dep_Name ce3 + End Project Dependency +}}} + +############################################################################### + Project: "ce0"=.\ce0.dsp - Package Owner=<4> Package=<5> @@ -11,6 +47,9 @@ Package=<5> Package=<4> {{{ + Begin Project Dependency + Project_Dep_Name AgaLib + End Project Dependency }}} ############################################################################### @@ -23,6 +62,9 @@ Package=<5> Package=<4> {{{ + Begin Project Dependency + Project_Dep_Name AgaLib + End Project Dependency }}} ############################################################################### @@ -35,6 +77,9 @@ Package=<5> Package=<4> {{{ + Begin Project Dependency + Project_Dep_Name AgaLib + End Project Dependency }}} ############################################################################### @@ -46,6 +91,21 @@ Package=<5> }}} Package=<4> +{{{ + Begin Project Dependency + Project_Dep_Name AgaLib + End Project Dependency +}}} + +############################################################################### + +Global: + +Package=<5> +{{{ +}}} + +Package=<3> {{{ }}} diff --git a/projects/ce0.dsp b/projects/ce0.dsp index 0f049e730..91cd56ba7 100755 --- a/projects/ce0.dsp +++ b/projects/ce0.dsp @@ -133,7 +133,7 @@ SOURCE=..\ce\ce0400a.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce0400a.uml InputName=ce0400a @@ -145,7 +145,7 @@ InputName=ce0400a !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce0400a.uml InputName=ce0400a @@ -164,7 +164,7 @@ SOURCE=..\ce\ce0400b.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce0400b.uml InputName=ce0400b @@ -176,7 +176,7 @@ InputName=ce0400b !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce0400b.uml InputName=ce0400b @@ -195,7 +195,7 @@ SOURCE=..\ce\ce0500a.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce0500a.uml InputName=ce0500a @@ -207,7 +207,7 @@ InputName=ce0500a !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce0500a.uml InputName=ce0500a @@ -226,7 +226,7 @@ SOURCE=..\ce\ce0500b.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce0500b.uml InputName=ce0500b @@ -238,7 +238,7 @@ InputName=ce0500b !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce0500b.uml InputName=ce0500b @@ -257,7 +257,7 @@ SOURCE=..\ce\ce0900a.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce0900a.uml InputName=ce0900a @@ -269,7 +269,7 @@ InputName=ce0900a !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce0900a.uml InputName=ce0900a @@ -288,7 +288,7 @@ SOURCE=..\ce\cestcac.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestcac.uml InputName=cestcac @@ -300,7 +300,7 @@ InputName=cestcac !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestcac.uml InputName=cestcac @@ -319,7 +319,7 @@ SOURCE=..\ce\cestcat.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestcat.uml InputName=cestcat @@ -331,7 +331,7 @@ InputName=cestcat !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestcat.uml InputName=cestcat @@ -350,7 +350,7 @@ SOURCE=..\ce\cestccb.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestccb.uml InputName=cestccb @@ -362,7 +362,7 @@ InputName=cestccb !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestccb.uml InputName=cestccb @@ -381,7 +381,7 @@ SOURCE=..\ce\cestcce.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestcce.uml InputName=cestcce @@ -393,7 +393,7 @@ InputName=cestcce !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestcce.uml InputName=cestcce @@ -412,7 +412,7 @@ SOURCE=..\ce\cestcgr.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestcgr.uml InputName=cestcgr @@ -424,7 +424,7 @@ InputName=cestcgr !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestcgr.uml InputName=cestcgr @@ -443,7 +443,7 @@ SOURCE=..\ce\cestcim.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestcim.uml InputName=cestcim @@ -455,7 +455,7 @@ InputName=cestcim !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestcim.uml InputName=cestcim @@ -474,7 +474,7 @@ SOURCE=..\ce\cestclm.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestclm.uml InputName=cestclm @@ -486,7 +486,7 @@ InputName=cestclm !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestclm.uml InputName=cestclm @@ -505,7 +505,7 @@ SOURCE=..\ce\cestloc.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cestloc.uml InputName=cestloc @@ -517,7 +517,7 @@ InputName=cestloc !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cestloc.uml InputName=cestloc @@ -536,7 +536,7 @@ SOURCE=..\ce\cesttmc.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cesttmc.uml InputName=cesttmc @@ -548,7 +548,7 @@ InputName=cesttmc !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cesttmc.uml InputName=cesttmc @@ -567,7 +567,7 @@ SOURCE=..\ce\cetbcac.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcac.uml InputName=cetbcac @@ -579,7 +579,7 @@ InputName=cetbcac !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcac.uml InputName=cetbcac @@ -598,7 +598,7 @@ SOURCE=..\ce\cetbcat.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcat.uml InputName=cetbcat @@ -610,7 +610,7 @@ InputName=cetbcat !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcat.uml InputName=cetbcat @@ -629,7 +629,7 @@ SOURCE=..\ce\cetbccb.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbccb.uml InputName=cetbccb @@ -641,7 +641,7 @@ InputName=cetbccb !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbccb.uml InputName=cetbccb @@ -660,7 +660,7 @@ SOURCE=..\ce\cetbcce.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcce.uml InputName=cetbcce @@ -672,7 +672,7 @@ InputName=cetbcce !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcce.uml InputName=cetbcce @@ -691,7 +691,7 @@ SOURCE=..\ce\cetbcgr.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcgr.uml InputName=cetbcgr @@ -703,7 +703,7 @@ InputName=cetbcgr !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcgr.uml InputName=cetbcgr @@ -722,7 +722,7 @@ SOURCE=..\ce\cetbcim.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcim.uml InputName=cetbcim @@ -734,7 +734,7 @@ InputName=cetbcim !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcim.uml InputName=cetbcim @@ -753,7 +753,7 @@ SOURCE=..\ce\cetbclm.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbclm.uml InputName=cetbclm @@ -765,7 +765,7 @@ InputName=cetbclm !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbclm.uml InputName=cetbclm @@ -784,7 +784,7 @@ SOURCE=..\ce\cetbloc.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbloc.uml InputName=cetbloc @@ -796,7 +796,7 @@ InputName=cetbloc !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbloc.uml InputName=cetbloc @@ -815,7 +815,7 @@ SOURCE=..\ce\cetbtmc.uml !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbtmc.uml InputName=cetbtmc @@ -827,7 +827,7 @@ InputName=cetbtmc !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbtmc.uml InputName=cetbtmc @@ -854,7 +854,7 @@ SOURCE=..\ce\cetbcac.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcac.rpt InputName=cetbcac @@ -866,7 +866,7 @@ InputName=cetbcac !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcac.rpt InputName=cetbcac @@ -885,7 +885,7 @@ SOURCE=..\ce\cetbcat.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcat.rpt InputName=cetbcat @@ -897,7 +897,7 @@ InputName=cetbcat !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcat.rpt InputName=cetbcat @@ -916,7 +916,7 @@ SOURCE=..\ce\cetbccb.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbccb.rpt InputName=cetbccb @@ -928,7 +928,7 @@ InputName=cetbccb !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbccb.rpt InputName=cetbccb @@ -947,7 +947,7 @@ SOURCE=..\ce\cetbcce.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcce.rpt InputName=cetbcce @@ -959,7 +959,7 @@ InputName=cetbcce !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcce.rpt InputName=cetbcce @@ -978,7 +978,7 @@ SOURCE=..\ce\cetbcgr.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcgr.rpt InputName=cetbcgr @@ -990,7 +990,7 @@ InputName=cetbcgr !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcgr.rpt InputName=cetbcgr @@ -1009,7 +1009,7 @@ SOURCE=..\ce\cetbcim.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbcim.rpt InputName=cetbcim @@ -1021,7 +1021,7 @@ InputName=cetbcim !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbcim.rpt InputName=cetbcim @@ -1040,7 +1040,7 @@ SOURCE=..\ce\cetbclm.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbclm.rpt InputName=cetbclm @@ -1052,7 +1052,7 @@ InputName=cetbclm !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbclm.rpt InputName=cetbclm @@ -1071,7 +1071,7 @@ SOURCE=..\ce\cetbloc.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbloc.rpt InputName=cetbloc @@ -1083,7 +1083,7 @@ InputName=cetbloc !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbloc.rpt InputName=cetbloc @@ -1102,7 +1102,7 @@ SOURCE=..\ce\cetbtmc.rpt !IF "$(CFG)" == "ce0 - Win32 Release" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\cetbtmc.rpt InputName=cetbtmc @@ -1114,7 +1114,7 @@ InputName=cetbtmc !ELSEIF "$(CFG)" == "ce0 - Win32 Debug" # Begin Custom Build - Compiling rpt $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\cetbtmc.rpt InputName=cetbtmc @@ -1143,33 +1143,6 @@ SOURCE=.\ce0.rc !ENDIF -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLib.lib - -!IF "$(CFG)" == "ce0 - Win32 Release" - -!ELSEIF "$(CFG)" == "ce0 - Win32 Debug" - -# PROP Intermediate_Dir "..\lib\agalib.lib" -# PROP Exclude_From_Build 1 - -!ENDIF - -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLibD.lib - -!IF "$(CFG)" == "ce0 - Win32 Release" - -# PROP Exclude_From_Build 1 - -!ELSEIF "$(CFG)" == "ce0 - Win32 Debug" - -!ENDIF - # End Source File # End Target # End Project diff --git a/projects/ce1.dsp b/projects/ce1.dsp index 6633fc900..d5a9e3815 100755 --- a/projects/ce1.dsp +++ b/projects/ce1.dsp @@ -141,7 +141,7 @@ SOURCE=..\ce\ce1101a.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1101a.uml InputName=ce1101a @@ -153,7 +153,7 @@ InputName=ce1101a !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1101a.uml InputName=ce1101a @@ -172,7 +172,7 @@ SOURCE=..\ce\ce1101b.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1101b.uml InputName=ce1101b @@ -184,7 +184,7 @@ InputName=ce1101b !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1101b.uml InputName=ce1101b @@ -203,7 +203,7 @@ SOURCE=..\ce\ce1201a.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1201a.uml InputName=ce1201a @@ -215,7 +215,7 @@ InputName=ce1201a !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1201a.uml InputName=ce1201a @@ -234,7 +234,7 @@ SOURCE=..\ce\ce1201b.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1201b.uml InputName=ce1201b @@ -246,7 +246,7 @@ InputName=ce1201b !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1201b.uml InputName=ce1201b @@ -265,7 +265,7 @@ SOURCE=..\ce\ce1301a.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1301a.uml InputName=ce1301a @@ -277,7 +277,7 @@ InputName=ce1301a !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1301a.uml InputName=ce1301a @@ -296,7 +296,7 @@ SOURCE=..\ce\ce1301b.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1301b.uml InputName=ce1301b @@ -308,7 +308,7 @@ InputName=ce1301b !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1301b.uml InputName=ce1301b @@ -327,7 +327,7 @@ SOURCE=..\ce\ce1301c.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1301c.uml InputName=ce1301c @@ -339,7 +339,7 @@ InputName=ce1301c !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1301c.uml InputName=ce1301c @@ -358,7 +358,7 @@ SOURCE=..\ce\ce1301d.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1301d.uml InputName=ce1301d @@ -370,7 +370,7 @@ InputName=ce1301d !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1301d.uml InputName=ce1301d @@ -389,7 +389,7 @@ SOURCE=..\ce\ce1400a.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1400a.uml InputName=ce1400a @@ -401,7 +401,7 @@ InputName=ce1400a !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1400a.uml InputName=ce1400a @@ -420,7 +420,7 @@ SOURCE=..\ce\ce1400b.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1400b.uml InputName=ce1400b @@ -432,7 +432,7 @@ InputName=ce1400b !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1400b.uml InputName=ce1400b @@ -451,7 +451,7 @@ SOURCE=..\ce\ce1400c.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1400c.uml InputName=ce1400c @@ -463,7 +463,7 @@ InputName=ce1400c !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1400c.uml InputName=ce1400c @@ -482,7 +482,7 @@ SOURCE=..\ce\ce1400d.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1400d.uml InputName=ce1400d @@ -494,7 +494,7 @@ InputName=ce1400d !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1400d.uml InputName=ce1400d @@ -513,7 +513,7 @@ SOURCE=..\ce\ce1500a.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1500a.uml InputName=ce1500a @@ -525,7 +525,7 @@ InputName=ce1500a !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1500a.uml InputName=ce1500a @@ -544,7 +544,7 @@ SOURCE=..\ce\ce1500b.uml !IF "$(CFG)" == "ce1 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce1500b.uml InputName=ce1500b @@ -556,7 +556,7 @@ InputName=ce1500b !ELSEIF "$(CFG)" == "ce1 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce1500b.uml InputName=ce1500b @@ -589,33 +589,6 @@ SOURCE=.\ce1.rc !ENDIF -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLib.lib - -!IF "$(CFG)" == "ce1 - Win32 Release" - -!ELSEIF "$(CFG)" == "ce1 - Win32 Debug" - -# PROP Intermediate_Dir "..\lib\agalib.lib" -# PROP Exclude_From_Build 1 - -!ENDIF - -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLibD.lib - -!IF "$(CFG)" == "ce1 - Win32 Release" - -# PROP Exclude_From_Build 1 - -!ELSEIF "$(CFG)" == "ce1 - Win32 Debug" - -!ENDIF - # End Source File # End Target # End Project diff --git a/projects/ce2.dsp b/projects/ce2.dsp index 7a03acf10..7b5d6217c 100755 --- a/projects/ce2.dsp +++ b/projects/ce2.dsp @@ -141,7 +141,7 @@ SOURCE=..\ce\ce2100a.uml !IF "$(CFG)" == "ce2 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce2100a.uml InputName=ce2100a @@ -153,7 +153,7 @@ InputName=ce2100a !ELSEIF "$(CFG)" == "ce2 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce2100a.uml InputName=ce2100a @@ -172,7 +172,7 @@ SOURCE=..\ce\ce2200a.uml !IF "$(CFG)" == "ce2 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce2200a.uml InputName=ce2200a @@ -184,7 +184,7 @@ InputName=ce2200a !ELSEIF "$(CFG)" == "ce2 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce2200a.uml InputName=ce2200a @@ -203,7 +203,7 @@ SOURCE=..\ce\ce2300a.uml !IF "$(CFG)" == "ce2 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce2300a.uml InputName=ce2300a @@ -215,7 +215,7 @@ InputName=ce2300a !ELSEIF "$(CFG)" == "ce2 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce2300a.uml InputName=ce2300a @@ -234,7 +234,7 @@ SOURCE=..\ce\ce2500a.uml !IF "$(CFG)" == "ce2 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce2500a.uml InputName=ce2500a @@ -246,7 +246,7 @@ InputName=ce2500a !ELSEIF "$(CFG)" == "ce2 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce2500a.uml InputName=ce2500a @@ -279,33 +279,6 @@ SOURCE=.\ce2.rc !ENDIF -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLib.lib - -!IF "$(CFG)" == "ce2 - Win32 Release" - -!ELSEIF "$(CFG)" == "ce2 - Win32 Debug" - -# PROP Intermediate_Dir "..\lib\agalib.lib" -# PROP Exclude_From_Build 1 - -!ENDIF - -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLibD.lib - -!IF "$(CFG)" == "ce2 - Win32 Release" - -# PROP Exclude_From_Build 1 - -!ELSEIF "$(CFG)" == "ce2 - Win32 Debug" - -!ENDIF - # End Source File # End Target # End Project diff --git a/projects/ce3.dsp b/projects/ce3.dsp index 5d15fec1a..248cef260 100755 --- a/projects/ce3.dsp +++ b/projects/ce3.dsp @@ -153,7 +153,7 @@ SOURCE=..\ce\ce3100a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3100a.uml InputName=ce3100a @@ -165,7 +165,7 @@ InputName=ce3100a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3100a.uml InputName=ce3100a @@ -184,7 +184,7 @@ SOURCE=..\ce\ce3200a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3200a.uml InputName=ce3200a @@ -196,7 +196,7 @@ InputName=ce3200a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3200a.uml InputName=ce3200a @@ -215,7 +215,7 @@ SOURCE=..\ce\ce3300a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3300a.uml InputName=ce3300a @@ -227,7 +227,7 @@ InputName=ce3300a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3300a.uml InputName=ce3300a @@ -246,7 +246,7 @@ SOURCE=..\ce\ce3400a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3400a.uml InputName=ce3400a @@ -258,7 +258,7 @@ InputName=ce3400a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3400a.uml InputName=ce3400a @@ -277,7 +277,7 @@ SOURCE=..\ce\ce3500a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3500a.uml InputName=ce3500a @@ -289,7 +289,7 @@ InputName=ce3500a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3500a.uml InputName=ce3500a @@ -308,7 +308,7 @@ SOURCE=..\ce\ce3600a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3600a.uml InputName=ce3600a @@ -320,7 +320,7 @@ InputName=ce3600a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3600a.uml InputName=ce3600a @@ -339,7 +339,7 @@ SOURCE=..\ce\ce3700a.uml !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3700a.uml InputName=ce3700a @@ -351,7 +351,7 @@ InputName=ce3700a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling mask $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3700a.uml InputName=ce3700a @@ -378,7 +378,7 @@ SOURCE=..\ce\ce3100a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3100a.frm InputName=ce3100a @@ -390,7 +390,7 @@ InputName=ce3100a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3100a.frm InputName=ce3100a @@ -409,7 +409,7 @@ SOURCE=..\ce\ce3200a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3200a.frm InputName=ce3200a @@ -421,7 +421,7 @@ InputName=ce3200a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3200a.frm InputName=ce3200a @@ -440,7 +440,7 @@ SOURCE=..\ce\ce3300a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3300a.frm InputName=ce3300a @@ -452,7 +452,7 @@ InputName=ce3300a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3300a.frm InputName=ce3300a @@ -471,7 +471,7 @@ SOURCE=..\ce\ce3400a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3400a.frm InputName=ce3400a @@ -483,7 +483,7 @@ InputName=ce3400a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3400a.frm InputName=ce3400a @@ -502,7 +502,7 @@ SOURCE=..\ce\ce3500a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3500a.frm InputName=ce3500a @@ -514,7 +514,7 @@ InputName=ce3500a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3500a.frm InputName=ce3500a @@ -533,7 +533,7 @@ SOURCE=..\ce\ce3500b.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3500b.frm InputName=ce3500b @@ -545,7 +545,7 @@ InputName=ce3500b !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3500b.frm InputName=ce3500b @@ -564,7 +564,7 @@ SOURCE=..\ce\ce3600a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3600a.frm InputName=ce3600a @@ -576,7 +576,7 @@ InputName=ce3600a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3600a.frm InputName=ce3600a @@ -595,7 +595,7 @@ SOURCE=..\ce\ce3700a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3700a.frm InputName=ce3700a @@ -607,7 +607,7 @@ InputName=ce3700a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3700a.frm InputName=ce3700a @@ -626,7 +626,7 @@ SOURCE=..\ce\ce3800a.frm !IF "$(CFG)" == "ce3 - Win32 Release" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exe +TargetDir=\P.32\P_02_00\exe InputPath=..\ce\ce3800a.frm InputName=ce3800a @@ -638,7 +638,7 @@ InputName=ce3800a !ELSEIF "$(CFG)" == "ce3 - Win32 Debug" # Begin Custom Build - Compiling form $(InputPath)... -TargetDir=\U\Luca\r020200.aga\exed +TargetDir=\P.32\P_02_00\exed InputPath=..\ce\ce3800a.frm InputName=ce3800a @@ -667,33 +667,6 @@ SOURCE=.\ce3.rc !ENDIF -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLib.lib - -!IF "$(CFG)" == "ce3 - Win32 Release" - -!ELSEIF "$(CFG)" == "ce3 - Win32 Debug" - -# PROP Intermediate_Dir "..\lib\agalib.lib" -# PROP Exclude_From_Build 1 - -!ENDIF - -# End Source File -# Begin Source File - -SOURCE=..\Lib\AgaLibD.lib - -!IF "$(CFG)" == "ce3 - Win32 Release" - -# PROP Exclude_From_Build 1 - -!ELSEIF "$(CFG)" == "ce3 - Win32 Debug" - -!ENDIF - # End Source File # End Target # End Project