From 545d10bdd973d3a5a04bd9ab434106fa78f2ece0 Mon Sep 17 00:00:00 2001 From: guy Date: Tue, 22 Nov 1994 18:06:28 +0000 Subject: [PATCH] Minimi ritocchi di carnevale git-svn-id: svn://10.65.10.50/trunk@686 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ba/ba0.cpp | 8 +++----- ba/ba0100a.uml | 2 +- ba/ba4300a.uml | 10 +++++----- 3 files changed, 9 insertions(+), 11 deletions(-) diff --git a/ba/ba0.cpp b/ba/ba0.cpp index 12aaeb569..ed5a5cbe9 100755 --- a/ba/ba0.cpp +++ b/ba/ba0.cpp @@ -221,7 +221,7 @@ bool TMenu_application::build_firm_data(long codditta, bool flagcom) prefhndl->set_codditta(codditta); const char* name = dir.name(); dir.flags() = 0L; - const bool valid_file = *name != '\0' && dir.len() > 0; + const bool valid_file = *name > ' ' && dir.len() > 0; const bool create_now = flagcom ? *name == '%' : *name != '%'; if (valid_file && create_now) @@ -229,7 +229,6 @@ bool TMenu_application::build_firm_data(long codditta, bool flagcom) dir.put(i, _nordir, _sysdirop); rec.put(i); TSystemisamfile f(i); - f.build(30); } else @@ -566,9 +565,8 @@ bool TMenu_application::menu(MENU_TAG) { TExternal_app a(option); const TString& module = option.left(2); - if (module == "ba") _ditta_asked = FALSE; else - if (module == "cg" && !_ditta_asked) - _ditta_asked = ok = set_firm(); + if (module == "cg" && !_ditta_asked) + _ditta_asked = ok = set_firm(); if (ok) a.run(); prefhndl->set("DEF"); // Aggiorna prefix se hanno cambiato ditta } diff --git a/ba/ba0100a.uml b/ba/ba0100a.uml index e8598ea4b..a19758b7b 100755 --- a/ba/ba0100a.uml +++ b/ba/ba0100a.uml @@ -9,7 +9,7 @@ BEGIN FLAGS "U" USE LF_USER INPUT USERNAME F_USER - DISPLAY "Utente" USERNAME + DISPLAY "Utente@8" USERNAME DISPLAY "Descrizione@50" USERDESC OUTPUT F_USER USERNAME END diff --git a/ba/ba4300a.uml b/ba/ba4300a.uml index 9cef63246..ad91bef66 100755 --- a/ba/ba4300a.uml +++ b/ba/ba4300a.uml @@ -319,7 +319,7 @@ END STRING FLD_GD1_COMAA_COMUNI_DESCR 50 BEGIN PROMPT 8 12 ": Nome " - HELP "Nome del comune in cui Š iscritta all'albo" + HELP "Nome del comune in cui e' iscritta all'albo" USE LF_COMUNI KEY 2 SELECT STATO="" INPUT DENCOM FLD_GD1_COMAA_COMUNI_DESCR #include @@ -332,7 +332,7 @@ END BOOLEAN CHK_GD1_CONTORD BEGIN - PROMPT 1 14 "Contabilit… ordinaria" + PROMPT 1 14 "Contabilita' ordinaria" FIELD LF_NDITTE->CONTORD HELP "Dire se la ditta tiene una contabilita' ordinaria" END @@ -470,12 +470,12 @@ END NUMBER LST_GD2_SITSOC 1 BEGIN - PROMPT 45 9 "Situazione societ… " + PROMPT 45 9 "Situazione societa' " FIELD LF_NDITTE->SITSOC SHEET "Codice|Situazione@70" INPUT LST_GD2_SITSOC OUTPUT LST_GD2_SITSOC - HELP "Codice della situazione della societ…" + HELP "Codice della situazione della societa'" ITEM " |Sconosciuta" ITEM "1|Periodo d'imposta in cui ha avuto inizio la liquidazione" ITEM "2|Periodi d'imposta successivi a quello in cui ha avuto inizio la liquidazione" @@ -631,7 +631,7 @@ BOOLEAN CHK_GD3_ESILOR BEGIN PROMPT 1 6 "Esenzione ILOR" FIELD LF_NDITTE->ESILOR - HELP "Indicare se la ditta Š soggetta ad esenzione ILOR" + HELP "Indicare se la ditta e' soggetta ad esenzione ILOR" END BOOLEAN CHK_GD3_REGSTATSP