Index: HADWIZ.mac.rou
===================================================================
diff -u -r64318 -r66928
--- HADWIZ.mac.rou	(.../HADWIZ.mac.rou)	(revision 64318)
+++ HADWIZ.mac.rou	(.../HADWIZ.mac.rou)	(revision 66928)
@@ -104,14 +104,17 @@
  
 DISPLAY(PRNr,Aantal,Munt) 
  New HalID,Groep,GenTyp,ProductTypeAPI
+ New IsKaderdeurProduct,KaderdeurViaBullzipPdf
  Set:'$G(Aantal) Aantal=1
  Set:'$L($G(Munt)) Munt="EUR"
  Do STORE^vhTERMINA()
  
  #dim Groep,HalID As %String
  #dim ProductTypeAPI As DOM.PM.ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()
- If (ProductTypeAPI.IsLegraboxProduct(PRNr)) || (ProductTypeAPI.IsTAORboxProduct(PRNr) ) || (ProductTypeAPI.IsMerivoboxProduct(PRNr) ) {
-	 #dim BestandLocatie As %String = ##class(BL.Legacy.HADWIZ).%New().GenereerProductDetailBlad(PRNr)
+ #dim IsKaderdeurProduct As %Boolean = ProductTypeAPI.IsKaderdeurProduct(PRNr)
+ Set KaderdeurViaBullzipPdf = (IsKaderdeurProduct) && (##class(BL.Legacy.HADWIZ).IsInetpubFolderBeschikbaar())
+ If (ProductTypeAPI.IsLegraboxProduct(PRNr)) || (ProductTypeAPI.IsTAORboxProduct(PRNr) ) || (ProductTypeAPI.IsMerivoboxProduct(PRNr) || (KaderdeurViaBullzipPdf) ) {
+	 #dim BestandLocatie As %String = ##class(BL.Legacy.HADWIZ).%New().GenereerProductDetailBlad(PRNr, IsKaderdeurProduct)
 	 Do:(BestandLocatie'="") DisplayDoc(BestandLocatie) 
 	 Do REFRESH^vhTERMINA()
 	 Quit