Modifiche dalla versione Linux sulla 2.1

Verificare ve6600.cpp


git-svn-id: svn://10.65.10.50/trunk@12030 c028cbd2-c16b-5b4b-a496-9718f37d4682

ve/ve5100.cpp

@@ -1,4 +1,6 @@
+#ifdef WIN32 //qui verificare
 #include <direct.h>
+#endif
 
 #include <applicat.h>
 #include <archives.h>

ve/ve5300.cpp

@@ -68,7 +68,7 @@ long TCopydoc_mask::get_first_ndoc() const
     TLocalisamfile doc(LF_DOC);
     TRectype& curr = doc.curr();
   
-    const TDate dd = get(F_TO_DATA);
+    const TDate dd = get_date(F_TO_DATA);
     const int anno = dd.year();
     const char provv = get(F_TO_PROVV)[0];
     const TString& codnum = get(F_TO_NUM);
@@ -238,7 +238,7 @@ void TCopydoc_app::main_loop()
                     tot, (tot == 1L) ? 'o' : 'i'))
       {
         const TString& provv = m.get(F_TO_PROVV);
-        const TDate data = m.get(F_TO_DATA); 
+        const TDate data = m.get_date(F_TO_DATA); 
         TString16 anno; anno << data.year();
         const TString& codnum = m.get(F_TO_NUM);     
         long ndoc = m.get_first_ndoc();
@@ -300,4 +300,4 @@ int ve5300(int argc, char* argv[])
   TCopydoc_app a;
   a.run(argc, argv, "Copia documenti");
   return 0;
-}
+}

ve/ve6100.cpp

@@ -282,7 +282,6 @@ void TContabilizzazione_app::contabilize()
   const long items = _num_sheet->items();
   int year_from = _data_ini.year();
   int year_to = _data_fine.year();
-  bool ok = TRUE;
   TString16 codnum;
   TString msg,filt_expr;
   TToken_string nums;

ve/ve6200.cpp

@@ -79,7 +79,7 @@ void TFatturazione_bolle_app::process_by_cli(const TMask& m)
 {
   TIndwin iw(0, "Inizializzazione ...\n ", TRUE, FALSE, 60);
   
-  const TDate data_elab = m.get(F_DATA_ELAB); 
+  const TDate data_elab = m.get_date(F_DATA_ELAB); 
   const int anno = data_elab.year();
     
   const long dc = m.get_long(F_CODICE_CLIFO_DA);
@@ -89,9 +89,9 @@ void TFatturazione_bolle_app::process_by_cli(const TMask& m)
   const TString16 dz(m.get(F_CODICE_ZONA_DA)); 
   const TString16 az(m.get(F_CODICE_ZONA_A));
     
-  const TDate dd = m.get(F_DATA_DOCUMENTO_DA);
+  const TDate dd = m.get_date(F_DATA_DOCUMENTO_DA);
-  TString st_da = m.get(F_DATA_DOCUMENTO_A);
+  TString st_da = m.get(F_DATA_DOCUMENTO_A); // qui verificare
-  const TDate ad = st_da.not_empty() ? (const char*)st_da : data_elab;
+  const TDate ad = st_da.not_empty() ? (TDate)(const char*)st_da : data_elab;
   const TString& codnum = m.get(F_CODICE_NUMERAZIONE);
   const long dn = m.get_long(F_NUMERO_DOCUMENTO_DA);
   const long an = m.get_long(F_NUMERO_DOCUMENTO_A);
@@ -130,7 +130,7 @@ void TFatturazione_bolle_app::process_by_doc(const TMask& m)
 {
   TIndwin iw(0, "Inizializzazione ...\n ", TRUE, FALSE, 60);
 
-  const TDate data_elab = m.get(F_DATA_ELAB); 
+  const TDate data_elab = m.get_date(F_DATA_ELAB); 
   const int anno = data_elab.year();
   long dc = m.get_long(F_CODICE_CLIFO_DA);
   long ac = m.get_long(F_CODICE_CLIFO_A);   
@@ -140,8 +140,8 @@ void TFatturazione_bolle_app::process_by_doc(const TMask& m)
   const TString8 dz(m.get(F_CODICE_ZONA_DA)); 
   const TString8 az(m.get(F_CODICE_ZONA_A));
     
-  const TDate dd = m.get(F_DATA_DOCUMENTO_DA);
+  const TDate dd = m.get_date(F_DATA_DOCUMENTO_DA);
-  TDate ad = m.get(F_DATA_DOCUMENTO_A);
+  TDate ad = m.get_date(F_DATA_DOCUMENTO_A);
   if (!ad.ok()) ad = data_elab;
   
   const TString& codnum = m.get(F_CODICE_NUMERAZIONE);

ve/ve6300.cpp

@@ -488,10 +488,10 @@ void TGenerazioneEffetti_app::generate()
     if (sort_by_date)
     {
       cursor_key = 3;
-      const TDate dataini = _msk->get(F_DATA_INI);
+      const TDate dataini = _msk->get_date(F_DATA_INI);
       da.put(DOC_ANNO,dataini.year());
       da.put(DOC_DATADOC,dataini);
-      const TDate datafin = _msk->get(F_DATA_FIN);
+      const TDate datafin = _msk->get_date(F_DATA_FIN);
       a.put(DOC_ANNO,datafin.year());
       a.put(DOC_DATADOC,datafin);
       filt_expr << DOC_CODNUM << "=\"" << codnum << "\"";
@@ -594,4 +594,4 @@ int ve6300 (int argc, char **argv)
   TGenerazioneEffetti_app a;
   a.run(argc,argv,"Generazione effetti");
   return TRUE;
-}
+}

ve/ve6400.cpp

@@ -3,7 +3,7 @@
 #include <config.h>     
 #include <defmask.h>
 #include <execp.h>
-#include <fstream.h>
+#include <incstr.h>
 #include <golem.h>     
 #include <prefix.h>
                     
@@ -296,7 +296,7 @@ bool TScontrino_mask::send_scr_data()
   
   const int pos_code   = sheet.cid2index(F_CODART);
   const int pos_prezzo = sheet.cid2index(F_PREZZO);
-  const int pos_rep    = sheet.cid2index(F_REPARTO);
+//  const int pos_rep    = sheet.cid2index(F_REPARTO);
   const int pos_qta    = sheet.cid2index(F_QTA);
          
   TString codart, grmerc, descr;

ve/ve6500.cpp

@@ -212,7 +212,7 @@ void TPenna_app::main_loop()                              //definizione della me
                                                           //istanzio dalla classe real
     para.format("%d", LF_DOC);                             
     
-    TDate datadoc = ini.get(DOC_DATADOC, para);      //dal paragrafo testata documento prende il valore della data del
+    TDate datadoc(ini.get(DOC_DATADOC, para));      //dal paragrafo testata documento prende il valore della data del
                                                      //documento
     TEsercizi_contabili esc;                         //crea un oggetto esc di tipo TEsercizi_contabili
     TString16 annoes;

ve/ve6600.cpp

@@ -80,7 +80,7 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
   if (field[0] == '_')
   {
     val.cut(0);
-    if (stricmp(field, "_CANTIERE") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_CANTIERE") == 0)
     { 
       TString cms, fas;
       cms = rec.get(RDOC_CODCMS);
@@ -95,17 +95,17 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
       trim_and_cut(fas, _len_fase);
       val << cms << fas;
     } else
-    if (stricmp(field, "_CONINDU") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_CONINDU") == 0)
     {
       conto_industriale((TRiga_documento&)rec, val);
     } else
-    if (stricmp(field, "_IMPORTO") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_IMPORTO") == 0)
     {
       TCurrency_documento imp(((TRiga_documento&)rec).importo(TRUE, FALSE), doc);
       imp.change_to_firm_val();
       val = imp.get_num().stringa();
     } else
-    if (stricmp(field, "_IMPORTOVAL") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_IMPORTOVAL") == 0)
     {
       if (doc.in_valuta())
       {
@@ -113,7 +113,7 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
         val = imp.get_num().stringa();
       }
     } else
-    if (stricmp(field, "_IMPOSTADOC") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_IMPOSTADOC") == 0)
     {             
       TString16 conto;                          
       real impval;
@@ -128,13 +128,13 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
       imposta.change_to_firm_val();
       val = imposta.get_num().stringa();  
     } else
-    if (stricmp(field, "_SEZIONE") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_SEZIONE") == 0)
     {
       TCausale causale(mov.get(MOV_CODCAUS));
       const char str[2] = { causale.sezione_clifo(), '\0' };
       val = str;
     } else
-    if (stricmp(field, "_TOTDOC") == 0)
+    if (xvt_str_compare_ignoring_case(field, "_TOTDOC") == 0)
     {            
       TString16 conto;                           
       real totval;
@@ -197,14 +197,16 @@ bool TIndustriosa_app::filerr(const char* name) const
 
 bool TIndustriosa_app::get_mci_path(TFilename& shell) const
 {                                
+  bool ok = FALSE;    
+      
+#ifdef WIN32
   char winpath[_MAX_PATH];
+
   ::GetWindowsDirectory(winpath, sizeof(winpath));
   
   shell = winpath;
   shell.add("mci4.ini");
   
-  bool ok = FALSE;    
-      
   if (shell.exist())
   {    
     TConfig mci4(shell, "Paths");
@@ -236,6 +238,7 @@ bool TIndustriosa_app::get_mci_path(TFilename& shell) const
   else
     filerr(shell);
 
+#endif 
   return ok;
 }