Problem with abstract method

Hi,

i have a small problem with my abstract method.

i receive the following error messages during compilation.

Compile Error: Syntax error in user defined type declaration
Build Error: failed to compile D:/BLIde for BlitzMax/MyProjects/Tachyon Storm/XmlLabo/TestXML.bmx

here the code

Type TAction
	Method Do(p_oCurrent:ObjectIA ) abstract  
	EndMethod
End Type

Type TActionArrive Extends TAction
	Field m_oTarget:ObjectIA
	Field m_dDeceleration:Double = 1	
	Field m_dDecelerationTweaker:Double = 100.0
	
	Function Create:TActionArrive( p_bTarget:ObjectIA, p_dDeceleration:Double = 1.0, p_dDecelerationTweaker:Double = 100.0 )
		Local l_AA:TActionArrive = New TActionArrive
		l_AA.m_oTarget = p_bTarget
		l_AA.m_dDeceleration = p_dDeceleration
		l_AA.m_dDecelerationTweaker = p_dDecelerationTweaker
		Return l_AA
	EndFunction 
	
	Method Do( p_oCurrent:ObjectIA )
		p_oCurrent.Arrive( Self.m_oTarget, Self.m_dDeceleration, Self.m_dDecelerationTweaker )
	EndMethod
End Type

the focus of the compil editor still on this positionEnd type of TAction

where is my syntax error ?

help me please

thanks