16:03:06.698 - EXCEÇÃO NÃO TRATADA! Erro: 5000 Classe: Excecaonegocio Mesagem: Não foi possível localizar item para exclusão na posição informada. Classe: Itenspedidovenda LINHA:849 - ITENSPEDIDOVENDA._RETORNARERRO - CUSTOMMU.PRG LINHA:1073 - ITENSPEDIDOVENDA._REMOVER - ITENSPEDIDOVENDA.PRG LINHA:92 - ITENSPEDIDOVENDA.REMOVER - LISTABASE.PRG LINHA:1323 - ITENSPEDIDOVENDA_UNIT.TESTUNIT030 - ITENSPEDIDOVENDA_UNIT.PRG LINHA:236 - ITENSPEDIDOVENDA_UNIT.EXECUTARTESTE - TESTUNITBASE.PRG LINHA:1421 - EXECUTARTESTEUNITARIOPRG - INICIARTESTEUNITARIO.PRG LINHA:283 - INICIARTESTEUNITARIO - INICIARTESTEUNITARIO.PRG COMANDO: LCNOMEFUNCAO=UPPER(OAGSISTEMA.OBTERFUNCAOERRO()) Chamadas:Linha:1073 - itenspedidovenda._remover - itenspedidovenda.prg Linha:92 - itenspedidovenda.remover - listabase.prg Linha:1323 - itenspedidovenda_unit.testunit030 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Conteúdo: THIS._RetornarErro( 'Não foi possível localizar item para exclusão na posição informada.' ) RETURN THIS._Remover(tnPosicao) IF THIS.oObjetoTeste.Remover(1) llTestOk = EVALUATE(lcTeste) loTestUnit.ExecutarTeste(@laLstTestesParaExecutar) Executando TestUnit: ITENSPEDIDOVENDA_UNIT.PRG Linha:410 - ON... - ctrlib.prg Linha:1098 - itenspedidovenda._remover - itenspedidovenda.prg Linha:92 - itenspedidovenda.remover - listabase.prg Linha:1323 - itenspedidovenda_unit.testunit030 - itenspedidovenda_unit.prg Linha:236 - itenspedidovenda_unit.executarteste - testunitbase.prg Linha:1421 - executartesteunitarioprg - iniciartesteunitario.prg Linha:283 - iniciartesteunitario - iniciartesteunitario.prg Comando: lcListaChamada=oAgSistema.ObterFuncaoErro()