UDF User Data Function

  • Stampa
Dettagli
Categoria: Faq AS400
Pubblicato Giovedì, 15 Ottobre 2009 11:22
Scritto da Super User
Visite: 10767
Pagina 1 di 6

Esempio di creazione di una UDF che restituisce una tabella di due elementi :

Scrivere il sorgente dello script sql :

DROP SPECIFIC FUNCTION LIBRERIA/GET_TABELLAPAGAMENTI;              
CREATE FUNCTION LIBRERIA/GET_TABELLAPAGAMENTI ()                   
RETURNS TABLE (                                                  
CD_PAG        CHAR(3) ,                                          
DS_PAG        CHAR(35) )                                         

LANGUAGE SQL                                                     
SPECIFIC LIBRERIA/GET_TABELLAPAGAMENTI                            
NOT DETERMINISTIC                                                
READS SQL DATA                                                   
CALLED ON NULL INPUT                                             
DISALLOW PARALLEL                                                
SET OPTION COMMIT=*NONE, DATFMT=*ISO, USRPRF=*OWNER              
BEGIN RETURN SELECT SUBSTRING ( XCDEL , 2 , 3 ) ,                
SUBSTRING ( XDTAB , 1 , 35 )                                     
FROM ANTAB02L WHERE XCDTB = 'PAG' ; END  ;                       

COMMENT ON SPECIFIC FUNCTION LIBRERIA/GET_TABELLAPAGAMENTI         
IS 'Elenco tabella pagamenti   ' ;

Per creare la funzione usare il comando RUNSQLSTM