Get Movement Type in iDempiere

-- select * from fnt_get_movementtype('I+');

create or replace function fnt_get_movementtype(p_movementtype_id char(2))
returns varchar
as $$
begin
    return
    (
        case p_movementtype_id
            when 'C-' then 'Embarque a Clientes'
            when 'C+' then 'Devolucion a Cliente'
            when 'I-' then 'Salida de Inventario'
            when 'I+' then 'Entrada de Inventario'
            when 'M-' then 'Movimiento Desde'
            when 'M+' then 'Movimiento Hacia'
            when 'P-' then 'Produccion -'
            when 'P+' then 'Produccion +'
            when 'V-' then 'Devolucion a Proveedor'
            when 'V+' then 'Recibos de Proveedor'
            when 'W-' then 'Orden de Trabajo -'
            when 'W+' then 'Orden de Trabajo +'
        end
    );
end;
$$ language plpgsql;