14:23:29.344 - EXCEÇÃO NÃO TRATADA!
Erro: 7000
Classe: Excecaoprograma
Mesagem: File cannot be closed because outstanding references exist.
Chamadas:Linha:99 - construtor.adicionarsetprocedure - construtor.prg
Linha:53 - construtor.criar - construtor.prg
Linha:75 - reservalote.init - reservalote.prg
Linha:60 - construtor.criar - construtor.prg
Linha:283 - controlelote.buscar - controlelote.prg
Linha:37 - controlelote_unit.testunit01 - controlelote_unit.prg
Linha:236 - controlelote_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Conteúdo: SET PROCEDURE TO &lcFxp ADDITIVE
Executando TestUnit: CONTROLELOTE_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:324 - controlelote.buscar - controlelote.prg
Linha:37 - controlelote_unit.testunit01 - controlelote_unit.prg
Linha:236 - controlelote_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()