Index: FLOWTOE3.mac.rou
===================================================================
diff -u -r61588 -r61589
--- FLOWTOE3.mac.rou	(.../FLOWTOE3.mac.rou)	(revision 61588)
+++ FLOWTOE3.mac.rou	(.../FLOWTOE3.mac.rou)	(revision 61589)
@@ -608,7 +608,7 @@
  . . . . Set:($Length(Leverdag)) SortKey = ProductieService.GeefCategorie(Product.GeefID())_" "_ProductieService.GeefProductieGroep(KlantID,Product.GeefID(),ToeleveringSplitser)_" "_Leverdag
  . . 
  . . Set UniekeClassificatieCode = ##class(BL.Legacy.FLOWTOE).GeefUniekeClassificatieCode(PRNr)
- . . If ($$IsGlassetProduct(UniekeClassificatieCode) || $$IsVerzagingProduct(UniekeClassificatieCode) || $$IsCabloxProduct(UniekeClassificatieCode)) Do
+ . . If ($$IsGlassetProduct(UniekeClassificatieCode) || $$IsVerzagingProduct(UniekeClassificatieCode) || $$IsCabloxxProduct(UniekeClassificatieCode)) Do
  . . . Set Leverdag = ##class(BL.Legacy.FLOWTOE).GeefLeverdag(Toelevering,TLNr)
  . . . Set:($Length(Leverdag)) SortKey = UniekeClassificatieCode_ProductieService.GeefProductieGroep(KlantID,Product.GeefID(),ToeleveringSplitser)_" "_Leverdag
  . . 
@@ -657,5 +657,5 @@
 IsVerzagingProduct(UniekeClassificatieCode)
  Quit (UniekeClassificatieCode = "AL/DIV/DIV/MA")
  
-IsCabloxProduct(UniekeClassificatieCode)
+IsCabloxxProduct(UniekeClassificatieCode)
  Quit (UniekeClassificatieCode = "ZZ/CAB/CAB/HA")
Index: BL/Legacy/FLOWTOE.cls.xml
===================================================================
diff -u -r61588 -r61589
--- BL/Legacy/FLOWTOE.cls.xml	(.../FLOWTOE.cls.xml)	(revision 61588)
+++ BL/Legacy/FLOWTOE.cls.xml	(.../FLOWTOE.cls.xml)	(revision 61589)
@@ -186,7 +186,7 @@
 <FormalSpec>PRNr:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim ClassificatieKnoop As DOM.PM.ClassificatieKnoop = ##class(DOM.DomeinContext).Instance().GeefProductRolAPI().GeefAdministratiefProduct(PRNr).GeefClassificatieKnoop()
+	#dim ClassificatieKnoop As DOM.PM.ClassificatieKnoop = ##class(DOM.PM.impl.ProductRolAPIimpl).%New().GeefAdministratiefProduct(PRNr).GeefClassificatieKnoop()
 	Quit ClassificatieKnoop.GeefUniekeCode()
 ]]></Implementation>
 </Method>