Perguntas Erro Work area not in use

Bom dia,
Estou com um pequeno problema, fiz um função que é chamada através de um gatilho, essa função me retorna um único dado, porém da erro em um gatilho padrão da Totvs:
"Erro no Gatilho: C7_PRODUTO Sec.001 - Work area not in use"

Alguem saberia me dizer como eu conseguiria resolver esse problema? Se eu não chamar minha função não apresenta esse erro, segue print dos dois gatilho e treco onde executo a query;
cSQL := ChangeQuery(cSQL)
//HS_MSGINF(cSQL,"","")
TCQUERY cSQL NEW ALIAS "QRYB1"

DbSelectArea("QRYB1")
DbGoTop()

while !Eof()
nRet := QRYB1->CONV
DbSelectArea("QRYB1")
DBSKIP()
end
DbSelectArea("QRYB1")
DbCloseArea()

Boa tarde!

Acabei esquecendo de responder, consegui resolver o problema colocando uma variável
Local aAreaX := GetArea() e no final um RestArea(aAreaX)