Corretto errore aga006

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

ef/ef0100.cpp

@@ -139,19 +139,19 @@ void TVariazione_effetti::common_f(const TMask& m)
     rec.zero();           
     rec.put(REFF_NPROGTR, nprogtr);
     rec.put(REFF_NRIGATR, ii);
-    rec.put(REFF_IMPFATT, row.get());
     rec.put(REFF_IMPORTO, row.get());
-    rec.put(REFF_IMPFATTVAL, row.get());
     rec.put(REFF_IMPORTOVAL, row.get());
+    rec.put(REFF_CODNUM, row.get());
+    rec.put(REFF_PROVV, row.get()[0]);
+    rec.put(REFF_ANNODOC, row.get_int());
+    rec.put(REFF_NFATT, row.get());
+    rec.put(REFF_DATAFATT, row.get());
+    rec.put(REFF_IMPFATT, row.get());
+    rec.put(REFF_IMPFATTVAL, row.get());
     rec.put(REFF_ANNO, row.get_int());
     rec.put(REFF_NUMPART, row.get());
     rec.put(REFF_NRIGA, row.get_int());
     rec.put(REFF_NRATA, row.get_int());
-    rec.put(REFF_PROVV, row.get()[0]);
-    rec.put(REFF_CODNUM, row.get());
-    rec.put(REFF_ANNODOC, row.get_int());
-    rec.put(REFF_NFATT, row.get());
-    rec.put(REFF_DATAFATT, row.get());
     ii++;
   }
   _effetto->renum(_effetto->numero());
@@ -200,23 +200,23 @@ int TVariazione_effetti::read(TMask& m)
       {
         const TRectype& rec = _effetto->row_r(i);
         riga.cut(0);
-        riga.add(rec.get(REFF_IMPFATT));
         riga.add(rec.get(REFF_IMPORTO));
-        riga.add(rec.get(REFF_IMPFATTVAL));
         riga.add(rec.get(REFF_IMPORTOVAL));
-        riga.add(rec.get(REFF_ANNO));
+        riga.add(rec.get(REFF_CODNUM));
-        riga.add(rec.get(REFF_NUMPART));
-        riga.add(rec.get(REFF_NRIGA));
-        riga.add(rec.get(REFF_NRATA));
         char tipo_num = rec.get(REFF_PROVV)[0];
         if (tipo_num == 'D')
                 riga.add("Definitiva");
         else
                 riga.add("Provvisoria");
-        riga.add(rec.get(REFF_CODNUM));
         riga.add(rec.get(REFF_ANNODOC));
         riga.add(rec.get(REFF_NFATT));
         riga.add(rec.get(REFF_DATAFATT));
+        riga.add(rec.get(REFF_IMPFATT));
+        riga.add(rec.get(REFF_IMPFATTVAL));
+        riga.add(rec.get(REFF_ANNO));
+        riga.add(rec.get(REFF_NUMPART));
+        riga.add(rec.get(REFF_NRIGA));
+        riga.add(rec.get(REFF_NRATA));
         shrighe.row(i-1) = riga;
       }
     }
@@ -372,11 +372,11 @@ bool TVariazione_effetti::impeff_notify(TSheet_field& s, int r, KEY key)
   if (key == K_ENTER)
   {
         TToken_string& row = s.row(s.selected());
-        char tipo_num = row.get(8)[0];
+        char tipo_num = row.get(3)[0];
     if (tipo_num == 'D')
-        row.add("Definitiva",8);
+        row.add("Definitiva", 3);
     else
-        row.add("Provvisoria",8);
+        row.add("Provvisoria", 3);
   }
   //se rimane una sola riga nello sheet non la si può cancellare
   if (key == K_DEL && s.items() == 1)

ef/ef0100.h

@@ -43,18 +43,18 @@
 #define F_DENCOM                              105
 
 // Identificatori campi per lo spreadsheet delle Righe Effetto
-#define F_IMPFATT                             101    
+#define F_IMPEFF                              101
-#define F_IMPEFF                              102
+#define F_IMPEFFVAL                           102
-#define F_IMPFATTVAL                          103
+#define F_CODNUM                              103
-#define F_IMPEFFVAL                           104
+#define F_PROVV                               104   
-#define F_ANNO                                105
+#define F_ANNODOC                             105
-#define F_NUMPART                             106
+#define F_NUMFATT                             106
-#define F_NUMRIGA                             107
+#define F_DATAFATT                            107
-#define F_NUMRATA                             108
+#define F_IMPFATT                             108    
-#define F_PROVV  							  109 	
+#define F_IMPFATTVAL                          109
-#define F_CODNUM                              110
+#define F_ANNO                                110
-#define F_ANNODOC                             111
+#define F_NUMPART                             111
-#define F_NUMFATT                             112
+#define F_NUMRIGA                             112
-#define F_DATAFATT                            113
+#define F_NUMRATA                             113
 
 #endif  // __EF0100_H

ef/ef0100a.uml

@@ -162,20 +162,20 @@ END
 
 SPREADSHEET F_SHEET_RIGHE 0 7
 BEGIN
-  PROMPT 1 9 "RIGHE EFFETTO"
+  PROMPT 1 9 "Righe effetto"
+  ITEM "Importo effetto@14"
+  ITEM "Imp.effetto val.@14"
+  ITEM "Cod.numerazione"
+  ITEM "Numerazione"
+  ITEM "Anno fattura"
+  ITEM "Nr. fattura"
+  ITEM "Data fattura"
   ITEM "Importo fatt.@20"
-  ITEM "Importo effet.@14"
   ITEM "Imp.fatt.val.@20"
-  ITEM "Imp.effet.val.@14"
   ITEM "Anno partita"
   ITEM "Nr. partita"
   ITEM "Nr. riga"
   ITEM "Nr. rata"
-  ITEM "Numerazione"
-  ITEM "Codice numeraz."
-  ITEM "Anno fattura"
-  ITEM "Nr. fattura"
-  ITEM "Data fattura"
 END
 
 NUMBER F_TOTIMP 18 2

ef/ef0100c.uml

@@ -3,84 +3,84 @@
 
 PAGE "Righe Effetto"  -1 -1 76 16
 
-NUMBER F_IMPFATT 20 2
-BEGIN              
-  PROMPT 2 1 "Importo fattura  "
-  PICTURE "###.###.###.###,@@"
-END
-
 NUMBER F_IMPEFF 14 2
 BEGIN         
-  PROMPT 2 2  "Importo effett.  "                 
+  PROMPT 2 1 "Importo effetto  "                 
   PICTURE "###.###.###,@@"
-  NUM_EXPR #F_IMPFATT>=#F_IMPEFF
+//  NUM_EXPR #F_IMPFATT>=#F_IMPEFF
-  WARNING "L'importo dell'effetto non puo' superare l'importo della fattura"
+//  WARNING "L'importo dell'effetto non puo' superare l'importo della fattura"
-END
-
-NUMBER F_IMPFATTVAL 20 3
-BEGIN        
-  PROMPT 2 3 "Imp. fatt. val   "
-  PICTURE "###.###.###.###,@@@"
 END
 
 NUMBER F_IMPEFFVAL 15 3
 BEGIN       
-  PROMPT 2 4 "Imp. effet. val  "
+  PROMPT 2 2 "Imp.effetto val. "
   PICTURE "###.###.###,@@@"
-  NUM_EXPR #F_IMPFATTVAL>=#F_IMPEFFVAL
+//  NUM_EXPR #F_IMPFATTVAL>=#F_IMPEFFVAL
-  WARNING "L'importo dell'effetto in valuta non puo' superare l'importo della fattura in valuta"
+//  WARNING "L'importo dell'effetto in valuta non puo' superare l'importo della fattura in valuta"
 END
 
-NUMBER F_ANNO 4 
+STRING F_CODNUM 4
 BEGIN           
-  PROMPT 2 5 "Anno partita     "
+  PROMPT 2 3 "Codice numeraz.  "
-END
+  FIELD LF_REFFETTI->CODNUM
-
-STRING F_NUMPART 7
-BEGIN              
-  PROMPT 2 6 "Nr. partita      "
-  FLAG "R"
-END
-
-NUMBER F_NUMRIGA 4
-BEGIN              
-  PROMPT 2 7 "Nr. riga         "
-END
-
-NUMBER F_NUMRATA 3
-BEGIN             
-  PROMPT 2 8 "Nr. rata         "
 END
 
 LIST F_PROVV 13
 BEGIN          
-  PROMPT 2 9 "Tipo numerazione "
+  PROMPT 2 4 "Tipo numerazione "
   FIELD LF_REFFETTI->PROVV
   ITEM "D|Definitiva"
   ITEM "P|Provvisoria"
 END
 
-STRING F_CODNUM 4
-BEGIN           
-  PROMPT 2 10 "Codice numeraz.  "
-  FIELD LF_REFFETTI->CODNUM
-END
-
 NUMBER F_ANNODOC 4 
 BEGIN         
-  PROMPT 2 11 "Anno documento   "
+  PROMPT 2 5 "Anno documento   "
   FIELD LF_REFFETTI->ANNODOC
 END
 
 STRING F_NUMFATT 7
 BEGIN
-  PROMPT 2 12 "Nr. fattura      "
+  PROMPT 2 6 "Nr. fattura      "
   FLAG "R"
 END
 
 DATA F_DATAFATT
 BEGIN               
-   PROMPT  2 13 "Data fattura     "
+   PROMPT  2 7 "Data fattura     "
+END
+
+NUMBER F_IMPFATT 20 2
+BEGIN              
+  PROMPT 2 8 "Importo fattura  "
+  PICTURE "###.###.###.###,@@"
+END
+
+NUMBER F_IMPFATTVAL 20 3
+BEGIN        
+  PROMPT 2 9 "Imp. fatt. val   "
+  PICTURE "###.###.###.###,@@@"
+END
+
+NUMBER F_ANNO 4 
+BEGIN
+  PROMPT 2 10 "Anno partita     "
+END
+
+STRING F_NUMPART 7
+BEGIN              
+  PROMPT 2 11 "Nr. partita      "
+  FLAG "R"
+END
+
+NUMBER F_NUMRIGA 4
+BEGIN              
+  PROMPT 2 12 "Nr. riga         "
+END
+
+NUMBER F_NUMRATA 3
+BEGIN             
+  PROMPT 2 13 "Nr. rata         "
 END
 
 BUTTON DLG_OK 9 2