From 907d50e59e5df962b56ae039b98b49c177918946 Mon Sep 17 00:00:00 2001 From: smen Date: Fri, 17 Mar 2023 14:47:31 +0100 Subject: [PATCH] Patch level : 12.0 Files correlati : m77 Commento: Modificata la logica di esecuzione in caso di operazione di annullamento in modo che esporti solo i record di tipo D. Precedentemente venivano esportati sia i tipi record D che H. --- src/m770/777200.cpp | 5 +++-- src/m770/777200.h | 2 ++ 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/src/m770/777200.cpp b/src/m770/777200.cpp index 4e41d1924..03e43af3c 100755 --- a/src/m770/777200.cpp +++ b/src/m770/777200.cpp @@ -1293,8 +1293,9 @@ void TCU_app::main_loop() for (bool ok = perc.move_first(); ok; ok = perc.move_next()) { - t.append_record_d(rec, log); - t.append_record_h(rec, modulo, log); + t.append_record_d(rec, log); + if (t.get_operazione() != 'A') + t.append_record_h(rec, modulo, log); pp.add_status(); } } diff --git a/src/m770/777200.h b/src/m770/777200.h index 210d06646..1673bd2ed 100644 --- a/src/m770/777200.h +++ b/src/m770/777200.h @@ -74,6 +74,8 @@ public: void set_inter(const TString& interm, const TDate& dtimp, int year) { _codfis_int = interm; _data_imp = dtimp; _anno = year; } void set_operazione(char t, const TString& iden); + const char get_operazione() { return _tipo_operazione; } + bool append_record_b(); bool append_record_d(const TRectype& rec, TLog_report& log); bool append_record_h(const TRectype& rec, int modulo, TLog_report& log);