Patch level : 12.0 790

Files correlati     : lv0200, lv0600a
Commento            :
- Corretto report e programma per storico consegne lavanderie:
- Andava a leggere un codice numerazione fisso e non quello della configurazione

src/lv/lv0200.cpp

@@ -4,6 +4,7 @@
 
 #include "lv0201.h"
 #include "lv0b00.h"
+#include "lv0600a.h"
 
 class TStampa_tabelle_lv : public TSkeleton_application
 {
@@ -70,8 +71,13 @@ void TStampa_tabelle_lv::main_loop()
             r.mask2report(m);
           }
         }
-        else
-          ok = r.load(rep);  
+				else
+				{
+					if(mskname == "lv0600a")
+						m.set(F_NUM_G, ini_get_string(CONFIG_DITTA, "lv","NUM_GEN"));
+					ok = r.load(rep);
+					r.mask2report(m);
+				}
       }
     }
     if (ok)

src/lv/lv0600a.h

@@ -14,4 +14,5 @@
 #define F_CODCAUS_A    213
 #define F_DESCAUS_A    214
 #define F_ANNO_DA      215
-#define F_ANNO_A       216
+#define F_ANNO_A       216
+#define F_NUM_G				 217

src/lv/lv0600a.rep

@@ -94,9 +94,9 @@
  <sql>USE 34 
 SELECT BETWEEN(33.DATADOC,#F_DATA_FROM,#F_DATA_TO)&#26;&#26;STR(BETWEEN(33.CODCF,#F_CODCF_FROM,#F_CODCF_TO))&#26;&#26;BETWEEN(CODART,#F_CODARTI_FROM,#F_CODARTI_TO)&#26;&#26;BETWEEN(CODAGG1,#F_CODCAUSA_FROM,#F_CODCAUSA_TO)
 BY 33.CODCF 34.CODART 33.DATADOC
-JOIN 33 TO 34 ALIAS 1000 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC 
+JOIN 33 TO 34 ALIAS 1000 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC
 JOIN 20 TO 33 ALIAS 2000 INTO TIPOCF==TIPOCF CODCF==CODCF
 JOIN 47 TO 34 ALIAS 3000 INTO CODART==CODART
-FROM CODNUM="B05" ANNO=#ANNO_FROM
-TO CODNUM="B05" ANNO=#ANNO_TO</sql>
+FROM CODNUM=#CODNUM_G ANNO=#ANNO_FROM
+TO CODNUM=#CODNUM_G ANNO=#ANNO_TO</sql>
 </report>

src/lv/lv0600a.uml

@@ -244,6 +244,13 @@ BEGIN
   COPY OUTPUT F_CODCAUS_A
 END
 
+STRING F_NUM_G 4
+BEGIN
+	PROMPT 2 16 "Numerazione  "
+	FIELD #CODNUM_G
+	FLAGS "H"
+END
+
 
 ENDPAGE
 ENDMASK