procedure pl 2fsql

1CREATE OR REPLACE PROCEDURE my_schema.my_procedure(param1 IN VARCHAR2) IS
2    cnumber NUMBER;
3BEGIN
4    cnumber := 10;
5    INSERT INTO my_table (num_field) VALUES (param1 + cnumber);
6    COMMIT;
7EXCEPTION
8    WHEN OTHERS THEN
9        raise_application_error(-20001, 'An error was encountered - '
10            || sqlcode || ' -ERROR- ' || sqlerrm);
11END;

1CREATE [OR REPLACE] PROCEDURE procedure_name
2    [ (parameter [,parameter]) ]
3
4IS
5    [declaration_section]
6
7BEGIN
8    executable_section
9
10[EXCEPTION
11    exception_section]
12
13END [procedure_name];

1CREATE PROCEDURE nome_procedura [(parametri)] IS
2	Definizioni;
3BEGIN
4	Corpo procedura;
5END;