Index: DOM/AKP/impl/DataM/DataMLeverancier.cls.xml
===================================================================
diff -u -r29059 -r34517
--- DOM/AKP/impl/DataM/DataMLeverancier.cls.xml	(.../DataMLeverancier.cls.xml)	(revision 29059)
+++ DOM/AKP/impl/DataM/DataMLeverancier.cls.xml	(.../DataMLeverancier.cls.xml)	(revision 34517)
@@ -255,6 +255,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefBIC">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $Piece(^DATA(0,"SWIFT",$Piece(..Data2,"\",5),0),"\",1)
+]]></Implementation>
+</Method>
+
 <Method name="Data0Get">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>