Index: BL/Flow/Levering/Doc.cls.xml
===================================================================
diff -u -r56137 -r56367
--- BL/Flow/Levering/Doc.cls.xml	(.../Doc.cls.xml)	(revision 56137)
+++ BL/Flow/Levering/Doc.cls.xml	(.../Doc.cls.xml)	(revision 56367)
@@ -382,6 +382,9 @@
 	;Do:(LevDocType=$$$ldtBonWitBewijsLos) rpdSettingsForBonWitBewijsLos()
 	Do:(LevDocType=$$$ldtBonGeel         ) rpdSettingsForBonGeel()
 	Do:(LevDocType=$$$ldtBonBlanco       ) rpdSettingsForBonBlanco()
+	Do:(LevDocType=$$$ldtBonBlancoBewijs ) rpdSettingsForBonBlancoBewijs()
+	Do:(LevDocType=$$$ldtBewijsBonBlanco ) rpdSettingsForBewijsBonBlanco()
+	Do:(LevDocType=$$$ldtBonBlancoBonGeel) rpdSettingsForBonBlancoBonGeel()
 	Do:(PosPakbon="END") rpdSettingsAddPakbon()
 	Quit
 
@@ -440,6 +443,32 @@
 	Set arSettings(Key,"BonPapierSoort")="BLANCO"
 	Set arSettings(Key,"BonWithLogo")=1
 	Quit
+rpdSettingsForBonBlancoBewijs()
+	Set Key=$$rpdIncrementArrayKey("RP")   ; Set Key="RP1"
+	Set arSettings(Key,"DocDefs")=$LB(BONNr,blnShowRembours,"END")
+	Set arSettings(Key,"BonPapierSoort")="BLANCO"
+	Set arSettings(Key,"BonWithLogo")=1
+	Set arSettings(Key,"BewijsPapierSoort")="GEEL"
+	Set arSettings(Key,"BewijsWithLogo")=1
+	Quit
+rpdSettingsForBewijsBonBlanco()
+	Set Key=$$rpdIncrementArrayKey("RP")   ; Set Key="RP1"
+	Set arSettings(Key,"DocDefs")=$LB(BONNr,blnShowRembours,"BEGIN")
+	Set arSettings(Key,"BonPapierSoort")="BLANCO"
+	Set arSettings(Key,"BonWithLogo")=1
+	Set arSettings(Key,"BewijsPapierSoort")="GEEL"
+	Set arSettings(Key,"BewijsWithLogo")=1
+	Quit
+rpdSettingsForBonBlancoBonGeel()
+	Set Key=$$rpdIncrementArrayKey("RP")   ; Set Key="RP1"
+	Set arSettings(Key,"DocDefs")=$LB(BONNr,blnShowRembours)
+	Set arSettings(Key,"BonPapierSoort")="BLANCO"
+	Set arSettings(Key,"BonWithLogo")=1
+	Set Key=$$rpdIncrementArrayKey("RP")   ; Set Key="RP2"
+	Set arSettings(Key,"DocDefs")=$LB(BONNr,0)
+	Set arSettings(Key,"BonPapierSoort")="GEEL"
+	Set arSettings(Key,"BonWithLogo")=1
+	Quit
 rpdSettingsAddPakbon()
 	Set Key=$$rpdIncrementArrayKey("RP")
 	Set arSettings(Key,"RenderDoc")="Pakbon"