DBA Data[Home] [Help]

APPS.IGS_PE_PERS_ENCUMB_PKG dependencies on IGS_PE_PERS_ENCUMB

Line 1: PACKAGE BODY igs_pe_pers_encumb_pkg AS

1: PACKAGE BODY igs_pe_pers_encumb_pkg AS
2: /* $Header: IGSNI18B.pls 120.0 2005/06/02 04:27:22 appldev noship $ */
3:
4: ------------------------------------------------------------------
5: -- Change History

Line 16: old_references IGS_PE_PERS_ENCUMB%RowType;

12: ------------------------------------------------------------------
13:
14: -- Bug 1956374 msrinivi Repointed genp_val_prsn_id
15: l_rowid VARCHAR2(25);
16: old_references IGS_PE_PERS_ENCUMB%RowType;
17: new_references IGS_PE_PERS_ENCUMB%RowType;
18:
19: PROCEDURE Set_Column_Values (
20: p_action IN VARCHAR2,

Line 17: new_references IGS_PE_PERS_ENCUMB%RowType;

13:
14: -- Bug 1956374 msrinivi Repointed genp_val_prsn_id
15: l_rowid VARCHAR2(25);
16: old_references IGS_PE_PERS_ENCUMB%RowType;
17: new_references IGS_PE_PERS_ENCUMB%RowType;
18:
19: PROCEDURE Set_Column_Values (
20: p_action IN VARCHAR2,
21: x_rowid IN VARCHAR2,

Line 43: FROM igs_pe_pers_encumb

39: ) AS
40:
41: CURSOR cur_old_ref_values IS
42: SELECT *
43: FROM igs_pe_pers_encumb
44: WHERE rowid = x_rowid;
45:
46: BEGIN
47:

Line 279: -- ON IGS_PE_PERS_ENCUMB

275:
276: -- Trigger description :-
277: -- "OSS_TST".trg_pen_ar_iu
278: -- AFTER INSERT OR UPDATE
279: -- ON IGS_PE_PERS_ENCUMB
280: -- FOR EACH ROW
281:
282: PROCEDURE AfterRowInsertUpdate2(
283: p_inserting IN BOOLEAN,

Line 320: -- Validate for open ended IGS_PE_PERS_ENCUMB records.

316: END IF;
317: END IF;
318: IF v_rowid_saved = TRUE THEN
319: --Validate the records
320: -- Validate for open ended IGS_PE_PERS_ENCUMB records.
321: IF new_references.expiry_dt IS NULL THEN
322: IF IGS_EN_VAL_PEN.enrp_val_pen_open (
323: new_references.person_id,
324: new_references.encumbrance_type,

Line 377: -- ON IGS_PE_PERS_ENCUMB

373:
374: -- Trigger description :-
375: -- "OSS_TST".trg_pen_as_iu
376: -- AFTER INSERT OR UPDATE
377: -- ON IGS_PE_PERS_ENCUMB
378:
379:
380:
381: PROCEDURE Check_Constraints (

Line 557: IGS_PE_PERSENC_EFFCT_PKG.GET_FK_IGS_PE_PERS_ENCUMB (

553:
554: PROCEDURE Check_Child_Existance AS
555: BEGIN
556:
557: IGS_PE_PERSENC_EFFCT_PKG.GET_FK_IGS_PE_PERS_ENCUMB (
558: old_references.person_id,
559: old_references.encumbrance_type ,
560: old_references.start_dt
561: );

Line 573: FROM IGS_PE_PERS_ENCUMB

569: ) RETURN BOOLEAN AS
570:
571: CURSOR cur_rowid IS
572: SELECT rowid
573: FROM IGS_PE_PERS_ENCUMB
574: WHERE person_id = x_person_id
575: AND encumbrance_type = x_encumbrance_type
576: AND start_dt = x_start_dt
577: FOR UPDATE NOWAIT;

Line 601: FROM IGS_PE_PERS_ENCUMB

597: x_ci_sequence_number IN NUMBER
598: ) AS
599: CURSOR cur_rowid IS
600: SELECT rowid
601: FROM IGS_PE_PERS_ENCUMB
602: WHERE (
603: CAL_TYPE = X_CAL_TYPE AND SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
604: );
605:

Line 626: FROM IGS_PE_PERS_ENCUMB

622: ) AS
623:
624: CURSOR cur_rowid IS
625: SELECT rowid
626: FROM IGS_PE_PERS_ENCUMB
627: WHERE encumbrance_type = x_encumbrance_type ;
628:
629: lv_rowid cur_rowid%RowType;
630:

Line 652: FROM IGS_PE_PERS_ENCUMB

648: ) AS
649:
650: CURSOR cur_rowid IS
651: SELECT rowid
652: FROM IGS_PE_PERS_ENCUMB
653: WHERE authorising_person_id = x_person_id OR
654: person_id = x_person_id ;
655:
656: lv_rowid cur_rowid%RowType;

Line 822: CURSOR C (cp_start_dt igs_pe_pers_encumb.start_dt%TYPE) IS

818: x_auth_resp_id IN NUMBER,
819: x_external_reference IN VARCHAR2 ,
820: X_MODE IN VARCHAR2
821: ) AS
822: CURSOR C (cp_start_dt igs_pe_pers_encumb.start_dt%TYPE) IS
823: SELECT ROWID FROM igs_pe_pers_encumb
824: WHERE person_id = x_person_id
825: AND encumbrance_type = x_encumbrance_type
826: AND start_dt = cp_start_dt;

Line 823: SELECT ROWID FROM igs_pe_pers_encumb

819: x_external_reference IN VARCHAR2 ,
820: X_MODE IN VARCHAR2
821: ) AS
822: CURSOR C (cp_start_dt igs_pe_pers_encumb.start_dt%TYPE) IS
823: SELECT ROWID FROM igs_pe_pers_encumb
824: WHERE person_id = x_person_id
825: AND encumbrance_type = x_encumbrance_type
826: AND start_dt = cp_start_dt;
827:

Line 906: INSERT INTO igs_pe_pers_encumb (

902: x_last_updated_by=>X_LAST_UPDATED_BY,
903: x_last_update_login=>X_LAST_UPDATE_LOGIN
904: );
905: END IF;
906: INSERT INTO igs_pe_pers_encumb (
907: person_id,
908: encumbrance_type,
909: start_dt,
910: expiry_dt,

Line 978: FROM igs_pe_pers_encumb

974: CURSOR c1 IS SELECT
975: expiry_dt,
976: authorising_person_id,
977: comments
978: FROM igs_pe_pers_encumb
979: WHERE ROWID = X_ROWID
980: FOR UPDATE NOWAIT;
981: tlinfo c1%ROWTYPE;
982:

Line 1106: UPDATE IGS_PE_PERS_ENCUMB SET

1102: x_last_updated_by=>X_LAST_UPDATED_BY,
1103: x_last_update_login=>X_LAST_UPDATE_LOGIN
1104: );
1105: END IF;
1106: UPDATE IGS_PE_PERS_ENCUMB SET
1107: expiry_dt = new_references.expiry_dt,
1108: authorising_person_id = new_references.authorising_person_id,
1109: comments = new_references.comments,
1110: cal_type = new_references.cal_type ,

Line 1143: CURSOR c1(cp_start_dt igs_pe_pers_encumb.start_dt%TYPE) IS

1139: x_auth_resp_id IN NUMBER,
1140: x_external_reference IN VARCHAR2 ,
1141: x_mode IN VARCHAR2
1142: ) AS
1143: CURSOR c1(cp_start_dt igs_pe_pers_encumb.start_dt%TYPE) IS
1144: SELECT ROWID FROM igs_pe_pers_encumb
1145: WHERE person_id = x_person_id
1146: AND encumbrance_type = x_encumbrance_type
1147: AND start_dt = cp_start_dt ;

Line 1144: SELECT ROWID FROM igs_pe_pers_encumb

1140: x_external_reference IN VARCHAR2 ,
1141: x_mode IN VARCHAR2
1142: ) AS
1143: CURSOR c1(cp_start_dt igs_pe_pers_encumb.start_dt%TYPE) IS
1144: SELECT ROWID FROM igs_pe_pers_encumb
1145: WHERE person_id = x_person_id
1146: AND encumbrance_type = x_encumbrance_type
1147: AND start_dt = cp_start_dt ;
1148:

Line 1154: l_start_dt igs_pe_pers_encumb.start_dt%TYPE;

1150: SELECT s_encumbrance_cat
1151: FROM igs_fi_encmb_type
1152: WHERE encumbrance_type = cp_encumbrance_type;
1153: system_type_rec system_type_cur%ROWTYPE;
1154: l_start_dt igs_pe_pers_encumb.start_dt%TYPE;
1155: BEGIN
1156:
1157: OPEN system_type_cur(x_encumbrance_type);
1158: FETCH system_type_cur INTO system_type_rec;

Line 1214: DELETE FROM IGS_PE_PERS_ENCUMB

1210: Before_DML(
1211: p_action => 'DELETE',
1212: x_rowid => X_ROWID
1213: );
1214: DELETE FROM IGS_PE_PERS_ENCUMB
1215: WHERE ROWID = X_ROWID;
1216: IF (SQL%NOTFOUND) THEN
1217: RAISE no_data_found;
1218: END IF;

Line 1224: END IGS_PE_PERS_ENCUMB_PKG;

1220: p_action => 'DELETE',
1221: x_rowid => X_ROWID
1222: );
1223: END DELETE_ROW;
1224: END IGS_PE_PERS_ENCUMB_PKG;