CREATE OR REPLACE FUNCTION sre_recaudaciones.sre_fac_val_tipo_envase_recepcion_manual(p_json json)
 RETURNS SMALLINT
 LANGUAGE plpgsql
AS $function$
/**************************************************************************************************************************************************
FUNCIONALIDAD : <Descripcion>
PARAMETROS INGRESO
    <Descripcion>
PARAMETROS SALIDA
    <Descripcion>
SUBSISTEMA : Facturación
FECHA CREACION : <dd/mm/yyyy>
AUTOR : Equipo Tully
VERSION : 1.0
**************************************************************************************************************************************************/
/**************************************************************************************************************************************************
MODIFICACIONES:  <Descripcion>
NUMERO SECUENCIAL : <Numero secuencial>
FECHA DE MODIFICACION :<dd/mm/yyyy>
AUTOR DE LA MODIFICACION : :<Nombre y apellido>
VERSION : <Numero Version secuencial>
**************************************************************************************************************************************************/
DECLARE
  p_tipo_envase VARCHAR:=(SELECT CAST(p_json->'XmlFactura'->'factura'->'cabecera'->>'tipoEnvase' AS VARCHAR));
  v_tipo_envase_descripcion VARCHAR :='';
  v_resultado SMALLINT :=1000;
BEGIN
        CASE
                WHEN(p_tipo_envase='T') THEN
                        v_tipo_envase_descripcion = 'BOTELLAS';

                WHEN(p_tipo_envase='B') THEN
                        v_tipo_envase_descripcion = 'BIDONES';  --adicionar bidones en transversales

                WHEN(p_tipo_envase='O') THEN
                        v_tipo_envase_descripcion = 'OTROS';
                        ELSE
                    RETURN 'ERROR'; --Etapa inexistente
        END CASE;


     v_resultado := COALESCE((SELECT sre_recaudaciones.sre_fac_par_codigo_respuesta('codigo_exito')
                          FROM str_transversales.str_cps_clasificadores c
                          WHERE c.descripcion = v_tipo_envase_descripcion
                           limit 1)
                           ,
                           (SELECT sre_recaudaciones.sre_fac_ope_obtener_codigo_error('sre_fac_val_caed_factura_manual'))---CREAR UN ERROR
                         );

    RETURN v_resultado;
  EXCEPTION
  WHEN OTHERS
    THEN
      RETURN (SELECT sre_recaudaciones.sre_fac_val_tipo_envase_recepcion_manual(SQLSTATE, SQLERRM, 'sre_fac_val_tipo_envase_recepcion_manual'));
END;
$function$;