14:24:46.609 - EXCEÇÃO NÃO TRATADA!
Erro: 1925
Mesagem: Unknown member _OITENSPEDIDO.
Local: obterprecotinta
Linha: 291
Conteúdo: FOR lnPos = 1 TO THIS._oItensPedido.ObterQuantidade()
Detalhes: _OITENSPEDIDO
Executando TestUnit: CONTROLETINTA_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:301 - controletinta.obterprecotinta - controletinta.prg
Linha:268 - controletinta_unit.testunit06 - controletinta_unit.prg
Linha:236 - controletinta_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()

14:24:46.616 - EXCEÇÃO NÃO TRATADA!
Erro: 1925
Mesagem: Unknown member _OITENSPEDIDO.
Local: obterprecotinta
Linha: 291
Conteúdo: FOR lnPos = 1 TO THIS._oItensPedido.ObterQuantidade()
Detalhes: _OITENSPEDIDO
Executando TestUnit: CONTROLETINTA_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:301 - controletinta.obterprecotinta - controletinta.prg
Linha:269 - controletinta_unit.testunit06 - controletinta_unit.prg
Linha:236 - controletinta_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()

14:24:46.623 - EXCEÇÃO NÃO TRATADA!
Erro: 7000
Classe: Excecaoprograma
Mesagem: Unknown member _OITENSPEDIDO.
Chamadas:Linha:300 - controletinta.obterprecotinta - controletinta.prg
Linha:369 - controletinta.informarprecotinta - controletinta.prg
Linha:270 - controletinta_unit.testunit06 - controletinta_unit.prg
Linha:236 - controletinta_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Conteúdo: FOR lnPos = 1 TO THIS._oItensPedido.ObterQuantidade()
Executando TestUnit: CONTROLETINTA_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:402 - controletinta.informarprecotinta - controletinta.prg
Linha:270 - controletinta_unit.testunit06 - controletinta_unit.prg
Linha:236 - controletinta_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()