21: -- and added Person_id
22: ------------------------------------------------------------------
23:
24: l_rowid VARCHAR2(25);
25: old_references igs_pe_stat_v%ROWTYPE;
26: new_references igs_pe_stat_v%ROWTYPE;
27: Y_RETURN_STATUS VARCHAR2(1);
28: Z_RETURN_STATUS VARCHAR2(1);
29: Y_MSG_DATA VARCHAR2(2000);
22: ------------------------------------------------------------------
23:
24: l_rowid VARCHAR2(25);
25: old_references igs_pe_stat_v%ROWTYPE;
26: new_references igs_pe_stat_v%ROWTYPE;
27: Y_RETURN_STATUS VARCHAR2(1);
28: Z_RETURN_STATUS VARCHAR2(1);
29: Y_MSG_DATA VARCHAR2(2000);
30: Y_PROFILE_ID igs_pe_stat_v.person_profile_id%TYPE;
26: new_references igs_pe_stat_v%ROWTYPE;
27: Y_RETURN_STATUS VARCHAR2(1);
28: Z_RETURN_STATUS VARCHAR2(1);
29: Y_MSG_DATA VARCHAR2(2000);
30: Y_PROFILE_ID igs_pe_stat_v.person_profile_id%TYPE;
31: Z_PROFILE_ID igs_pe_stat_v.person_profile_id%TYPE;
32: XXX_ROWID VARCHAR2(25);
33: Y_MSG_COUNT NUMBER;
34: Z_MSG_COUNT NUMBER;
27: Y_RETURN_STATUS VARCHAR2(1);
28: Z_RETURN_STATUS VARCHAR2(1);
29: Y_MSG_DATA VARCHAR2(2000);
30: Y_PROFILE_ID igs_pe_stat_v.person_profile_id%TYPE;
31: Z_PROFILE_ID igs_pe_stat_v.person_profile_id%TYPE;
32: XXX_ROWID VARCHAR2(25);
33: Y_MSG_COUNT NUMBER;
34: Z_MSG_COUNT NUMBER;
35: Z_MSG_DATA VARCHAR2(2000);
133: (reverse chronological order - newest change first)
134: ***************************************************************/
135: CURSOR cur_old_ref_values IS
136: SELECT *
137: FROM IGS_PE_STAT_V
138: WHERE ROW_ID = X_rowid;
139: BEGIN
140: l_rowid := X_rowid;
141: -- Code for setting the Old and New Reference Values.