17:23:06.030 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: Método "ObterParametro" da classe "Parametro" foi passado "tnOidItem" invalido ( <= 0 ) - "TIPO_FRETE_PADRAO" Método "ObterParametro" da classe "Parametro" foi passado "tnOidItem" invalido ( <= 0 ) - "TIPO_FRETE_PADRAO" Classe: Parametro LINHA:848 - PARAMETRO._RETORNARERRO - CUSTOMMU.PRG LINHA:226 - PARAMETRO._OBTERPARAMETRO - PARAMETRO.PRG LINHA:165 - PARAMETRO.OBTERPARAMETRO - PARAMETRO.PRG LINHA:308 - FRETE._OBTERPARAMETRO - CONEXAOBASE.PRG LINHA:785 - FRETE._DEFINIRTIPOFRETEPADRAO - FRETE.PRG LINHA:749 - FRETE.DEFINIRVALOR - FRETE.PRG LINHA:202 - FRETE_UNIT.TESTUNIT001 - FRETE_UNIT.PRG LINHA:236 - FRETE_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1431 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:383 - frete_unit._levarparametro - conexaobase.prg Linha:233 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErroObj( _SCREEN.Parametro ) THIS._LevarParametro('UTILIZA_FRETE_CARGA', THIS.oAutenticador.OIDEmpresa, 'S') llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) ExecutarTesteUnitarioPrg( lcProg, lnSessaoAplicativo ,lcMensagem, lnInicio, @loArquivoTexto, @lnIDClasse ) Executando TestUnit: FRETE_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:389 - frete_unit._levarparametro - conexaobase.prg Linha:233 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 17:23:06.038 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: Método "ObterParametro" da classe "Parametro" foi passado "tnOidItem" invalido ( <= 0 ) - "TIPO_FRETE_PADRAO" Método "ObterParametro" da classe "Parametro" foi passado "tnOidItem" invalido ( <= 0 ) - "TIPO_FRETE_PADRAO" Classe: Parametro LINHA:848 - PARAMETRO._RETORNARERRO - CUSTOMMU.PRG LINHA:226 - PARAMETRO._OBTERPARAMETRO - PARAMETRO.PRG LINHA:165 - PARAMETRO.OBTERPARAMETRO - PARAMETRO.PRG LINHA:308 - FRETE._OBTERPARAMETRO - CONEXAOBASE.PRG LINHA:785 - FRETE._DEFINIRTIPOFRETEPADRAO - FRETE.PRG LINHA:749 - FRETE.DEFINIRVALOR - FRETE.PRG LINHA:202 - FRETE_UNIT.TESTUNIT001 - FRETE_UNIT.PRG LINHA:236 - FRETE_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1431 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:383 - frete_unit._levarparametro - conexaobase.prg Linha:234 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErroObj( _SCREEN.Parametro ) THIS._LevarParametro('TIPO_DE_CALCULO_DE_FRETE_NO_ORCAMENTO', THIS.oAutenticador.OidFilial, SEM_CALCULO_AUTOMATICO) llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) ExecutarTesteUnitarioPrg( lcProg, lnSessaoAplicativo ,lcMensagem, lnInicio, @loArquivoTexto, @lnIDClasse ) Executando TestUnit: FRETE_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:389 - frete_unit._levarparametro - conexaobase.prg Linha:234 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 17:23:06.047 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: Método "ObterParametro" da classe "Parametro" foi passado "tnOidItem" invalido ( <= 0 ) - "TIPO_FRETE_PADRAO" Método "ObterParametro" da classe "Parametro" foi passado "tnOidItem" invalido ( <= 0 ) - "TIPO_FRETE_PADRAO" Classe: Parametro LINHA:848 - PARAMETRO._RETORNARERRO - CUSTOMMU.PRG LINHA:226 - PARAMETRO._OBTERPARAMETRO - PARAMETRO.PRG LINHA:165 - PARAMETRO.OBTERPARAMETRO - PARAMETRO.PRG LINHA:308 - FRETE._OBTERPARAMETRO - CONEXAOBASE.PRG LINHA:785 - FRETE._DEFINIRTIPOFRETEPADRAO - FRETE.PRG LINHA:749 - FRETE.DEFINIRVALOR - FRETE.PRG LINHA:202 - FRETE_UNIT.TESTUNIT001 - FRETE_UNIT.PRG LINHA:236 - FRETE_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1431 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:383 - frete_unit._levarparametro - conexaobase.prg Linha:235 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErroObj( _SCREEN.Parametro ) THIS._LevarParametro('PERMITIR_ALTERAR_FRETE_AUTOMATICO_POR_ROTEIRO', THIS.oAutenticador.OidFilial, 'N') llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) ExecutarTesteUnitarioPrg( lcProg, lnSessaoAplicativo ,lcMensagem, lnInicio, @loArquivoTexto, @lnIDClasse ) Executando TestUnit: FRETE_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:389 - frete_unit._levarparametro - conexaobase.prg Linha:235 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 17:23:06.065 - EXCEÇÃO NÃO TRATADA! Erro: 4000 Classe: Excecaousuario Mesagem: Classe inválida [Frete], está configurado para trabalhar com frete por roteiro Chamadas:Linha:1316 - frete._validarclassecorreta - frete.prg Linha:1195 - frete.noidfilialorcamento_assign - frete.prg Linha:245 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarMensagem( 'Classe inválida ['+THIS.Class +'], está configurado para trabalhar com frete por roteiro' ) THIS._ValidarClasseCorreta( tAssign ) THIS.oObjetoTeste.nOidFilialOrcamento = THIS.oAutenticador.OidFilial llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: FRETE_UNIT.PRG Linha:416 - ON... - ctrlib.prg Linha:1206 - frete.noidfilialorcamento_assign - frete.prg Linha:245 - frete_unit.testunit002 - frete_unit.prg Linha:236 - frete_unit.executarteste - testunitbase.prg Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()