RegisterUserFunc in TestComplete

Hi Team, I want to know RegisterUserFunc is it correct or not In TestComplete? Please guide me if i am doing mistake ?
RegisterUserFunc "FindChild","SetText","SetText"
RegisterUserFunc "FindChild","SetText","SetText"

set Obj=Aliases.browser.pageWebOrdersLogin

Obj.FindChild("idStr", "ctl00_MainContent_username", 10).SetText("tester")
Obj.FindChild("idStr", "ctl00_MainContent_password", 10).SetText("test")

Function SetText(obj, text)

If obj.Exist Then

obj.Click
obj.Set text
Log.Message"SetText","1. object found . set text done :- "&text
Else
Log.Message"SetText","object not found to perform set text"
End If

End Function