15:50:25.848 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Número de pedido não informado. Chamadas:Linha:4525 - orcamentovenda._validarbuscadopedido - orcamentobase.prg Linha:4193 - orcamentovenda._buscar - orcamentobase.prg Linha:4049 - orcamentovenda._buscarorcamento - orcamentobase.prg Linha:3982 - orcamentovenda.buscar - orcamentobase.prg Linha:6404 - orcamentovenda_unit.testunit099 - 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) llOk = THIS.oObjetoTeste.Buscar( lnNumPed, '29261' ) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:1496 - itenspedidovenda._remover - itenspedidovenda.prg Linha:92 - itenspedidovenda.remover - listabase.prg Linha:6422 - orcamentovenda_unit.testunit099 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()