Index: APPS/Halux/Planning/Pitching/impl/BatchPitchExportedRepository.cls.xml =================================================================== diff -u -r71902 -r73348 --- APPS/Halux/Planning/Pitching/impl/BatchPitchExportedRepository.cls.xml (.../BatchPitchExportedRepository.cls.xml) (revision 71902) +++ APPS/Halux/Planning/Pitching/impl/BatchPitchExportedRepository.cls.xml (.../BatchPitchExportedRepository.cls.xml) (revision 73348) @@ -71,6 +71,20 @@ + + +BatchId:%Integer +%Boolean + + Index: vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml =================================================================== diff -u -r73344 -r73348 --- vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml (.../BatchPitchedRepository.cls.xml) (revision 73344) +++ vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml (.../BatchPitchedRepository.cls.xml) (revision 73348) @@ -49,13 +49,6 @@ ]]> - -BatchId:%Integer -%Boolean - - - TECH.Persistent - - -BatchId:%Integer -%Boolean - - Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml =================================================================== diff -u -r73344 -r73348 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml (.../BatchNaarObjective.cls.xml) (revision 73344) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml (.../BatchNaarObjective.cls.xml) (revision 73348) @@ -30,8 +30,8 @@ 1 - -APPS.Halux.Planning.Pitching.impl.BatchPitchedRepository + +APPS.Halux.Planning.Pitching.impl.BatchPitchExportedRepository 1 @@ -47,7 +47,7 @@ Set ..MESService = ##class(APPS.Halux.PPS.MES.MESService).%New() Set ..Logger = ##class(vhLib.Logger).%New("APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective") Set ..MailApi = $$$Inject(MailApi, ##class(TECH.Context).Instance().GeefMailAPI()) - Set ..BatchPitchedRepository = ##class(APPS.Halux.Planning.Pitching.impl.BatchPitchedRepository).%New() + Set ..BatchPitchExportedRepository = ##class(APPS.Halux.Planning.Pitching.impl.BatchPitchExportedRepository).%New() Quit $$$OK ]]> @@ -71,7 +71,7 @@ Set UitvoeringInfoIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijstGesplitst) #dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo = Lijst.GetAt(1) - #dim IsBatchAlGepitched As %Boolean = ..BatchPitchedRepository.IsBatchGepitched(UitvoeringInfo.BatchID) + #dim IsBatchAlGepitched As %Boolean = ..BatchPitchExportedRepository.IsBatchGepitched(UitvoeringInfo.BatchID) #dim FilterToeleveringId As %String = "" If (IsBatchAlGepitched) { Index: vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchExportedRepository.cls.xml =================================================================== diff -u -r71732 -r73348 --- vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchExportedRepository.cls.xml (.../BatchPitchExportedRepository.cls.xml) (revision 71732) +++ vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchExportedRepository.cls.xml (.../BatchPitchExportedRepository.cls.xml) (revision 73348) @@ -70,6 +70,13 @@ ]]> + +BatchId:%Integer +%Boolean + + + TECH.Persistent + +BatchId:%Integer +%Boolean + + + Data:TECH.Persistent - + @@ -70,14 +76,12 @@ ID:%String - + Data:TECH.Persistent - +