-- CREATE_PARAMETER_LIST examples
/*
** Built-in: CREATE_PARAMETER_LIST
** Example: Create a parameter list named 'TEMPDATA'. First
** make sure the list does not already exist, then
** attempt to create a new list. Signal an error
** if the list already exists or if creating the
** list fails.
*/

DECLARE
   pl_id     ParamList;
   pl_name   VARCHAR2 (10) := 'tempdata';
BEGIN
   pl_id  := Get_Parameter_List (pl_name);

   IF Id_Null (pl_id) THEN
      pl_id  := Create_Parameter_List (pl_name);

      IF Id_Null (pl_id) THEN
         Message ('Error creating parameter list ' || pl_name);
         RAISE Form_Trigger_Failure;
      END IF;
   ELSE
      Message ('Parameter list ' || pl_name || ' already exists!');
      RAISE Form_Trigger_Failure;
   END IF;
END;