1: PACKAGE BODY CS_SR_TSK_TMPL_SEQ_RULES_PKG AS
2: /* $Header: cstskrlb.pls 120.0 2006/03/07 18:40:06 jngeorge noship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out NOCOPY VARCHAR2,
16: P_LAST_UPDATE_LOGIN in NUMBER
17: ) IS
18:
19: BEGIN
20: INSERT INTO CS_SR_TSK_TMPL_SEQ_RULES (
21: ACTIVE_FLAG,
22: CREATION_DATE,
23: CREATED_BY,
24: LAST_UPDATE_DATE,
61: SECURITY_GROUP_ID,
62: SEARCH_RULE_CODE,
63: SEARCH_SEQUENCE,
64: SEARCH_RULE_ID
65: from CS_SR_TSK_TMPL_SEQ_RULES
66: where SEARCH_RULE_ID = P_SEARCH_RULE_ID
67: and OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER
68: for update of SEARCH_RULE_ID nowait;
69: begin
98: P_LAST_UPDATED_BY in NUMBER,
99: P_LAST_UPDATE_LOGIN in NUMBER
100: ) is
101: begin
102: update CS_SR_TSK_TMPL_SEQ_RULES set
103: ACTIVE_FLAG = P_ACTIVE_FLAG,
104: OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER,
105: SECURITY_GROUP_ID = P_SECURITY_GROUP_ID,
106: SEARCH_RULE_CODE = P_SEARCH_RULE_CODE,
118:
119: procedure DELETE_ROW (
120: P_SEARCH_RULE_ID in NUMBER) is
121: begin
122: delete from CS_SR_TSK_TMPL_SEQ_RULES
123: where SEARCH_RULE_ID = P_SEARCH_RULE_ID;
124:
125: if (sql%notfound) then
126: raise no_data_found;
186: ) ;
187:
188: END LOAD_ROW ;
189:
190: END CS_SR_TSK_TMPL_SEQ_RULES_PKG;