TECH.Mockable APPS.Halux.Planning.Pitching.impl.BatchPitchedRepository 1 APPS.Halux.Planning.Pitching.impl.BatchPitchExportedRepository 1 %Integer 100 BatchPitchedRepository:APPS.Halux.Planning.Pitching.impl.BatchPitchedRepository="",BatchPitchExportedRepository:APPS.Halux.Planning.Pitching.impl.BatchPitchExportedRepository="" 1 1 %Status 1 PitchedBatch:APPS.Halux.Planning.Pitching.dto.BatchPitched %Integer PitchedBatch:APPS.Halux.Planning.Pitching.dto.BatchPitched 1 %Boolean PitchedBatch:APPS.Halux.Planning.Pitching.dto.BatchPitched 1 %Boolean PitchedBatch:APPS.Halux.Planning.Pitching.dto.BatchPitched %Integer PitchedBatch:APPS.Halux.Planning.Pitching.dto.BatchPitched 1 %Integer PitchedBatch:APPS.Halux.Planning.Pitching.dto.BatchPitched 1 %Integer LijnNummer:%Integer 1 %Integer PitchOrde:%Integer,LijnNummer:%Integer 1 APPS.Halux.Planning.Pitching.dto.BatchPitched 1 ) { Set Exception = ##class(TECH.Exceptions.DataCorruptException).%New("Meerdere geptichte batches gevonden voor pitchorde '" _ PitchOrde _ "' en Lijnnummer '" _ LijnNummer _ "'.") do ##class(TECH.ExceptionHandler).Throw(Exception) } Quit GepitchteBatch ]]> BatchId:%String 1 APPS.Halux.Planning.Pitching.dto.BatchPitchExported 1 ) { Set Exception = ##class(TECH.Exceptions.DataCorruptException).%New("Meerdere ge-exporteerde batches gevonden voor batchid '" _ BatchId _ "'.") do ##class(TECH.ExceptionHandler).Throw(Exception) } Quit BatchPitchExported ]]>