[Home] [Help]
256: cst_stst_chair CONSTANT
257: IGS_TR_STEP.s_tracking_step_type%TYPE := 'RES_TEX_CH';
258: cst_active CONSTANT IGS_TR_STATUS.s_tracking_status%TYPE := 'ACTIVE';
259: v_message_name VARCHAR2(30);
260: v_originator_id IGS_RE_THS_PNL_MBR.person_id%TYPE;
261: v_recipient_id IGS_TR_STEP.recipient_id%TYPE;
262: v_tts_recipient_id IGS_TR_TYPE_STEP.recipient_id%TYPE;
263: v_principal_id IGS_PE_PERSON.person_id%TYPE;
264: v_chair_id IGS_PE_PERSON.person_id%TYPE;
320: FROM IGS_TR_TYPE_STEP tts
321: WHERE tracking_type = cp_tracking_type AND
322: tracking_type_step_id = cp_tracking_type_step_id;
323: CURSOR c_tpm (
324: cp_person_id IGS_RE_THS_PNL_MBR.ca_person_id%TYPE,
325: cp_ca_sequence_number IGS_RE_THS_PNL_MBR.ca_sequence_number%TYPE,
326: cp_the_sequence_number IGS_RE_THS_PNL_MBR.the_sequence_number%TYPE,
327: cp_creation_dt IGS_RE_THS_PNL_MBR.creation_dt%TYPE) IS
328: SELECT tpm.person_id
321: WHERE tracking_type = cp_tracking_type AND
322: tracking_type_step_id = cp_tracking_type_step_id;
323: CURSOR c_tpm (
324: cp_person_id IGS_RE_THS_PNL_MBR.ca_person_id%TYPE,
325: cp_ca_sequence_number IGS_RE_THS_PNL_MBR.ca_sequence_number%TYPE,
326: cp_the_sequence_number IGS_RE_THS_PNL_MBR.the_sequence_number%TYPE,
327: cp_creation_dt IGS_RE_THS_PNL_MBR.creation_dt%TYPE) IS
328: SELECT tpm.person_id
329: FROM IGS_RE_THS_PNL_MBR tpm,
322: tracking_type_step_id = cp_tracking_type_step_id;
323: CURSOR c_tpm (
324: cp_person_id IGS_RE_THS_PNL_MBR.ca_person_id%TYPE,
325: cp_ca_sequence_number IGS_RE_THS_PNL_MBR.ca_sequence_number%TYPE,
326: cp_the_sequence_number IGS_RE_THS_PNL_MBR.the_sequence_number%TYPE,
327: cp_creation_dt IGS_RE_THS_PNL_MBR.creation_dt%TYPE) IS
328: SELECT tpm.person_id
329: FROM IGS_RE_THS_PNL_MBR tpm,
330: IGS_RE_THS_PNL_MR_TP tpmt
323: CURSOR c_tpm (
324: cp_person_id IGS_RE_THS_PNL_MBR.ca_person_id%TYPE,
325: cp_ca_sequence_number IGS_RE_THS_PNL_MBR.ca_sequence_number%TYPE,
326: cp_the_sequence_number IGS_RE_THS_PNL_MBR.the_sequence_number%TYPE,
327: cp_creation_dt IGS_RE_THS_PNL_MBR.creation_dt%TYPE) IS
328: SELECT tpm.person_id
329: FROM IGS_RE_THS_PNL_MBR tpm,
330: IGS_RE_THS_PNL_MR_TP tpmt
331: WHERE tpm.ca_person_id = cp_person_id AND
325: cp_ca_sequence_number IGS_RE_THS_PNL_MBR.ca_sequence_number%TYPE,
326: cp_the_sequence_number IGS_RE_THS_PNL_MBR.the_sequence_number%TYPE,
327: cp_creation_dt IGS_RE_THS_PNL_MBR.creation_dt%TYPE) IS
328: SELECT tpm.person_id
329: FROM IGS_RE_THS_PNL_MBR tpm,
330: IGS_RE_THS_PNL_MR_TP tpmt
331: WHERE tpm.ca_person_id = cp_person_id AND
332: tpm.ca_sequence_number = cp_ca_sequence_number AND
333: tpm.the_sequence_number = cp_the_sequence_number AND
765: gv_other_detail VARCHAR2(255);
766: LV_ROWID VARCHAR2(25);
767: v_org_id IGS_PR_MILESTONE_HST.ORG_ID%TYPE := IGS_GE_GEN_003.Get_Org_Id;
768: BEGIN -- resp_ins_tpm_hist
769: -- Insert IGS_RE_THS_PNL_MBR history (IGS_RE_THS_PNL_MR_HS)
770: DECLARE
771: v_tpmh_rec IGS_RE_THS_PNL_MR_HS%ROWTYPE;
772: v_create_history BOOLEAN := FALSE;
773: v_hist_start_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
769: -- Insert IGS_RE_THS_PNL_MBR history (IGS_RE_THS_PNL_MR_HS)
770: DECLARE
771: v_tpmh_rec IGS_RE_THS_PNL_MR_HS%ROWTYPE;
772: v_create_history BOOLEAN := FALSE;
773: v_hist_start_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
774: v_hist_end_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
775: v_hist_who IGS_RE_THS_PNL_MBR.last_updated_by%TYPE;
776: BEGIN
777: -- If any of the old values (p_old_
770: DECLARE
771: v_tpmh_rec IGS_RE_THS_PNL_MR_HS%ROWTYPE;
772: v_create_history BOOLEAN := FALSE;
773: v_hist_start_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
774: v_hist_end_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
775: v_hist_who IGS_RE_THS_PNL_MBR.last_updated_by%TYPE;
776: BEGIN
777: -- If any of the old values (p_old_
778: -- associated new values (p_new_
771: v_tpmh_rec IGS_RE_THS_PNL_MR_HS%ROWTYPE;
772: v_create_history BOOLEAN := FALSE;
773: v_hist_start_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
774: v_hist_end_dt IGS_RE_THS_PNL_MBR.last_update_date%TYPE;
775: v_hist_who IGS_RE_THS_PNL_MBR.last_updated_by%TYPE;
776: BEGIN
777: -- If any of the old values (p_old_
778: -- associated new values (p_new_
779: -- last_updated_by and last_update_date columns) then create an IGS_RE_THS_EXAM_HIST history
871: --------------------------------------------------------------------------*/
872: RETURN NUMBER AS
873: gv_other_detail VARCHAR2(255);
874: BEGIN -- resp_ins_tpm_tri
875: -- Insert tracking item for a IGS_RE_THS_PNL_MBR.
876: -- The routine returns the tracking ID of the item created.
877: -- IGS_GE_NOTE: A commit is not done from this routine as it is done as part of
878: -- the calling routine.
879: DECLARE
881: cst_stst_person CONSTANT VARCHAR2(10) := 'RES_TPM_PE';
882: cst_stst_originator CONSTANT VARCHAR2(10) := 'RES_TPM_OR';
883: v_message_name VARCHAR2(30);
884: v_current_person_id IGS_PE_PERSON.person_id%TYPE;
885: v_originator_id IGS_RE_THS_PNL_MBR.person_id%TYPE;
886: v_recipient_id IGS_TR_STEP.recipient_id%TYPE;
887: v_tts_recipient_id IGS_TR_TYPE_STEP.recipient_id%TYPE;
888: v_tracking_id IGS_TR_ITEM.tracking_id%TYPE;
889: v_target_days NUMBER;