15:01:24.504 - EXCEÇÃO NÃO TRATADA!
Erro: 4000
Classe: Excecaousuario
Mesagem: Parâmetro inválido [2]  - Esperado parâmetro tipo "N" passado "L" - Classe: Itempedidovenda
Chamadas:Linha:887 - itempedidovenda._retornarmensagem - itempedidobase.prg
Linha:843 - itempedidovenda._retornarerro - custommu.prg
Linha:1182 - custommu._validarparametro - custommu.prg
Linha:388 - itempedidovenda._validarparametro - ctrclassbase.prg
Linha:945 - itempedidovenda.nidtipofrete_assign - itempedidovenda.prg
Linha:1575 - itempedidovenda._buscar_e_transferirdasclassesfilhas - itempedidovenda.prg
Linha:8592 - itempedidovenda.buscar - itempedidobase.prg
Linha:4369 - itempedidobase_unit.testunit114 - itempedidobase_unit.prg
Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Conteúdo: 
DODEFAULT(tcLogUsuario, tcCodigoExcecao )
THIS._RetornarMensagem(tcLog, tcCodigoExcecao )
THIS._RetornarErro( 'Parâmetro inválido [2] - Esperado parâmetro tipo "'+lcTipo+'" passado "'+TYPE('tvParametro')+'" - Classe: '+THIS.CLASS )
llOk = DODEFAULT( tcTipo, tvParametro, tnQuantParametros, tnQuantValidar, tcNomeParametroValidar )
THIS._ValidarParametro( 'N', tnValor, 1, PCOUNT() )
Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG
Linha:410 - ON...  - ctrlib.prg
Linha:8632 - itempedidovenda.buscar - itempedidobase.prg
Linha:4369 - itempedidobase_unit.testunit114 - itempedidobase_unit.prg
Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg
Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()