[Home] [Help]
1: package body IGS_EN_CAL_CONF_PKG AS
2: /* $Header: IGSEI26B.pls 120.1 2005/06/15 01:43:28 appldev $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_EN_CAL_CONF%RowType;
1: package body IGS_EN_CAL_CONF_PKG AS
2: /* $Header: IGSEI26B.pls 120.1 2005/06/15 01:43:28 appldev $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_EN_CAL_CONF%RowType;
6: new_references IGS_EN_CAL_CONF%RowType;
7:
8:
9: PROCEDURE Set_Column_Values (
2: /* $Header: IGSEI26B.pls 120.1 2005/06/15 01:43:28 appldev $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_EN_CAL_CONF%RowType;
6: new_references IGS_EN_CAL_CONF%RowType;
7:
8:
9: PROCEDURE Set_Column_Values (
10: p_action IN VARCHAR2,
38: ) AS
39:
40: CURSOR cur_old_ref_values IS
41: SELECT *
42: FROM IGS_EN_CAL_CONF
43: WHERE rowid = x_rowid;
44:
45: BEGIN
46:
596: )RETURN BOOLEAN AS
597:
598: CURSOR cur_rowid IS
599: SELECT rowid
600: FROM IGS_EN_CAL_CONF
601: WHERE s_control_num = x_s_control_num
602: FOR UPDATE NOWAIT;
603:
604: lv_rowid cur_rowid%RowType;
622: ) AS
623:
624: CURSOR cur_rowid IS
625: SELECT rowid
626: FROM IGS_EN_CAL_CONF
627: WHERE commence_cutoff_dt_alias = x_dt_alias
628: OR commencement_dt_alias = x_dt_alias
629: OR effect_enr_strt_dt_alias = x_dt_alias
630: OR enr_cleanup_dt_alias = x_dt_alias
808: x_schedule_open_dt_alias IN VARCHAR2 ,
809: x_audit_status_dt_alias IN VARCHAR2
810:
811: ) AS
812: cursor C is select ROWID from IGS_EN_CAL_CONF
813: where S_CONTROL_NUM = NEW_REFERENCES.S_CONTROL_NUM;
814: X_LAST_UPDATE_DATE DATE;
815: X_LAST_UPDATED_BY NUMBER;
816: X_LAST_UPDATE_LOGIN NUMBER;
865: x_audit_status_dt_alias => x_audit_status_dt_alias
866: );
867:
868:
869: insert into IGS_EN_CAL_CONF (
870: S_CONTROL_NUM,
871: COMMENCE_CUTOFF_DT_ALIAS,
872: COMMENCEMENT_DT_ALIAS,
873: EFFECT_ENR_STRT_DT_ALIAS,
980: clean_trans_dt_alias,
981: planning_open_dt_alias,
982: schedule_open_dt_alias,
983: audit_status_dt_alias
984: from IGS_EN_CAL_CONF
985: where ROWID = X_ROWID
986: for update nowait;
987: tlinfo c1%rowtype;
988:
1142: x_audit_status_dt_alias => x_audit_status_dt_alias
1143: );
1144:
1145:
1146: update IGS_EN_CAL_CONF set
1147: COMMENCE_CUTOFF_DT_ALIAS = NEW_REFERENCES.COMMENCE_CUTOFF_DT_ALIAS,
1148: COMMENCEMENT_DT_ALIAS = NEW_REFERENCES.COMMENCEMENT_DT_ALIAS,
1149: EFFECT_ENR_STRT_DT_ALIAS = NEW_REFERENCES.EFFECT_ENR_STRT_DT_ALIAS,
1150: RECORD_OPEN_DT_ALIAS = NEW_REFERENCES.RECORD_OPEN_DT_ALIAS,
1204: x_planning_open_dt_alias IN VARCHAR2 DEFAULT NULL,
1205: x_schedule_open_dt_alias IN VARCHAR2 ,
1206: x_audit_status_dt_alias IN VARCHAR2 DEFAULT NULL
1207: ) AS
1208: cursor c1 is select rowid from IGS_EN_CAL_CONF
1209: where S_CONTROL_NUM = nvl(X_S_CONTROL_NUM,1)
1210: ;
1211:
1212: begin
1279: p_action => 'DELETE',
1280: x_rowid => X_ROWID
1281: );
1282:
1283: delete from IGS_EN_CAL_CONF
1284: where ROWID = X_ROWID;
1285: if (sql%notfound) then
1286: raise no_data_found;
1287: end if;
1293:
1294:
1295: end DELETE_ROW;
1296:
1297: end IGS_EN_CAL_CONF_PKG;