1: PACKAGE BODY HZ_MERGE_PARTY_DETAILS_PKG as
2: /* $Header: ARHPDTBB.pls 120.2 2005/10/30 04:22:04 appldev noship $ */
3: -- Start of Comments
4: -- Package name : HZ_MERGE_PARTY_DETAILS_PKG
5: -- Purpose :
1: PACKAGE BODY HZ_MERGE_PARTY_DETAILS_PKG as
2: /* $Header: ARHPDTBB.pls 120.2 2005/10/30 04:22:04 appldev noship $ */
3: -- Start of Comments
4: -- Package name : HZ_MERGE_PARTY_DETAILS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'HZ_MERGE_PARTY_DETAILS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'arhtdtbb.pls';
13:
14: PROCEDURE Insert_Row(
15: p_BATCH_PARTY_ID NUMBER,
24: p_LAST_UPDATED_BY NUMBER)
25:
26: IS
27: BEGIN
28: INSERT INTO HZ_MERGE_PARTY_DETAILS(
29: BATCH_PARTY_ID,
30: ENTITY_NAME,
31: MERGE_FROM_ENTITY_ID,
32: MERGE_TO_ENTITY_ID,
62: p_LAST_UPDATED_BY NUMBER)
63:
64: IS
65: BEGIN
66: Update HZ_MERGE_PARTY_DETAILS
67: SET
68: ENTITY_NAME = decode( p_ENTITY_NAME, FND_API.G_MISS_CHAR, ENTITY_NAME, p_ENTITY_NAME),
69: MERGE_FROM_ENTITY_ID = decode( p_MERGE_FROM_ENTITY_ID, FND_API.G_MISS_NUM, MERGE_FROM_ENTITY_ID, p_MERGE_FROM_ENTITY_ID),
70: MERGE_TO_ENTITY_ID = decode( p_MERGE_TO_ENTITY_ID, FND_API.G_MISS_NUM, MERGE_TO_ENTITY_ID, p_MERGE_TO_ENTITY_ID),
100:
101: IS
102: CURSOR C IS
103: SELECT *
104: FROM HZ_MERGE_PARTY_DETAILS
105: WHERE batch_party_id = p_batch_party_id
106: and ENTITY_NAME = p_ENTITY_NAME
107: and MERGE_FROM_ENTITY_ID = p_MERGE_FROM_ENTITY_ID
108: FOR UPDATE NOWAIT;
159: p_MERGE_FROM_ENTITY_ID NUMBER)
160:
161: IS
162: BEGIN
163: DELETE FROM HZ_MERGE_PARTY_DETAILS
164: WHERE BATCH_PARTY_ID = p_BATCH_PARTY_ID
165: and ENTITY_NAME = p_ENTITY_NAME
166: and MERGE_FROM_ENTITY_ID = p_MERGE_FROM_ENTITY_ID;
167:
170: End If;
171: END Delete_Row;
172:
173:
174: End HZ_MERGE_PARTY_DETAILS_PKG;