11:37:13.762 - EXCEÇÃO NÃO TRATADA! Erro: 7000 Classe: Excecaoprograma Mesagem: Erro não classificado. Connectivity error: [Microsoft][ODBC SQL Server Driver][DBNETLIB]ConnectionRead (recv()). SELECT RTIPOLIBERACAO, CODSEN, RITEM FROM CONTROLELIBERACAO C (nolock) WHERE C.RNUMPED > 7 AND c.RITEM >7 AND C.RNUMPED = ?pnNumPed AND ISNULL(CONTROLE, '') IN ('', 'PEDICLICAD' ) AND C.RTIPOLIBERACAO IN (41558 ) ORDER BY RITEM DESC Chamadas:Linha:1334 - _osql_sql_instanciaglobal._tratarerrossql - sql.prg Linha:548 - _osql_sql_instanciaglobal._dosql - sql.prg Linha:311 - _osql_sql_instanciaglobal.executarsqlretornanomecursor - sql.prg Linha:4488 - orcamentovenda._buscarpendenciasnocontroleliberacao - orcamentobase.prg Linha:4304 - orcamentovenda._buscar - orcamentobase.prg Linha:4082 - orcamentovenda._buscarorcamento - orcamentobase.prg Linha:4015 - orcamentovenda.buscar - orcamentobase.prg Linha:6935 - orcamentovenda_unit.testunit106 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THROW lcMens Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:6955 - orcamentovenda_unit.testunit106 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 11:37:13.895 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Situação do orçamento "" não é válida Chamadas:Linha:7347 - orcamentovenda.csituacaoorcamento_assign - orcamentobase.prg Linha:1684 - orcamentovenda.gravar - orcamentobase.prg Linha:6966 - orcamentovenda_unit.testunit106 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Situação do orçamento "'+tAssign+'" não é válida' ) THIS.cSituacaoOrcamento = lcSitVenGravado THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:6976 - orcamentovenda_unit.testunit106 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 11:37:13.897 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Situação do orçamento "" não é válida Chamadas:Linha:7347 - orcamentovenda.csituacaoorcamento_assign - orcamentobase.prg Linha:1684 - orcamentovenda.gravar - orcamentobase.prg Linha:6966 - orcamentovenda_unit.testunit106 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Situação do orçamento "'+tAssign+'" não é válida' ) THIS.cSituacaoOrcamento = lcSitVenGravado THIS.oObjetoTeste.gravar() llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:417 - ON... - ctrlib.prg Linha:6979 - orcamentovenda_unit.testunit106 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()