Index: APPS/CRM/impl/InlezenKlantGegevens.cls.xml
===================================================================
diff -u -r1338 -r1340
--- APPS/CRM/impl/InlezenKlantGegevens.cls.xml	(.../InlezenKlantGegevens.cls.xml)	(revision 1338)
+++ APPS/CRM/impl/InlezenKlantGegevens.cls.xml	(.../InlezenKlantGegevens.cls.xml)	(revision 1340)
@@ -182,11 +182,18 @@
 				    If ((Deel1?4.N) && '(Deel3?2.A)){
 						 set $zobjProperty(Object,"Postcode")=Deel1
 						 set $zobjProperty(Object,Property)=Deel2
+						 set $zobjProperty(Object,"LandNr")=1019
 					}
 					/// Nederlandse postcodes :
 					ElseIf ((($Length(Deel1)=6) && (Deel1?4.N2.A)) || (($Length(Deel1)=4) && ($Length(Deel3)=2) && (Deel1?4.N) && (Deel3?2.A))){
+						If ($Length(Deel1)=6){
+							Set Deel3 = ""
+						}Else{
+							Set Deel2 = $Piece(Waarde," ",3,99)			
+						}
 						set $zobjProperty(Object,"Postcode")=Deel1_Deel3
 						set $zobjProperty(Object,Property)=Deel2
+						set $zobjProperty(Object,"LandNr")=1147
 					}Else{
 						set $zobjProperty(Object,Property)=Waarde
 					}