Index: DCTOE.mac.rou
===================================================================
diff -u -r59832 -r74416
--- DCTOE.mac.rou	(.../DCTOE.mac.rou)	(revision 59832)
+++ DCTOE.mac.rou	(.../DCTOE.mac.rou)	(revision 74416)
@@ -410,7 +410,7 @@
  Do:PRNr
  . Set GenTyp=$$GENTYP^HAD(PRNr)
  . Set ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()
- . If ((($P(GenTyp,D,1,2) = "TBX\BBX") && ('ProductTypeAPI.IsHangmapLade(PRNr))) || ($P(GenTyp,D)'="TBX")),$P(GenTyp,D)'="KAD",$P(GenTyp,D,2)'="GRP" Set LijnBevatDetail=1
+ . If ((($P(GenTyp,D,1,2) = "TBX\BBX") && ('ProductTypeAPI.IsHangmapLade(PRNr))) || ($P(GenTyp,D)'="TBX")),'ProductTypeAPI.IsInkortingProduct(PRNr),$P(GenTyp,D)'="KAD",$P(GenTyp,D,2)'="GRP" Set LijnBevatDetail=1
  . Else  Set LijnBevatDetail=0
  Quit $G(LijnBevatDetail)
  ;