Patch level : 10.0

Files correlati     : lv0, lv2
Ricompilazione Demo : [ ]
Commento            :
0001009: Aggiunta pulsante generazioni giri in contratto
Descrizione 	Aggiungere pulsante che collega la generazione automatica dei giri nel progamma di impostazione giri del contratto
P.S.:questo perchè se si è generato un giro per tutto l'hanno inserendo un cliente nuovo si ha la possibilità nell'immediato di inserirlo nel giro già generato.

In realtà non è stato aggiunto un bottone, ma i giri vengono generati in automatico dalla data odierna fino alla data dell'ultimo giro già generato in precedenza


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

lv/lv0500.cpp

@@ -1,4 +1,5 @@
 #include <automask.h>
+#include <execp.h>
 #include <relapp.h>
 #include <progind.h>
 
@@ -246,11 +247,35 @@ int TPass_plan_contr::write_pasplan(TSheet_field& pasplan, const long codcli, co
       if (_mask->edit_mode())
         lv_set_update_info(file.curr());      
       else
-        lv_set_creation_info(file.curr());
+        lv_set_creation_info(file.curr());      
 
-      err = file.rewrite_write();  //o faccio la rewrite, o faccio la write
+      err = file.rewrite_write();  //o faccio la rewrite, o faccio la write      
     }
   }
+
+  //se la scrittura è andata a buon fine, genero i passaggi planning per contratto...
+  //...dalla data odierna alla data dell'ultimo passaggio previsto già generato
+  if (err == NOERR)
+  {
+    //richiamo il programma lv2100.cpp per generare i giri in autmatico dalla data odierna...
+    //...alla data dell'ultimo giro già generato
+    TFilename fname;
+    fname.tempdir();
+    fname.add("autogiri.ini");
+
+    TConfig ini(fname,"main");
+    ini.set("transaction", "update");
+    ini.set_paragraph("167");
+    ini.set("CODCF", codcli);
+    ini.set_paragraph("main");
+
+    TString str;
+    str << "lv2 -0 -i" << fname;
+
+    TExternal_app app(str);
+    app.run();
+    fname.fremove();        
+  }
   return err;
 }
 

lv/lv2100.cpp

@@ -413,13 +413,39 @@ bool TGenera_planning_app::transfer()
 			break;
     elabora_passaggio(dadata, adata, pplan);
   }
-  message_box(FR("La generazione dei giri è stata completata\nin modo corretto"));
   return true;
 }
 void TGenera_planning_app::main_loop()
 {
+  //generazione autonatica dei giri lanciata ogni volta che salvo i passaggi planning per contratto
+  if (argc() > 2)
+  {
+    TFilename ininame(argv(2));
+    ininame.ltrim(2);
+    if (ininame.exist())
+    {
+      TConfig ini(ininame,"167");
+      const long codcf = ini.get_long("CODCF");
+      if (codcf > 0)
+      {
+        TLocalisamfile rplan(LF_LVRCONSPLAN);
+        rplan.last();
+        const TDate adata = rplan.curr().get_date(LVRCONSPLAN_DTCONS);
+        const TDate dadata = TDate(TODAY);
+
+        _msk->set(F_CODCF, codcf);
+        _msk->set(F_DADATA, dadata);
+        _msk->set(F_ADATA, adata);
+
+        transfer();
+        return;
+      }
+    }
+  }
+
   while (_msk->run() == K_ENTER)
-		transfer();
+    if (transfer())
+      message_box(TR("La generazione dei giri è stata completata\nin modo corretto"));
 }
 
 int lv2100(int argc, char* argv[])