![Procedure
PROCEDURE name [ ( parameter [, parameter ... ] ) ]
IS
[declaration statements]
BEGIN
executable statements−
[ EXCEPTION
exception handler statements]
END [ name ];
Le procedure vengono invocate per nome passando eventualmente dei
parametri:
apply_discount( new_company_id, 0.15 );](https://image.slidesharecdn.com/pl-sql3function-160610142710/85/Oracle-PL-sql-3-2-320.jpg)
![Funzioni
FUNCTION name [ ( parameter [, parameter ... ] ) ]
RETURN return_datatype
IS
[ declaration statements ]
BEGIN
executable statements
[ EXCEPTION
exception handler statements ]
END [ name ];
A differenza delle procedure c’è il tipo di ritorno.
Le funzioni ritornano un valore quindi vengono richiamate così:
sales_for_1995 := tot_sales (1504, 'C');](https://image.slidesharecdn.com/pl-sql3function-160610142710/85/Oracle-PL-sql-3-3-320.jpg)
Oracle PL sql 3
- 1. PL/SQL – Procedure/Functions Le funzioni in PL/SQL sono sottoprogrammi con un valore di ritorno. Le procedure sono sottoprogrammi senza valori di ritorno.
- 2. Procedure PROCEDURE name [ ( parameter [, parameter ... ] ) ] IS [declaration statements] BEGIN executable statements− [ EXCEPTION exception handler statements] END [ name ]; Le procedure vengono invocate per nome passando eventualmente dei parametri: apply_discount( new_company_id, 0.15 );
- 3. Funzioni FUNCTION name [ ( parameter [, parameter ... ] ) ] RETURN return_datatype IS [ declaration statements ] BEGIN executable statements [ EXCEPTION exception handler statements ] END [ name ]; A differenza delle procedure c’è il tipo di ritorno. Le funzioni ritornano un valore quindi vengono richiamate così: sales_for_1995 := tot_sales (1504, 'C');
- 4. Esempio di funzione FUNCTION company_type (type_code_in IN VARCHAR2) RETURN VARCHAR2 IS return_value VARCHAR2 (25) := NULL; BEGIN IF type_code_in = 'S' THEN return_value := 'SUBSIDIARY'; ELSIF type_code_in = 'P' THEN return_value := 'PARTNER'; END IF; RETURN return_value; END;
- 5. Parametri IN e OUT I parametri IN sono passati per valore in parametri OUT per riferimento. PROCEDURE combine_and_format_names (first_name_inout IN OUT VARCHAR2, last_name_inout IN OUT VARCHAR2, full_name_out OUT VARCHAR2,name_format_in IN VARCHAR2 := 'LAST, FIRST') IS BEGIN /* Upper case the first and last names. */− first_name_inout := UPPER (first_name_inout); last_name_inout := UPPER (last_name_inout); /* Combine the names as directed by the name format string. */ IF name_format_in = 'LAST, FIRST' THEN full_name_out := last_name_inout || ', ' || first_name_inout; ELSIFname_format_in = 'FIRST LAST' THEN full_name_out := first_name_inout || ' ' || last_name_inout; END IF; END;
- 6. Esempio: Giorni mese CREATE OR REPLACE FUNCTION “UTENTE"."F_GET_GIORNIMESE" ( pIntIDF_MESE T_RAPPORTINI.IDF_MESE%TYPE, pStrANNO T_RAPPORTINI.ANNO%TYPE ) return INTEGER as V_GIORNI_MESE INTEGER; BEGIN IF pIntIDF_MESE = 11 OR pIntIDF_MESE = 4 OR pIntIDF_MESE = 6 OR pIntIDF_MESE = 9 THEN V_GIORNI_MESE := 30; ELSIF pIntIDF_MESE = 2 THEN IF MOD(TO_NUMBER(pStrANNO), 4) = 0 THEN V_GIORNI_MESE := 29; ELSE V_GIORNI_MESE := 28; END IF; ELSE V_GIORNI_MESE := 31; END IF; RETURN V_GIORNI_MESE; END F_GET_GIORNIMESE;
- 7. Esempio: Giorni mese CREATE OR REPLACE FUNCTION “UTENTE"."F_GET_GIORNIMESE" ( pIntIDF_MESE T_RAPPORTINI.IDF_MESE%TYPE, pStrANNO T_RAPPORTINI.ANNO%TYPE ) return INTEGER as V_GIORNI_MESE INTEGER; BEGIN IF pIntIDF_MESE = 11 OR pIntIDF_MESE = 4 OR pIntIDF_MESE = 6 OR pIntIDF_MESE = 9 THEN V_GIORNI_MESE := 30; ELSIF pIntIDF_MESE = 2 THEN IF MOD(TO_NUMBER(pStrANNO), 4) = 0 THEN V_GIORNI_MESE := 29; ELSE V_GIORNI_MESE := 28; END IF; ELSE V_GIORNI_MESE := 31; END IF; RETURN V_GIORNI_MESE; END F_GET_GIORNIMESE;