From 192e94fb2c4aeaf78282a431434194c2a94f37d5 Mon Sep 17 00:00:00 2001
From: Eckhard Gosch <eckhard@eckipost.de>
Date: Tue, 8 Sep 2026 12:16:16 +0200
Subject: [PATCH] Restliche Werte aus Struktur testen z.b. TextDescription,
 Replace, DeviceAllocation, SaveFormat sowie die Parallel-Ressourcen.

---
 meddfntstp.rpgle | 64 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 64 insertions(+)

diff --git a/meddfntstp.rpgle b/meddfntstp.rpgle
index 64205a6..c4e2f8f 100644
--- a/meddfntstp.rpgle
+++ b/meddfntstp.rpgle
@@ -166,6 +166,70 @@ else;
 
 endif;
 
+//=====================================================================
+// General - additional fields
+//=====================================================================
+
+if MediaDefinition.TextDescription =
+      OriginalDefinition.TextDescription;
+
+   dsply 'PASS TextDescription';
+
+else;
+
+   dsply 'FAIL TextDescription';
+
+endif;
+
+
+if MediaDefinition.DeviceAllocation =
+      OriginalDefinition.DeviceAllocation;
+
+   dsply 'PASS DeviceAllocation';
+
+else;
+
+   dsply 'FAIL DeviceAllocation';
+
+endif;
+
+
+if MediaDefinition.SaveFormat =
+      OriginalDefinition.SaveFormat;
+
+   dsply 'PASS SaveFormat';
+
+else;
+
+   dsply 'FAIL SaveFormat';
+
+endif;
+
+
+if MediaDefinition.MaximumParallelResources =
+      OriginalDefinition.MaximumParallelResources;
+
+   dsply 'PASS MaximumParallelResources';
+
+else;
+
+   dsply 'FAIL MaximumParallelResources';
+
+endif;
+
+
+if MediaDefinition.MinimumParallelResources =
+      OriginalDefinition.MinimumParallelResources;
+
+   dsply 'PASS MinimumParallelResources';
+
+else;
+
+   dsply 'FAIL MinimumParallelResources';
+
+endif;
+
+
 
 //=====================================================================
 // Device 1