Index: APPS/CRM/impl/InlezenKlantGegevens.cls.xml =================================================================== diff -u -r1334 -r1338 --- APPS/CRM/impl/InlezenKlantGegevens.cls.xml (.../InlezenKlantGegevens.cls.xml) (revision 1334) +++ APPS/CRM/impl/InlezenKlantGegevens.cls.xml (.../InlezenKlantGegevens.cls.xml) (revision 1338) @@ -145,7 +145,7 @@ Set TaalNL = 0 Set TaalFR = 0 - For i=1 : 1 : $Length(Inhoud,LineFeed) + For i = 1 : 1 : $Length(Inhoud,LineFeed) { Set Lijn = $Piece(Inhoud,LineFeed,i) If Lijn[":" { @@ -163,7 +163,16 @@ If (Property["Adres."){ Set Object = Klant.Adres Set Property = $Piece(Property,".",2) - } + }ElseIf(Property = "Opmerking1"){ + Set i = i + 1 + Set Lijn = $Piece(Inhoud,LineFeed,i) + While (Lijn '[ ":"){ + Set Waarde = Waarde_$ZSTRIP(Lijn,"<>W") + Set i = i + 1 + Set Lijn = $Piece(Inhoud,LineFeed,i) + } + Set i = i - 1 + } /// Postcode en woonplaats opsplitsen If (Property = "Woonplaats"){ /// Belgische postcodes :