PROCEDURE add_job_history
  (  p_emp_id          job_history.employee_id%type
   , p_start_date      job_history.start_date%type
   , p_end_date        job_history.end_date%type
   , p_job_id          job_history.job_id%type
   , p_department_id   job_history.department_id%type
   )
IS
BEGIN
  INSERT INTO job_history (employee_id, start_date, end_date,
                           job_id, department_id)
    VALUES(p_emp_id, p_start_date, p_end_date, p_job_id, p_department_id);
END add_job_history;

PROCEDURE secure_dml
IS
BEGIN
  IF TO_CHAR (SYSDATE, 'HH24:MI') NOT BETWEEN '08:00' AND '18:00'
        OR TO_CHAR (SYSDATE, 'DY') IN ('SAT', 'SUN') THEN
	RAISE_APPLICATION_ERROR (-20205,
		'You may only make changes during normal office hours');
  END IF;
END secure_dml;

FUNCTION get_phone_number_f
  (p_in INTEGER, p_phonelist phone_list_typ)
RETURN VARCHAR2 AS
  TYPE phone_list IS VARRAY(5) OF VARCHAR2(25);
  phone_out varchar2(25) := null;
  v_size INTEGER;
BEGIN
    IF p_phonelist.FIRST IS NULL OR
       p_in > (p_phonelist.LAST + 1) - p_phonelist.FIRST THEN
      RETURN phone_out;
    ELSE
      phone_out := p_phonelist(p_in);
      RETURN phone_out;
    END IF;
END;

CREATE TYPE PM.ADHEADER_TYP FROM  NOT NULL

CREATE TYPE OE.CATALOG_TYP FROM  NOT NULL

CREATE TYPE OE.CATEGORY_TYP FROM  NOT NULL

CREATE TYPE OE.COMPOSITE_CATEGORY_TYP FROM  NOT NULL

CREATE TYPE OE.CORPORATE_CUSTOMER_TYP FROM  NOT NULL

CREATE TYPE OE.CUST_ADDRESS_TYP FROM  NOT NULL

CREATE TYPE OE.CUSTOMER_TYP FROM  NOT NULL

CREATE TYPE OE.INVENTORY_LIST_TYP FROM  NOT NULL

CREATE TYPE OE.INVENTORY_TYP FROM  NOT NULL

CREATE TYPE OE.LEAF_CATEGORY_TYP FROM  NOT NULL

CREATE TYPE [IX].ORDER_EVENT_TYP FROM  NOT NULL

CREATE TYPE OE.ORDER_ITEM_LIST_TYP FROM  NOT NULL

CREATE TYPE OE.ORDER_ITEM_TYP FROM  NOT NULL

CREATE TYPE OE.ORDER_LIST_TYP FROM  NOT NULL

CREATE TYPE OE.ORDER_TYP FROM  NOT NULL

CREATE TYPE OE.PHONE_LIST_TYP FROM  NOT NULL

CREATE TYPE OE.PRODUCT_INFORMATION_TYP FROM  NOT NULL

CREATE TYPE OE.PRODUCT_REF_LIST_TYP FROM  NOT NULL

CREATE TYPE OE.SUBCATEGORY_REF_LIST_TYP FROM  NOT NULL

CREATE TYPE OE.SYS_YOID0000050342$ FROM  NOT NULL

CREATE TYPE OE.SYS_YOID0000050344$ FROM  NOT NULL

CREATE TYPE OE.SYS_YOID0000050346$ FROM  NOT NULL

CREATE TYPE OE.SYS_YOID0000050348$ FROM  NOT NULL

CREATE TYPE OE.SYS_YOID0000050350$ FROM  NOT NULL

CREATE TYPE PM.TEXTDOC_TAB FROM  NOT NULL

CREATE TYPE PM.TEXTDOC_TYP FROM  NOT NULL

CREATE TYPE OE.WAREHOUSE_TYP FROM  NOT NULL

CREATE TYPE OE.XDBPO_ACTION_COLLECTION FROM  NOT NULL

CREATE TYPE OE.XDBPO_ACTION_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_ACTIONS_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_LINEITEM_COLLECTION FROM  NOT NULL

CREATE TYPE OE.XDBPO_LINEITEM_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_LINEITEMS_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_PART_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_REJECTION_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_SHIPINSTRUCTIONS_TYPE FROM  NOT NULL

CREATE TYPE OE.XDBPO_TYPE FROM  NOT NULL