12:37:25.870 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: O item "129056" passado para obter o parâmetro "PERMITE_INTERAGIR_MARGEM_LUCRO" não é do tipo "Filial" Classe: Parametro LINHA:849 - PARAMETRO._RETORNARERRO - CUSTOMMU.PRG LINHA:1045 - PARAMETRO._VALIDARITEMPARAMETRO - PARAMETRO.PRG LINHA:307 - PARAMETRO._OBTERPARAMETRO - PARAMETRO.PRG LINHA:165 - PARAMETRO.OBTERPARAMETRO - PARAMETRO.PRG LINHA:308 - MARKUP._OBTERPARAMETRO - CONEXAOBASE.PRG LINHA:450 - MARKUP._CALCULARVALORMARKUPTOTAL - MARKUP.PRG LINHA:1230 - MARKUP.OBTERMARKUPTOTAL - MARKUP.PRG LINHA:9183 - ORCAMENTOBASE._OBTERMARKUP - ORCAMENTOBASE.PRG LINHA:3800 - ORCAMENTOVENDA._OBTERMARKUP - ORCAMENTOVENDA.PRG LINHA:8920 - ORCAMENTOVENDA.OBTERMARKUPTOTAL - ORCAMENTOBASE.PRG LINHA:4504 - ORCAMENTOVENDA_UNIT.TESTUNIT073 - ORCAMENTOVENDA_UNIT.PRG LINHA:236 - ORCAMENTOVENDA_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1421 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:1045 - parametro._validaritemparametro - parametro.prg Linha:307 - parametro._obterparametro - parametro.prg Linha:165 - parametro.obterparametro - parametro.prg Linha:308 - markup._obterparametro - conexaobase.prg Linha:450 - markup._calcularvalormarkuptotal - markup.prg Linha:1230 - markup.obtermarkuptotal - markup.prg Linha:9183 - orcamentobase._obtermarkup - orcamentobase.prg Linha:3800 - orcamentovenda._obtermarkup - orcamentovenda.prg Linha:8920 - orcamentovenda.obtermarkuptotal - orcamentobase.prg Linha:4504 - orcamentovenda_unit.testunit073 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErro( 'O item "'+ALLTRIM(STR(pnOIDItemAuxParam))+'" passado para obter o parâmetro "'+tcNomeInternoParametro +'" não é do tipo "'+lcTipoParametro+'"') THIS._validarItemParametro( lnOidItemOriginal , lnRSuperValidar , lcNomeInternoValidar ) RETURN THIS._ObterParametro( tcNomeInterno, tnOidItem ) lcParametro = _SCREEN.Parametro.ObterParametro(tcNomeInterno, tnOidItem) &&, tcTipo, tlNaoUsarCache ) lcParamPERMITE_INTERAGIR_MARGEM_LUCRO = THIS._ObterParametro( 'PERMITE_INTERAGIR_MARGEM_LUCRO', THIS.oAutenticador.OidEmpresa) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:8945 - orcamentovenda.obtermarkuptotal - orcamentobase.prg Linha:4504 - orcamentovenda_unit.testunit073 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro() 12:37:30.504 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: O item "129056" passado para obter o parâmetro "PERMITE_INTERAGIR_MARGEM_LUCRO" não é do tipo "Filial" Classe: Parametro LINHA:849 - PARAMETRO._RETORNARERRO - CUSTOMMU.PRG LINHA:1045 - PARAMETRO._VALIDARITEMPARAMETRO - PARAMETRO.PRG LINHA:307 - PARAMETRO._OBTERPARAMETRO - PARAMETRO.PRG LINHA:165 - PARAMETRO.OBTERPARAMETRO - PARAMETRO.PRG LINHA:308 - MARKUP._OBTERPARAMETRO - CONEXAOBASE.PRG LINHA:450 - MARKUP._CALCULARVALORMARKUPTOTAL - MARKUP.PRG LINHA:1230 - MARKUP.OBTERMARKUPTOTAL - MARKUP.PRG LINHA:9183 - ORCAMENTOBASE._OBTERMARKUP - ORCAMENTOBASE.PRG LINHA:3800 - ORCAMENTOVENDA._OBTERMARKUP - ORCAMENTOVENDA.PRG LINHA:8920 - ORCAMENTOVENDA.OBTERMARKUPTOTAL - ORCAMENTOBASE.PRG LINHA:4511 - ORCAMENTOVENDA_UNIT.TESTUNIT073 - ORCAMENTOVENDA_UNIT.PRG LINHA:236 - ORCAMENTOVENDA_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1421 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:1045 - parametro._validaritemparametro - parametro.prg Linha:307 - parametro._obterparametro - parametro.prg Linha:165 - parametro.obterparametro - parametro.prg Linha:308 - markup._obterparametro - conexaobase.prg Linha:450 - markup._calcularvalormarkuptotal - markup.prg Linha:1230 - markup.obtermarkuptotal - markup.prg Linha:9183 - orcamentobase._obtermarkup - orcamentobase.prg Linha:3800 - orcamentovenda._obtermarkup - orcamentovenda.prg Linha:8920 - orcamentovenda.obtermarkuptotal - orcamentobase.prg Linha:4511 - orcamentovenda_unit.testunit073 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErro( 'O item "'+ALLTRIM(STR(pnOIDItemAuxParam))+'" passado para obter o parâmetro "'+tcNomeInternoParametro +'" não é do tipo "'+lcTipoParametro+'"') THIS._validarItemParametro( lnOidItemOriginal , lnRSuperValidar , lcNomeInternoValidar ) RETURN THIS._ObterParametro( tcNomeInterno, tnOidItem ) lcParametro = _SCREEN.Parametro.ObterParametro(tcNomeInterno, tnOidItem) &&, tcTipo, tlNaoUsarCache ) lcParamPERMITE_INTERAGIR_MARGEM_LUCRO = THIS._ObterParametro( 'PERMITE_INTERAGIR_MARGEM_LUCRO', THIS.oAutenticador.OidEmpresa) Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:8945 - orcamentovenda.obtermarkuptotal - orcamentobase.prg Linha:4511 - orcamentovenda_unit.testunit073 - orcamentovenda_unit.prg Linha:236 - orcamentovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()