diff --git a/meddfntstp.rpgle b/meddfntstp.rpgle index 8642a8e..6db7eb9 100644 --- a/meddfntstp.rpgle +++ b/meddfntstp.rpgle @@ -680,25 +680,16 @@ return; // // BuildTestDefinition // -// Builds: -// -// 2 Devices +// Builds a TAPE0200 test definition with: // // Device 1 -// Media File 1 -// DAK066 -// DAK067 -// Media File 2 -// DAK079 -// DAK080 +// Media File 1 -> 0 Volumes +// Media File 2 -> 1 Volume +// Media File 3 -> 3 Volumes // // Device 2 -// Media File 1 -// DAK089 -// DAK090 -// Media File 2 -// DAK091 -// DAK092 +// Media File 1 -> 1 Volume +// Media File 2 -> 3 Volumes // //===================================================================== @@ -740,19 +731,20 @@ dcl-proc BuildTestDefinition; 2; - //--------------------------------------------------------------- - // Device 1 / Resource 1 - //--------------------------------------------------------------- + //================================================================= + // Device 1 + //================================================================= MediaDefinition.Device(1).DeviceName = 'TAPMLBBRMS'; MediaDefinition.Device(1).NumberOfMediaFiles = - 2; + 3; //--------------------------------------------------------------- // Device 1 / Media File 1 + // 0 Volumes //--------------------------------------------------------------- MediaDefinition.Device(1) @@ -763,28 +755,17 @@ dcl-proc BuildTestDefinition; MediaDefinition.Device(1) .MediaFile(1) .StartingPositionInFile = - 'START-DEVICE1-MEDIAFILE1'; + *ALL'0'; MediaDefinition.Device(1) .MediaFile(1) .NumberOfVolumeIdentifiers = - 2; - - MediaDefinition.Device(1) - .MediaFile(1) - .VolumeIdentifier(1) - .VolumeIdentifier = - 'DAK066'; - - MediaDefinition.Device(1) - .MediaFile(1) - .VolumeIdentifier(2) - .VolumeIdentifier = - 'DAK067'; + 0; //--------------------------------------------------------------- // Device 1 / Media File 2 + // 1 Volume //--------------------------------------------------------------- MediaDefinition.Device(1) @@ -795,29 +776,62 @@ dcl-proc BuildTestDefinition; MediaDefinition.Device(1) .MediaFile(2) .StartingPositionInFile = - 'START-DEVICE1-MEDIAFILE2'; + *ALL'1'; MediaDefinition.Device(1) .MediaFile(2) .NumberOfVolumeIdentifiers = - 2; + 1; MediaDefinition.Device(1) .MediaFile(2) .VolumeIdentifier(1) .VolumeIdentifier = - 'DAK079'; + 'D1M2V1'; + + + //--------------------------------------------------------------- + // Device 1 / Media File 3 + // 3 Volumes + //--------------------------------------------------------------- MediaDefinition.Device(1) - .MediaFile(2) + .MediaFile(3) + .SequenceNumber = + 2; + + MediaDefinition.Device(1) + .MediaFile(3) + .StartingPositionInFile = + *ALL'2'; + + MediaDefinition.Device(1) + .MediaFile(3) + .NumberOfVolumeIdentifiers = + 3; + + MediaDefinition.Device(1) + .MediaFile(3) + .VolumeIdentifier(1) + .VolumeIdentifier = + 'D1M3V1'; + + MediaDefinition.Device(1) + .MediaFile(3) .VolumeIdentifier(2) .VolumeIdentifier = - 'DAK080'; + 'D1M3V2'; + + MediaDefinition.Device(1) + .MediaFile(3) + .VolumeIdentifier(3) + .VolumeIdentifier = + 'D1M3V3'; - //--------------------------------------------------------------- - // Device 2 / Resource 2 - //--------------------------------------------------------------- + //================================================================= + // Device 2 + //================================================================= MediaDefinition.Device(2).DeviceName = 'TAPMLBBRMS'; @@ -828,6 +842,7 @@ dcl-proc BuildTestDefinition; //--------------------------------------------------------------- // Device 2 / Media File 1 + // 1 Volume //--------------------------------------------------------------- MediaDefinition.Device(2) @@ -838,28 +853,23 @@ dcl-proc BuildTestDefinition; MediaDefinition.Device(2) .MediaFile(1) .StartingPositionInFile = - 'START-DEVICE2-MEDIAFILE1'; + *ALL'3'; MediaDefinition.Device(2) .MediaFile(1) .NumberOfVolumeIdentifiers = - 2; + 1; MediaDefinition.Device(2) .MediaFile(1) .VolumeIdentifier(1) .VolumeIdentifier = - 'DAK089'; - - MediaDefinition.Device(2) - .MediaFile(1) - .VolumeIdentifier(2) - .VolumeIdentifier = - 'DAK090'; + 'D2M1V1'; //--------------------------------------------------------------- // Device 2 / Media File 2 + // 3 Volumes //--------------------------------------------------------------- MediaDefinition.Device(2) @@ -870,23 +880,29 @@ dcl-proc BuildTestDefinition; MediaDefinition.Device(2) .MediaFile(2) .StartingPositionInFile = - 'START-DEVICE2-MEDIAFILE2'; + *ALL'4'; MediaDefinition.Device(2) .MediaFile(2) .NumberOfVolumeIdentifiers = - 2; + 3; MediaDefinition.Device(2) .MediaFile(2) .VolumeIdentifier(1) .VolumeIdentifier = - 'DAK091'; + 'D2M2V1'; MediaDefinition.Device(2) .MediaFile(2) .VolumeIdentifier(2) .VolumeIdentifier = - 'DAK092'; + 'D2M2V2'; + + MediaDefinition.Device(2) + .MediaFile(2) + .VolumeIdentifier(3) + .VolumeIdentifier = + 'D2M2V3'; end-proc; \ No newline at end of file