zentral/docs/functions/F_GET_TOVAGLIATO_ALLESTIMENTO.md

F_GET_TOVAGLIATO_ALLESTIMENTO

Codice Sorgente

FUNCTION "F_GET_TOVAGLIATO_ALLESTIMENTO" (
    p_filtro VARCHAR2,
    p_id     NUMBER
) RETURN VARCHAR2 AS

    TYPE ref_cur IS REF CURSOR;
    c_data   ref_cur;
    v_val    VARCHAR2(1000);
    v_filtro VARCHAR2(100);
    v_id     NUMBER;
BEGIN
    v_filtro := p_filtro;
    v_id := p_id;
    OPEN c_data FOR ' select substr(a.descrizione || '' - '' || p.note ,1,1000) as dato 
                        from eventi e
                        left join location l on e.id_location = l.id  
                        join eventi_det_prel p on e.id=p.id_evento  
                        join articoli a on p.cod_articolo=a.cod_articolo 
                        join TB_CODICI_CATEG c on a.cod_categ=c.cod_categ 
                       --where c.COD_TIPO = ''TVB''  -- dividere tovagliolo da tovagliato con i codici categ
                       where c.COD_TIPO = :filtro
                         and rownum = 1  -- se esistono più articoli fare list_agg  op loop                      
                         and e.id = to_number(:id)'
        USING v_filtro, v_id;

    FETCH c_data INTO v_val;
    CLOSE c_data;
    RETURN v_val;
END;```