Index: BL/Flow/Proxy/pxOrderAbstract.cls.xml
===================================================================
diff -u -r29059 -r40648
--- BL/Flow/Proxy/pxOrderAbstract.cls.xml	(.../pxOrderAbstract.cls.xml)	(revision 29059)
+++ BL/Flow/Proxy/pxOrderAbstract.cls.xml	(.../pxOrderAbstract.cls.xml)	(revision 40648)
@@ -68,6 +68,7 @@
 <Method name="VoegToeBTWClausule">
 <FormalSpec>KLNr:%String</FormalSpec>
 <Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
 <Implementation><![CDATA[
 	#dim pxMemo As BL.FOP.Basis.pxTekstHTML =##class(BL.FOP.Basis.pxTekstHTML).Create("MEMO",..GeefBTWClausule(KLNr),$LB("type=PRIJS_GELDIG_BTWCLAUSULE"),1)
 	Do ..MEMO.Insert(pxMemo)
@@ -77,6 +78,7 @@
 <Method name="GeefBTWClausule">
 <FormalSpec>KLNr:%String</FormalSpec>
 <Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim BTWLabelVertalingID As %String = "BTWExcl"