17:26:21.976 - EXCEÇÃO NÃO TRATADA!
Erro: 4000
Classe: Excecaousuario
Mesagem: Tipo de entrega "Caixa" não é permitido para o produto 42414.
Chamadas:Linha:900 - itempedidovenda._retornarmensagem - itempedidobase.prg
Linha:5659 - itempedidovenda._validartipoentrega - itempedidobase.prg
Linha:5030 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg
Linha:590 - itempedidobase_unit.testunit012 - itempedidobase_unit.prg
Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg
Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Conteúdo: 
DODEFAULT(tcLogUsuario, tcCodigoExcecao )
THIS._RetornarMensagem( lcMensagemErro )
THIS._ValidarTipoEntrega( tAssign ) &&& FNX-1923
loItemPedido.cTipoEntrega = 'C'
llTestOk = EVALUATE(lcTeste)
Executando TestUnit: ITEMPEDIDOBASE_UNIT.PRG
Linha:416 - ON...  - ctrlib.prg
Linha:5210 - itempedidovenda.ctipoentrega_assign - itempedidobase.prg
Linha:590 - itempedidobase_unit.testunit012 - itempedidobase_unit.prg
Linha:236 - itempedidobase_unit.executarteste - testunitbase.prg
Linha:1431 - executartesteunitarioprg - iniciartesteunitario.prg
Linha:283 - iniciartesteunitario - iniciartesteunitario.prg

Comando: 
lcListaChamada=oAgSistema.ObterFuncaoErro()