>Dragan,
>
>Can you put together a small repro code that shows the problem?

Here it is, as simplified as can. Both classes (caller and the one with a collection) have their own error methods. First time I had this (earlier this afternoon), the caller's error code was executing; now with this example it's the method of the class where it happens - don't know what caused the difference. Still, it happens in try block, which I think shouldn't happen.

ox=CreateObject("Testcaller")

Define Class testcaller As Custom

	Procedure Init
		This.AddObject("member","hasACollection")
		this.member.setparams("Parametername","SomeValue")
	Endproc

	Procedure Error(nError, cMethod, nLine)
		Messagebox(Program())
	Endproc

Enddefine


Define Class HasACollection As Custom
	Add Object params As Collection

	Procedure Error(nError, cMethod, nLine)
		Messagebox(Program())
	Endproc

	Procedure SetParams(cName, uValue)
		Try
			oItem=This.params.Item(cName)
			oItem.Value=uValue
		Catch To oExc
			oItem=Createobject("empty")
			AddProperty(oItem,"name", cName)
			AddProperty(oItem, "value", uValue)
			This.params.Add(oItem, cName)
		Endtry
	Endproc
Enddefine