19:27:21.035 - EXCEÇÃO NÃO TRATADA!
Erro: 5000
Classe: Excecaonegocio
Mesagem: Quant. de Parâmetros passados é invalido [4] - Esperado 22 parâmetros, passado 21 parâmetros - Classe: Orcamentovenda
Classe: Orcamentovenda
LINHA:849 - ORCAMENTOVENDA._RETORNARERRO - CUSTOMMU.PRG
LINHA:1149 - CUSTOMMU._VALIDARPARAMETRO - CUSTOMMU.PRG
LINHA:388 - ORCAMENTOVENDA._VALIDARPARAMETRO - CTRCLASSBASE.PRG
LINHA:3605 - ORCAMENTOVENDA._OBTERMARKUP - ORCAMENTOVENDA.PRG
LINHA:8776 - 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:1149 - custommu._validarparametro - custommu.prg
Linha:388 - orcamentovenda._validarparametro - ctrclassbase.prg
Linha:3605 - orcamentovenda._obtermarkup - orcamentovenda.prg
Linha:8776 - 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( 'Quant. de Parâmetros passados é invalido [4] - Esperado '+ALLTRIM(STR(tnQuantParametros ))+' parâmetros, passado '+ALLTRIM(STR(tnQuantValidar))+' parâmetros - Classe: '+THIS.CLASS )
llOk = DODEFAULT( tcTipo, tvParametro, tnQuantParametros, tnQuantValidar, tcNomeParametroValidar )
THIS._ValidarParametro( 'C', tcXmlMarkup_RET, 22, PCOUNT() )
THIS._ObterMarkup( @lcXmlMarkup, @lnMarkupAnterior, @lnMarkupAtual, @lnCustoOrcamento, @lnMakupMargemZero, @lnMarkupReal, @lnMarkupRealVrPresente, @lnMarkupRealPorML, @lnMarkupBruto, @lnMarkupBrutoAVista, @lnCustoUltPesq, @lnPrecoVendaLiquida, @lnTotVrPresente, @lnMargemLucro, @lnMargemLucroReal, @lnTotMargemLucroAnterior, @lnTotMargemLucroMargemZero, @lnContribuicao, @lnComissao, @lnMarkupUltPesq, @lnMarkupPrecoVendaUltPesq )
tcRetornado_RET = THIS.oObjetoTeste.ObterMarkupTotal()
Executando TestUnit: ORCAMENTOVENDA_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:8801 - 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()