Sergey i know it's a strange one

oconnect have Conectar(), Procura_Cliente(), Procura_Unica(), i see that with my eyes now :), the class inicialization is
in Form:Load

with thisform
.oConnect = createobject('gc_DataLayer.DataLayer')
endwith