1: package body EGO_USER_RULES_PKG as
2: /* $Header: EGOVUSRB.pls 120.1 2007/07/31 10:55:23 rgadiyar noship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out nocopy VARCHAR2,
353: declare
354: l_rule_id number := 0;
355: begin
356:
357: EGO_USER_RULES_PKG.UPDATE_ROW(
358: X_RULE_ID => X_RULE_ID,
359: X_RULESET_ID => X_RULESET_ID,
360: X_SEQUENCE => X_SEQUENCE,
361: X_RULE_NAME => X_RULE_NAME,
374: exception
375: when NO_DATA_FOUND then
376: select EGO_USER_RULES_S.nextval into l_rule_id from dual;
377:
378: EGO_USER_RULES_PKG.INSERT_ROW(
379: X_ROWID => X_ROWID,
380: X_RULE_ID => l_rule_id,
381: X_RULESET_ID => X_RULESET_ID,
382: X_SEQUENCE => X_SEQUENCE,
397: end;
398:
399: end LOAD_ROW;
400:
401: end EGO_USER_RULES_PKG;