From 2a8f01f38d1807676ba179923cc58dae44741b1f Mon Sep 17 00:00:00 2001
From: Alessandro Bonazzi <alexbonazzi5652@gmail.com>
Date: Thu, 8 Sep 2022 11:16:18 +0200
Subject: [PATCH] Patch level         : 12.0 1090 Files correlati     : ba8.exe
 ba8300a.msk

Commento:
Corretto programma editor report
---
 src/ba/ba8300.cpp  | 7 +++++++
 src/ba/ba8300a.uml | 2 +-
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/ba/ba8300.cpp b/src/ba/ba8300.cpp
index 39f52ec14..2f8ffe6bd 100755
--- a/src/ba/ba8300.cpp
+++ b/src/ba/ba8300.cpp
@@ -567,6 +567,13 @@ bool TReport_mask::save_report()
     if (ok)
       _is_dirty = false;
   }
+	if (is_power_station())
+	{
+		DIRECTORY dir;
+
+		xvt_fsys_get_default_dir(&dir);
+		xvt_fsys_set_dir(&dir);
+	}
   return ok;
 }
 
diff --git a/src/ba/ba8300a.uml b/src/ba/ba8300a.uml
index e9725ed2f..1973ee7b2 100755
--- a/src/ba/ba8300a.uml
+++ b/src/ba/ba8300a.uml
@@ -7,7 +7,7 @@ BEGIN
   PROMPT 1 0 ""
   RSELECT ""
   WARNING "E' necessario specificare il codice"
-  CHECKTYPE REQUIRED
+//  CHECKTYPE REQUIRED
 END
 
 STRING F_DESCR 50 46