From f80d1f31a6e7b7ed599776ed58417fd731037a14 Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 21 Sep 2009 14:47:16 +0000
Subject: [PATCH] Patch level         : 10.0 420 Files correlati     : ve0.exe
 Ricompilazione Demo : [ ] Commento

Bugs 0001356 :  Elaborazione differita per fatturazione di prova

Ho inserito una nuova numerazione documenti F09 "fatturazione di prova" con il
check di "numerazione provvisoria" un tipo documento "fatturazione di prova" F09
ho inserito una elaborazione differita che lascia le bolle B01 allo stato 2 ma crea un F09
quando vado a vedere le fatture F09 sono definitive e non provvisorie.
Allego la parte tabellare


git-svn-id: svn://10.65.10.50/trunk@19316 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 include/tabmod.cpp | 43 ++++++++++++++++++++++++++++---------------
 ve/vetbscc.uml     |  4 +++-
 2 files changed, 31 insertions(+), 16 deletions(-)

diff --git a/include/tabmod.cpp b/include/tabmod.cpp
index b05c46f97..bcda40de3 100755
--- a/include/tabmod.cpp
+++ b/include/tabmod.cpp
@@ -256,26 +256,39 @@ const char* TModule_table::description()
     load_module_description();
   return _description;
 }
+static bool find_relapp(TString& app, const char * para, const char * tabname)
+{
+	TString8 var;
+	var << "Edit_" << tabname;
+
+	app = ini_get_string(CONFIG_GENERAL, para, var);
+	if (app.empty())
+	{
+		var.cut(0) << "Edit_" << LF_TABMOD;
+		app = ini_get_string(CONFIG_GENERAL, para, var);
+	}
+	return app.full();
+}
 
 bool TModule_table::get_relapp(TString& app) const
 {
   TString8 para = _module;
+
   if (_customer > 0L)
     para.format("%s%06ld", (const char*)_module, _customer);
-  para.lower();
-  TConfig ini(CONFIG_GENERAL, para);
-  
-  TString8 var;
-  var << "Edit_" << _tabname;
-  app = ini.get(var);
-  if (app.empty())
-  {
-    var.cut(0) << "Edit_" << LF_TABMOD;
-    app = ini.get(var);
-    if (app.empty())
-      app << _module << "0 -0";
-    app << " &" << _tabname;
-  }
-  return app.not_empty();
+	para.lower();
+
+	bool ok = ::find_relapp(app, para, _tabname);
+
+	for (int i = 0; !ok && i <= 9; i++)
+	{
+		para = _module;
+		para << i;
+		ok = ::find_relapp(app, para, _tabname);
+	}
+	if (!ok)
+		app << _module << "0 -0";
+	app << " &" << _tabname;
+  return true;
 }
 
diff --git a/ve/vetbscc.uml b/ve/vetbscc.uml
index 61d46864f..4a21fc013 100755
--- a/ve/vetbscc.uml
+++ b/ve/vetbscc.uml
@@ -23,6 +23,8 @@ BEGIN
   ITEM "AL|Alluminio"
   ITEM "CA|Carta"
   ITEM "PL|Plastica"
+  ITEM "LE|Legno"
+  ITEM "VE|Vetro"
 END
 
 NUMBER SCC_CODICE 2
@@ -32,7 +34,7 @@ BEGIN
   KEY 1
   USE &SCC
   FLAGS "Z"
-  INPUT CODTAB[1,2]  SCC_CATEGORIA
+  INPUT CODTAB[1,2]  SCC_CATEGORIA SELECT
   INPUT CODTAB[3,4]  SCC_CODICE
   DISPLAY "Categoria" CODTAB[1,2]
   DISPLAY "Codice@8" CODTAB[3,4]