Correzioni per Bellegotti a programma personalizzato generazione ordini da commessa

git-svn-id: svn://10.65.10.50/branches/R_10_00@22664 c028cbd2-c16b-5b4b-a496-9718f37d4682

ps/pd0610100.cpp

@@ -191,7 +191,7 @@ bool TTabmod_caf_msk::on_field_event(TOperable_field& o, TField_event e, long jo
 
     break;
   case S_ARTICOLO:
-    if(e == fe_modify)
+    if (e == fe_modify)
     {
       TSheet_field& sheet = sfield(F_SHEET);
       const int rsel = sheet.selected();
@@ -206,7 +206,7 @@ bool TTabmod_caf_msk::on_field_event(TOperable_field& o, TField_event e, long jo
         if (row.get(sheet.cid2index(S_ARTICOLO)) == codart)
         {
           TString msg;
-          msg << "Attenzione: esiste già una riga con articolo " << codart;
+          msg << TR("Attenzione: esiste già una riga con articolo ") << codart;
           warning_box(msg);
 
           sheet.select(rsel);
@@ -223,8 +223,7 @@ bool TTabmod_caf_msk::on_field_event(TOperable_field& o, TField_event e, long jo
 }
 
 TTabmod_caf_msk::TTabmod_caf_msk() : TAutomask("pd0610100a")
-{
+{}
-}
 
 ///////////////////////////////////////////////////////////
 // TTabmod_caf_app
@@ -233,22 +232,16 @@ TTabmod_caf_msk::TTabmod_caf_msk() : TAutomask("pd0610100a")
 class TTabmod_caf_app: public TSkeleton_application
 {
 protected:
-  virtual bool check_autorization() const {return false;}
+  virtual bool check_autorization() const { return false; }
-  virtual const char * extra_modules() const {return "ve";}
+  virtual const char* extra_modules() const { return "ve"; }
   virtual void main_loop();
-  void elabora();
 };
 
-void TTabmod_caf_app::elabora()
-{
-}
-
 void TTabmod_caf_app::main_loop()
 {
   TTabmod_caf_msk m;
   while (m.run() == K_ENTER)
 	{
-		elabora();
 	}
 }
 

ps/pd0610200.cpp

@@ -29,7 +29,7 @@ public:
 	const TString& tipodoc() { return _tipodoc;}
 
 	TDocumento& doc(const TDoc_key& kdoc);
-  TDocumento& doc(const long      codcf);
+  TDocumento& doc(const long codcf);
   TOrdf_cache(const char* from_tipodoc, const TDate& datatdoc);
 };
 
@@ -388,7 +388,6 @@ TDoc_key * TCrea_ordini_srm_app::crea_ordf(const TDocumento& ordc, const long nr
 void TCrea_ordini_srm_app::elimina_ordf(const TDoc_key& adoc, TOrdf_cache& ca)
 { 
   TDocumento& ordf = ca.doc(adoc);
-
 	ordf.destroy_rows();
 }
 
@@ -409,52 +408,40 @@ void TCrea_ordini_srm_app::elimina_righe(const TDocumento& ordc, TOrdf_cache& ca
 
   //scorro tutte le righe degli ordini fornitori; per ogni riga controllo se esiste ancora sull'ordine cliente;
   //se non esiste più la elimino dall'ordine fornitore, sfruttando la cache dei documenti
-  for(bool ok = rdoc.move_first(); ok; ok = rdoc.move_next())
+  for (bool ok = rdoc.move_last(); ok; ok = rdoc.move_prev())
   {
+    const TDoc_key kordf(rdoc.get(RDOC_ANNO).as_int(), rdoc.get(RDOC_CODNUM).as_string(), rdoc.get(RDOC_NDOC).as_int(), rdoc.get(RDOC_PROVV).as_string()[0]);
+    TDocumento& ordf = ca.doc(kordf);
+	  const long codfor   =  ordf.get_long(DOC_CODCF);
+
     const int daidriga = rdoc.get(RDOC_DAIDRIGA).as_int();
     const int nriga    = rdoc.get(RDOC_NRIGA).as_int();
-    TDoc_key kordf(rdoc.get(RDOC_ANNO).as_int(), rdoc.get(RDOC_CODNUM).as_string(), rdoc.get(RDOC_NDOC).as_int(), rdoc.get(RDOC_PROVV).as_string()[0]);
+		TRiga_documento& r = ordf[nriga];
-    TDocumento& ordf = ca.doc(kordf);
-	  const long ndoc     =  ordf.get_long(DOC_NDOC);
-	  const long codfor   =  ordf.get_long(DOC_CODCF);
-//		bool trovato = false;
 
-		TRiga_documento & r = ordf[nriga];
+    bool kill = false;
-		const TRectype * rordc = r.find_original_rdoc();
+    int ordc_row = 0;
-
+    for (ordc_row = ordc.physical_rows(); ordc_row > 0; ordc_row = ordc_row--)
-		if (rordc != NULL)
+    {
-		{
+      const TRiga_documento& rc = ordc[ordc_row];
-			if (rordc->get(RDOC_PROVV) == rordc->get(DOC_PROVV) &&
+      if (rc.get_int(RDOC_IDRIGA) == daidriga)
-			    rordc->get(RDOC_CODNUM) == rordc->get(DOC_CODNUM) &&
+      {
-			    rordc->get(RDOC_ANNO) == rordc->get(DOC_ANNO) &&
+				if ((rc.get_long(RDOC_CODAGG1) != codfor) && (rc.get_long(RDOC_CODAGG2) != codfor))
-			    rordc->get(RDOC_NDOC) == rordc->get(DOC_NDOC))
+          kill = true;
-			{
+        break;
-				if ((rordc->get_long(RDOC_CODAGG1) != codfor) &&
+      }
-				     (rordc->get_long(RDOC_CODAGG2) != codfor))
+    }
-					r.put("D", "X");
+    if (ordc_row <= 0)
-			}
+      kill = true;
-		}
+    if (kill)
+      ordf.destroy_row(nriga, true);
 	}
-  for(bool ok = rdoc.move_first(); ok; ok = rdoc.move_next())
-  {
-    TDoc_key kordf(rdoc.get(RDOC_ANNO).as_int(), rdoc.get(RDOC_CODNUM).as_string(), rdoc.get(RDOC_NDOC).as_int(), rdoc.get(RDOC_PROVV).as_string()[0]);
-    TDocumento& ordf = ca.doc(kordf);
-
-		for(int i = ordf.physical_rows(); i >= 1 ; i--)
-		{
-			if (ordf[i].get("D") == "X")
-			  ordf.destroy_row(i, true);
-		}
-		for (int i = 1; i <= ordf.physical_rows(); i++)
-			ordf[i].put(RDOC_NRIGA, i);
-  }
 }
 
 //ELABORA_ORDINI_CLIENTE: scorro il file ini e aggiungo alla tabella dei listini le righe mancanti
 void TCrea_ordini_srm_app::elabora_ordini_cliente()
 { 
-  TConfig ini(_ini_name, "33");
   TString4 para;  para.format("%d", LF_DOC);
+  TConfig ini(_ini_name, para);
   const char     provv   = ini.get_char(DOC_PROVV, para);
 	const int      anno    = ini.get_int(DOC_ANNO, para);
   const TString& codnum  = ini.get(DOC_CODNUM, para);
@@ -462,7 +449,6 @@ void TCrea_ordini_srm_app::elabora_ordini_cliente()
 	const bool delete_docs = ini.get(DOC_NOTE, para) == "DELETING";
 
   TDoc_key dadoc(anno, codnum, ndoc, provv);
-  TDoc_key ordf;
 
   TDocumento ordc(provv, anno, codnum, ndoc);
 
@@ -479,7 +465,8 @@ void TCrea_ordini_srm_app::elabora_ordini_cliente()
 
 		if (codfor1 > 0)
 		{
-			if(cerca_orf(dadoc, 0, codfor1, ordf))
+      TDoc_key ordf;
+			if (cerca_orf(dadoc, 0, codfor1, ordf))
 			{
 				if (delete_docs)
 					elimina_ordf(ordf, ca);
@@ -491,8 +478,8 @@ void TCrea_ordini_srm_app::elabora_ordini_cliente()
 		}
 		if (codfor2 > 0)
 		{
-
+      TDoc_key ordf;
-			if(cerca_orf(dadoc, 0, codfor2, ordf))
+			if (cerca_orf(dadoc, 0, codfor2, ordf))
 			{
 				if (delete_docs)
 					elimina_ordf(ordf, ca);
@@ -538,11 +525,11 @@ bool TCrea_ordini_srm_app::load_ini(bool check)
 
 void TCrea_ordini_srm_app::main_loop() //definizione della member function main_loop, della classe TCrea_ordini_srm_app
 {
- 	TString sw = argv(2); sw.upper(); 
- 	const bool chk_doc = sw == "-V";
-
   open_files(LF_TAB, LF_TABCOM, LF_DOC, LF_RIGHEDOC, 0);
 
+ 	const TFixed_string sw = argv(2);
+  const bool chk_doc = sw.starts_with("-V", true);
+
   // mostra un messaggio di errore se non riesce ad aprire  il file richiesto
   if (load_ini(chk_doc))
   {