Index: BL/Flow/Offerte/Doc.cls.xml
===================================================================
diff -u -r1785 -r1798
--- BL/Flow/Offerte/Doc.cls.xml	(.../Doc.cls.xml)	(revision 1785)
+++ BL/Flow/Offerte/Doc.cls.xml	(.../Doc.cls.xml)	(revision 1798)
@@ -31,14 +31,17 @@
 	Set ToString = ..#DocName_" ("
 	
 	Set OfferteNr = $LG(lbOfferte,1)
-	Set BronType = $LG(lbOfferte,2)	
+	Set BronType = $LG(lbOfferte,2)	    ; [Review JBL  WV FOPQueue]  Onderscheid maken tussen BronType = KOF en WS :  komen resp. uit ^KOFKL en uit ^Flow.Offerte.Hoofding 
 	Set ToString = ToString _"Nr: "_OfferteNr
 	
-	If $Data(^KOFKL1(OfferteNr,"F")){
+	If $Data(^KOFKL1(OfferteNr,"F")){   ; [Review JBL  WV FOPQueue]  Dit is deel 1 (KOF) 
 		Set KLNr=$P(^KOFKL1(OfferteNr,"F"),"\")
 		Set ToString = ToString_", KlantNr: "_KLNr
 	}
-		
+	
+	; [Review JBL  WV FOPQueue]  Deel 2 (WS) 
+	; Klasse Flow.Offerte.Hoofding openen en property KlantGetObjectId() opvragen 
+	
 	Set ToString = ToString _ ", BronType: "_BronType_")"
 		
 	Quit ToString