Index: vhCARETAKER.mac.rou =================================================================== diff -u -r40810 -r43122 --- vhCARETAKER.mac.rou (.../vhCARETAKER.mac.rou) (revision 40810) +++ vhCARETAKER.mac.rou (.../vhCARETAKER.mac.rou) (revision 43122) @@ -281,6 +281,7 @@ ImportBlumXMLFacturen ; Import Blum Fakturen try { Do InitRuntimeContext + do ##class(TECH.Context.RuntimeContext).Instance().ZetApplicatie("AankoopControle") do ##class(APPS.AKP.AankoopControle.BLUM.impl.FactuurBerichtOntvanger).%New().Ontvang() } catch(Exceptie) { Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvangerV2/Ontvang/Test.cls.xml =================================================================== diff -u -r40226 -r43122 --- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvangerV2/Ontvang/Test.cls.xml (.../Test.cls.xml) (revision 40226) +++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvangerV2/Ontvang/Test.cls.xml (.../Test.cls.xml) (revision 43122) @@ -18,6 +18,8 @@ Set ..VolledigeBestandNaam1 = ..GeefDespatchFileLocatie() _"DESADV_1234567891_dummy.xml" ; Set ..VolledigeBestandNaam2 = ..GeefDespatchFileLocatie() _"DESADV_1234567892_dummy.xml" ; Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("MSMGATEWAY",..GeefBestandLocatie(),..#Applicatie) + Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("AankoopOrderResponse.BLUM.ImportXML",1,..#Applicatie) + Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("AankoopOrderResponse.BLUM.ImportSAPBasedXML",1,..#Applicatie) ]]> Index: BLIMP.mac.rou =================================================================== diff -u -r38657 -r43122 --- BLIMP.mac.rou (.../BLIMP.mac.rou) (revision 38657) +++ BLIMP.mac.rou (.../BLIMP.mac.rou) (revision 43122) @@ -32,6 +32,7 @@ Quit SCAN ; Achtergrond job dat alle EDI-bestanden verwerkt + do ##class(TECH.Context.RuntimeContext).Instance().ZetApplicatie("AankoopControle") Do ##class(APPS.EDIExport.AankoopOrderResponse.BLUM.impl.Ontvanger).%New().Ontvang() Do ##class(APPS.AKP.AankoopControle.BLUM.impl.DespatchBerichtOntvanger).%New().Ontvang() Do ##class(APPS.AKP.AankoopControle.BLUM.impl.DespatchBerichtOntvangerV2).%New().Ontvang() @@ -158,4 +159,3 @@ - Index: vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvanger/Ontvang/Test.cls.xml =================================================================== diff -u -r43050 -r43122 --- vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvanger/Ontvang/Test.cls.xml (.../Test.cls.xml) (revision 43050) +++ vhUnitTest/APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvanger/Ontvang/Test.cls.xml (.../Test.cls.xml) (revision 43122) @@ -8,15 +8,7 @@ - - - -aTestName:%String - Index: APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvanger.cls.xml =================================================================== diff -u -r38653 -r43122 --- APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvanger.cls.xml (.../DespatchBerichtOntvanger.cls.xml) (revision 38653) +++ APPS/AKP/AankoopControle/BLUM/impl/DespatchBerichtOntvanger.cls.xml (.../DespatchBerichtOntvanger.cls.xml) (revision 43122) @@ -3,11 +3,6 @@ TECH.RegisteredObject - -%String -AankoopControle - - TECH.XMLCorrelater 1 @@ -45,7 +40,6 @@ %Status 1 TECH.RegisteredObject - -%String -AankoopControle - - APPS.AKP.AankoopControle.BLUM.INVOIC02Verwerker 1 @@ -39,7 +34,6 @@ %Status 1 TECH.RegisteredObject - -%String -AankoopControle - - TECH.XMLCorrelater 1 @@ -44,7 +39,6 @@ %Status 1 TECH.RegisteredObject - -%String -AankoopControle - - TECH.XMLCorrelater 1 @@ -50,7 +45,6 @@ %Status 1