Alguém tem uma idéia da causa do erro "OLE error code 0x800401f3: Seqüência de classe inválida.", na quarta linha abaixo?

set classlib to SIASCFin additive
loPLANO = createobject('PLANO')
lxTOTAIS = loPLANO.ObterTotLctMes(lcMES, lcANO, dSO_ANALITICAS)
xmltocursor(lxTOTAIS, 'curTOTAIS')

Desde já agradeço,

Márcio