1: PACKAGE BODY igs_tr_item_pkg AS
2: /* $Header: IGSTI12B.pls 120.0 2005/06/01 21:06:26 appldev noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_tr_item_all%ROWTYPE;
6: new_references igs_tr_item_all%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSTI12B.pls 120.0 2005/06/01 21:06:26 appldev noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_tr_item_all%ROWTYPE;
6: new_references igs_tr_item_all%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 DEFAULT NULL,
30: ) AS
31:
32: CURSOR cur_old_ref_values IS
33: SELECT *
34: FROM igs_tr_item_all
35: WHERE ROWID = x_rowid;
36:
37: BEGIN
38:
360: ) RETURN BOOLEAN AS
361:
362: CURSOR cur_rowid IS
363: SELECT ROWID
364: FROM igs_tr_item_all
365: WHERE tracking_id = x_tracking_id
366: FOR UPDATE NOWAIT;
367:
368: lv_rowid cur_rowid%ROWTYPE;
387: ) AS
388:
389: CURSOR cur_rowid IS
390: SELECT ROWID
391: FROM igs_tr_item_all
392: WHERE source_person_id = x_person_id
393: OR originator_person_id = x_person_id ;
394:
395: lv_rowid cur_rowid%ROWTYPE;
534: ) AS
535:
536: CURSOR c IS
537: SELECT ROWID
538: FROM igs_tr_item_all
539: WHERE tracking_id = x_tracking_id;
540:
541: x_last_update_date DATE;
542: x_last_updated_by NUMBER;
607: x_last_update_login => x_last_update_login,
608: x_org_id => igs_ge_gen_003.get_org_id
609: );
610:
611: INSERT INTO igs_tr_item_all (
612: tracking_id,
613: tracking_status,
614: tracking_type,
615: source_person_id,
693: CURSOR c1 IS
694: SELECT tracking_status, tracking_type, source_person_id, start_dt, target_days,
695: sequence_ind, business_days_ind, originator_person_id, s_created_ind,
696: override_offset_clc_ind, completion_due_dt, publish_ind
697: FROM igs_tr_item_all
698: WHERE ROWID = x_rowid
699: FOR UPDATE NOWAIT;
700:
701: tlinfo c1%ROWTYPE;
830: x_program_update_date := SYSDATE;
831: END IF;
832: END IF;
833:
834: UPDATE igs_tr_item_all SET
835: tracking_status = new_references.tracking_status,
836: tracking_type = new_references.tracking_type,
837: source_person_id = new_references.source_person_id,
838: start_dt = new_references.start_dt,
884: ) AS
885:
886: CURSOR c1 IS
887: SELECT ROWID
888: FROM igs_tr_item_all
889: WHERE tracking_id = x_tracking_id;
890:
891: BEGIN
892:
947: p_action =>'DELETE',
948: x_rowid => x_rowid
949: );
950:
951: DELETE FROM igs_tr_item_all WHERE ROWID = x_rowid;
952:
953: IF (SQL%NOTFOUND) THEN
954: RAISE no_data_found;
955: END IF;