16:25:19.954 - EXCEÇÃO NÃO TRATADA! Erro: 1923 Mesagem: Object LOEXCECAO is not found. Local: testunit100 Linha: 6523 Conteúdo: tcRetornado_RET = tcRetornado_RET + 'Erro ao gravar orçamento[1] - '+loExcecao.USERVALUE.cMensagem+'; ' Detalhes: LOEXCECAO Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:6527 - orcamentovenda_unit.testunit100 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 16:25:21.955 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Número de pedido não informado. Chamadas:Linha:4547 - orcamentovenda._validarbuscadopedido - orcamentobase.prg Linha:4215 - orcamentovenda._buscar - orcamentobase.prg Linha:4071 - orcamentovenda._buscarorcamento - orcamentobase.prg Linha:4004 - orcamentovenda.buscar - orcamentobase.prg Linha:6531 - orcamentovenda_unit.testunit100 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem('Número de pedido não informado.') THIS._ValidarBuscaDoPedido( tnNumeroPedido, tcSenhaVendedor ) llRetorno = THIS._Buscar( tnNumeroPedido, tcSenhaVendedor ) llOk = THIS._BuscarOrcamento( tnNumeroPedido, tcSenhaVendedor) THIS.oObjetoTeste.Buscar(lnNumPed, 'roma' ) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:6543 - orcamentovenda_unit.testunit100 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()