Index: APPS/VKP/Korting/impl/EDIVerwerker.cls.xml
===================================================================
diff -u -r65537 -r65538
--- APPS/VKP/Korting/impl/EDIVerwerker.cls.xml	(.../EDIVerwerker.cls.xml)	(revision 65537)
+++ APPS/VKP/Korting/impl/EDIVerwerker.cls.xml	(.../EDIVerwerker.cls.xml)	(revision 65538)
@@ -74,12 +74,13 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Verwerker:APPS.common.EDI.EDIVerwerker="",KortingFactory:APPS.VKP.Korting.KortingFactory,FtpApi:TECH.Ftp.FtpAPI="",ConfigMgr:TECH.Config.ConfigMgr=""</FormalSpec>
+<FormalSpec>Verwerker:APPS.common.EDI.EDIVerwerker="",KortingFactory:APPS.VKP.Korting.KortingFactory,FtpApi:TECH.Ftp.FtpAPI="",ConfigMgr:TECH.Config.ConfigMgr="",ProjectSettingsAPI:DOM.common.ProjectSettingsAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Do ##super(Verwerker)
+	Set ..ProjectSettingsAPI = $$$Inject(ProjectSettingsAPI,##class(DOM.common.impl.ProjectSettingsAPI).%New())
 	Set ..KortingFactory = $$$Implementation(KortingFactory,##class(APPS.VKP.Korting.impl.KortingFactory).%New())
 	If ..ProjectSettingsAPI.IsActiefBiztalkSFTP() {
 		Set ..FtpApi = $$$Inject(FtpApi, ##class(TECH.Ftp.impl.SFtpApiBiztalkBased).%New("BiztalkExportDirectory"))