User Function MNTB4353
Local nAx := 0
Local nPosiTR := aScan(aHoBrw6,{|x| Trim(Upper(x[2])) == "TL_TIPOREG"})
Local nPosiCd := aScan(aHoBrw6,{|x| Trim(Upper(x[2])) == "TL_CODIGO" })

MsgAlert('Ponto de Entrada MNTB4353 Executado.')

If PARAMIXB[2]
	MsgAlert('O insumo deletado é do tipo: '+PARAMIXB[1,nPosiTR]+" e seu código é "+PARAMIXB[1,nPosiCd]+" .")
EndIf

Return .T.