Index: vhTest/Fake/CHUI/VKP/OrderIngave/OrderSluiter.cls.xml
===================================================================
diff -u -r47882 -r48028
--- vhTest/Fake/CHUI/VKP/OrderIngave/OrderSluiter.cls.xml	(.../OrderSluiter.cls.xml)	(revision 47882)
+++ vhTest/Fake/CHUI/VKP/OrderIngave/OrderSluiter.cls.xml	(.../OrderSluiter.cls.xml)	(revision 48028)
@@ -8,16 +8,15 @@
 <Super>CHUI.VKP.OrderIngave.OrderSluiter</Super>
 
 <Method name="KanOrderSluiten">
-<FormalSpec>ORDNr:%String,KLNr:%String</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
 
 <Method name="Sluit">
-<FormalSpec>ORDNr:%String,KLNr:%String,KlantObject:%CacheString</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<FormalSpec>ORDNr:%String,KLNr:%String="",KlantObject:%CacheString=""</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>
 
Index: vhTest/Mock/CHUI/VKP/OrderIngave/OrderSluiter.cls.xml
===================================================================
diff -u -r47882 -r48028
--- vhTest/Mock/CHUI/VKP/OrderIngave/OrderSluiter.cls.xml	(.../OrderSluiter.cls.xml)	(revision 47882)
+++ vhTest/Mock/CHUI/VKP/OrderIngave/OrderSluiter.cls.xml	(.../OrderSluiter.cls.xml)	(revision 48028)
@@ -9,14 +9,14 @@
 <Inheritance>right</Inheritance>
 
 <Method name="KanOrderSluiten">
-<FormalSpec>ORDNr:%String,KLNr:%String</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("KanOrderSluiten",ORDNr,KLNr)
 ]]></Implementation>
 </Method>
 
 <Method name="Sluit">
-<FormalSpec>ORDNr:%String,KLNr:%String,KlantObject:%CacheString</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String="",KlantObject:%CacheString=""</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("Sluit",ORDNr,KLNr,KlantObject)
 ]]></Implementation>
 </Method>
Index: CHUI/VKP/OrderIngave/OrderSluiter.cls.xml
===================================================================
diff -u -r47882 -r48028
--- CHUI/VKP/OrderIngave/OrderSluiter.cls.xml	(.../OrderSluiter.cls.xml)	(revision 47882)
+++ CHUI/VKP/OrderIngave/OrderSluiter.cls.xml	(.../OrderSluiter.cls.xml)	(revision 48028)
@@ -5,14 +5,14 @@
 
 <Method name="KanOrderSluiten">
 <Abstract>1</Abstract>
-<FormalSpec>ORDNr:%String,KLNr:%String</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String=""</FormalSpec>
 <ProcedureBlock>0</ProcedureBlock>
 <ReturnType>%Boolean</ReturnType>
 </Method>
 
 <Method name="Sluit">
 <Abstract>1</Abstract>
-<FormalSpec>ORDNr:%String,KLNr:%String,KlantObject:%CacheString</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String="",KlantObject:%CacheString=""</FormalSpec>
 <ProcedureBlock>0</ProcedureBlock>
 </Method>
 </Class>
Index: CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01.cls.xml
===================================================================
diff -u -r47602 -r48028
--- CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01.cls.xml	(.../TijdelijkOrderSluiterv01.cls.xml)	(revision 47602)
+++ CHUI/VKP/OrderIngave/TijdelijkOrderSluiterv01.cls.xml	(.../TijdelijkOrderSluiterv01.cls.xml)	(revision 48028)
@@ -45,7 +45,7 @@
 </Method>
 
 <Method name="Sluit">
-<FormalSpec>ORDNr:%String,KLNr:%String,KlantObject:%CacheString</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String="",KlantObject:%CacheString=""</FormalSpec>
 <Implementation><![CDATA[
 	#dim Bezwaren as %ListOfDataTypes = ..GeefOrderSluitenBezwaren(ORDNr)
 	if Bezwaren.Count() {
@@ -63,7 +63,7 @@
 <Method name="KanOrderSluiten">
 <Description>
 KLNr voor compatibiliteit met CHUI.VKP.OrderIngave.OrderSluiterv01</Description>
-<FormalSpec>OrderNr:%String,KLNr:%String</FormalSpec>
+<FormalSpec>OrderNr:%String,KLNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	#dim Bezwaren as %ListOfDataTypes = ..GeefOrderSluitenBezwaren(OrderNr)
Index: CHUI/VKP/OrderIngave/OrderSluiterv01.cls.xml
===================================================================
diff -u -r47604 -r48028
--- CHUI/VKP/OrderIngave/OrderSluiterv01.cls.xml	(.../OrderSluiterv01.cls.xml)	(revision 47604)
+++ CHUI/VKP/OrderIngave/OrderSluiterv01.cls.xml	(.../OrderSluiterv01.cls.xml)	(revision 48028)
@@ -22,7 +22,7 @@
 </Method>
 
 <Method name="KanOrderSluiten">
-<FormalSpec>ORDNr:%String,KLNr:%String</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String=""</FormalSpec>
 <ProcedureBlock>0</ProcedureBlock>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
@@ -38,7 +38,7 @@
 LET OP: DEZE SUBROUTINE WORDT AANGEROEPEN BIJ HET SLUITEN VAN HET "MAAK/WIJZIG ORDER" SCHERM.
 DE VARIABELE Closed=True BETEKENT DAT HET ORDER VROEGER AL EENS "GESLOTEN" IS GEWEEST, IN DE BETEKENIS VAN "BEVESTIGD, GECOMMIT, ...".
 DUS ZAKEN DIE SLECHTS 1x MOGEN GEBEUREN WANNEER OV HET ORDER SLUIT/VRIJGEEFT/COMMIT, MOETEN MET EEN Do:'Closed VOORWAARDE!</Description>
-<FormalSpec>ORDNr:%String,KLNr:%String,KlantObject:%CacheString</FormalSpec>
+<FormalSpec>ORDNr:%String,KLNr:%String="",KlantObject:%CacheString=""</FormalSpec>
 <ProcedureBlock>0</ProcedureBlock>
 <Implementation><![CDATA[
  New zb,R,OrdDat,Closed,TLNr,OLNr,Data,IntPers,ExtPers,FaxNrOrEmail,DevNr,KredLock,Created,LEVNr,DueOutOk,ORDNrs,TempORDNr,OrdBev,FaxType,Exit,BevatMaatWerk,KlantID,OrderBevestiger