APPS.HZ_MATCH_RULE_PRIMARY_PKG dependencies on HZ_MATCH_RULE_PRIMARY

Line 1: PACKAGE BODY HZ_MATCH_RULE_PRIMARY_PKG AS

1: PACKAGE BODY HZ_MATCH_RULE_PRIMARY_PKG AS
2: /*$Header: ARHDQMPB.pls 120.6 2005/10/30 04:19:06 appldev noship $ */
3: PROCEDURE Insert_Row(
4: px_PRIMARY_ATTRIBUTE_ID IN OUT NOCOPY NUMBER,
5: p_MATCH_RULE_ID NUMBER,

Line 17: CURSOR C2 IS SELECT HZ_MATCH_RULE_PRIMARY_s.nextval FROM sys.dual;

13: p_LAST_UPDATED_BY NUMBER,
14: p_OBJECT_VERSION_NUMBER NUMBER,
15: p_DISPLAY_ORDER NUMBER DEFAULT NULL)
16: IS
17: CURSOR C2 IS SELECT HZ_MATCH_RULE_PRIMARY_s.nextval FROM sys.dual;
18: l_success VARCHAR2(1);
19: BEGIN
20: l_success := 'N';
21: WHILE l_success = 'N' LOOP

Line 28: INSERT INTO HZ_MATCH_RULE_PRIMARY(

24: OPEN C2;
25: FETCH C2 INTO px_PRIMARY_ATTRIBUTE_ID;
26: CLOSE C2;
27: END IF;
28: INSERT INTO HZ_MATCH_RULE_PRIMARY(
29: PRIMARY_ATTRIBUTE_ID,
30: MATCH_RULE_ID,
31: ATTRIBUTE_ID,
32: ACTIVE_FLAG,

Line 58: IF INSTRB( SQLERRM, 'HZ_MATCH_RULE_PRIMARY_U1' ) <> 0 THEN

54: decode(p_DISPLAY_ORDER, FND_API.G_MISS_NUM, NULL, p_DISPLAY_ORDER)
55: );
56: l_success := 'Y';
57: EXCEPTION WHEN DUP_VAL_ON_INDEX THEN
58: IF INSTRB( SQLERRM, 'HZ_MATCH_RULE_PRIMARY_U1' ) <> 0 THEN
59: DECLARE
60: l_count NUMBER;
61: l_dummy VARCHAR2(1);
62: BEGIN

Line 65: SELECT HZ_MATCH_RULE_PRIMARY_s.nextval

61: l_dummy VARCHAR2(1);
62: BEGIN
63: l_count := 1;
64: WHILE l_count > 0 LOOP
65: SELECT HZ_MATCH_RULE_PRIMARY_s.nextval
66: into px_PRIMARY_ATTRIBUTE_ID FROM sys.dual;
67: BEGIN
68: SELECT 'Y' INTO l_dummy
69: FROM HZ_MATCH_RULE_PRIMARY

Line 69: FROM HZ_MATCH_RULE_PRIMARY

65: SELECT HZ_MATCH_RULE_PRIMARY_s.nextval
66: into px_PRIMARY_ATTRIBUTE_ID FROM sys.dual;
67: BEGIN
68: SELECT 'Y' INTO l_dummy
69: FROM HZ_MATCH_RULE_PRIMARY
70: WHERE PRIMARY_ATTRIBUTE_ID = px_PRIMARY_ATTRIBUTE_ID;
71: l_count := 1;
72: EXCEPTION WHEN NO_DATA_FOUND THEN
73: l_count := 0;

Line 103: UPDATE hz_match_rule_primary

99: BEGIN
100:
101: l_object_version_number := NVL(p_object_version_number, 1) + 1;
102:
103: UPDATE hz_match_rule_primary
104: SET
105: MATCH_RULE_ID = decode(p_MATCH_RULE_ID, FND_API.G_MISS_NUM, MATCH_RULE_ID, p_MATCH_RULE_ID),
106: ATTRIBUTE_ID = decode(p_ATTRIBUTE_ID, FND_API.G_MISS_NUM, ATTRIBUTE_ID, p_ATTRIBUTE_ID),
107: ACTIVE_FLAG = decode(p_ACTIVE_FLAG, FND_API.G_MISS_CHAR, ACTIVE_FLAG, p_ACTIVE_FLAG),

Line 130: DELETE FROM HZ_MATCH_RULE_PRIMARY

126: END Update_Row;
127:
128: PROCEDURE Delete_Row(p_primary_attribute_id NUMBER) IS
129: BEGIN
130: DELETE FROM HZ_MATCH_RULE_PRIMARY
131: WHERE primary_attribute_id = p_primary_attribute_id;
132:
133: If (SQL%NOTFOUND) then
134: RAISE NO_DATA_FOUND;

Line 145: FROM hz_match_rule_primary

141: ) IS
142: CURSOR C IS
143:
144: SELECT OBJECT_VERSION_NUMBER
145: FROM hz_match_rule_primary
146: WHERE primary_attribute_id = p_primary_attribute_id
147: FOR UPDATE OF primary_attribute_id NOWAIT;
148: Recinfo C%ROWTYPE;
149: BEGIN

Line 172: END HZ_MATCH_RULE_PRIMARY_PKG;

168: APP_EXCEPTION.RAISE_EXCEPTION;
169: End If;
170: END Lock_Row;
171:
172: END HZ_MATCH_RULE_PRIMARY_PKG;