From 58d00a9a8731c8d19c7a3ec8e0681f30b2e1f1a0 Mon Sep 17 00:00:00 2001 From: Eckhard Gosch Date: Tue, 8 Sep 2026 14:32:01 +0200 Subject: [PATCH] test StartingPositionInFile <> 0 --- meddfntstp.rpgle | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/meddfntstp.rpgle b/meddfntstp.rpgle index e82a628..7f6b7f5 100644 --- a/meddfntstp.rpgle +++ b/meddfntstp.rpgle @@ -795,7 +795,7 @@ dcl-proc BuildTestDefinition; MediaDefinition.Device(1) .MediaFile(2) .StartingPositionInFile = - *ALL'0'; + *ALL'1'; MediaDefinition.Device(1) .MediaFile(2) @@ -870,7 +870,7 @@ dcl-proc BuildTestDefinition; MediaDefinition.Device(2) .MediaFile(2) .StartingPositionInFile = - *ALL'0'; + *ALL'1'; MediaDefinition.Device(2) .MediaFile(2)