From a039f14a360ed387cb0a5eb7ab6f085d8c4a676b Mon Sep 17 00:00:00 2001
From: guy <guy@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 3 Nov 1998 09:38:58 +0000
Subject: [PATCH] Patch level         : Files correlati     : Ricompilazione
 Demo : [ ] Commento            : 777200.cpp           Azzerato record 770
 prima di trasferirlo                      per evitare sovrapposizioni di
 campi precedenti

git-svn-id: svn://10.65.10.50/trunk@7385 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 m770/777200.cpp | 25 ++++++++++++-------------
 1 file changed, 12 insertions(+), 13 deletions(-)

diff --git a/m770/777200.cpp b/m770/777200.cpp
index 86030b11e..a62e20404 100755
--- a/m770/777200.cpp
+++ b/m770/777200.cpp
@@ -46,8 +46,9 @@ protected:
   int first();
   int next();
 
-  void transfer_section(TPrint_section& body, int rigo,
-                        TRecordDylog& rec, TTrasferimentoDylog& file);
+  void transfer_section(TPrint_section& body,
+                        TRecordDylog& rec, 
+                        TTrasferimentoDylog& file);
   char log2rec(int num, int& rpm) const;
 
 protected:
@@ -168,8 +169,9 @@ public:
 // TFormDylog
 ///////////////////////////////////////////////////////////
 
-void TFormDylog::transfer_section(TPrint_section& body, int rigo,
-                                TRecordDylog& rec, TTrasferimentoDylog& file)
+void TFormDylog::transfer_section(TPrint_section& body,
+                                  TRecordDylog& rec, 
+                                  TTrasferimentoDylog& file)
 {
   TToken_string trc(16, ',');
   TString80 str;
@@ -325,22 +327,19 @@ long TFormDylog::trasfer(long codditta, TTrasferimentoDylog& file, const char* t
   {
     cur.freeze(TRUE);    // Per efficienza congela il cursore
 
-    // Inizializza record col primo modulo
-    TRecordDylog rec(tipo);
-    int rigo = 0;
-
     int err = first();   // Deve sempre tornare NOERR
     CHECKS(err == NOERR, "Invalid cursor ", tipo);
 
-    TPrint_section& head = section('H', first_page);
-    transfer_section(head, rigo, rec, file);
-    
+    TPrint_section& head = section('H', first_page); 
     TPrint_section& body = section('B', odd_page);
+   
     for (; err == NOERR; err = next())
     {
-      transfer_section(body, rigo, rec, file);
+      // Inizializza record col primo modulo
+      TRecordDylog rec(tipo);
+      transfer_section(head, rec, file);
+      transfer_section(body, rec, file);
       file << rec;
-      rigo++;
     }
     
     cur.freeze(FALSE);