Uses of typed parameters like prec_src_milestone_id are reported as Unused Identifiers. Not a major issue, but I needed the satisfaction of some accomplishment for the greater good today.
PROCEDURE ins_cop_milestone_cpy (
praw_session_sa_id IN OUT cop_milestone_cpy.session_sa_id%TYPE,
pnum_user_sa_id IN cop_copy_event.user_sa_id%TYPE,
pvar_location_nm IN cop_milestone_cpy.location_nm%TYPE,
pvar_src_proj_id IN cop_milestone_cpy.proj_id%TYPE,
prec_src_milestone_id IN gtyp_milestone_id,
pvar_dest_proj_id IN cop_milestone_cpy.proj_id%TYPE,
pcur_errors OUT SYS_REFCURSOR,
pvar_add_all_comp_bdry IN VARCHAR2 DEFAULT 'Y')
IS
/*
||===================================================================
|| Description: Insert multiple MSs
||
|| Pre:
||
|| Post: N/A
||
|| Modification History: N/A
||===================================================================
*/
lnum_idx PLS_INTEGER;
BEGIN
DBMS_APPLICATION_INFO.set_module (
'cop_event.ins_cop_milestone_cpy',
pvar_src_proj_id || gvar_hyphen || pvar_dest_proj_id);
-- establish session_sa_id if new
IF praw_session_sa_id IS NULL
THEN
praw_session_sa_id := cop_master.set_copy_event (pnum_user_sa_id);
END IF;
lnum_idx := prec_src_milestone_id.FIRST;