APPS.HZ_ADAPTERS_PKG dependencies on HZ_ADAPTERS

Line 1: PACKAGE BODY HZ_ADAPTERS_PKG AS

1: PACKAGE BODY HZ_ADAPTERS_PKG AS
2: /*$Header: ARHADPTB.pls 115.0 2003/08/13 23:47:14 acng noship $ */
3:
4: PROCEDURE Insert_Row(
5: x_adapter_id IN OUT NOCOPY NUMBER,

Line 33: INSERT INTO HZ_ADAPTERS(

29: END IF;
30:
31: WHILE l_success = 'N' LOOP
32: BEGIN
33: INSERT INTO HZ_ADAPTERS(
34: adapter_id,
35: adapter_content_source,
36: enabled_flag,
37: synchronous_flag,

Line 53: DECODE(x_adapter_id, fnd_api.g_miss_num, hz_adapters_s.NEXTVAL,

49: created_by,
50: last_update_login,
51: object_version_number
52: ) VALUES (
53: DECODE(x_adapter_id, fnd_api.g_miss_num, hz_adapters_s.NEXTVAL,
54: NULL, hz_adapters_s.NEXTVAL, x_adapter_id),
55: DECODE(x_adapter_content_source,
56: fnd_api.g_miss_char, NULL, x_adapter_content_source),
57: DECODE(x_enabled_flag,

Line 54: NULL, hz_adapters_s.NEXTVAL, x_adapter_id),

50: last_update_login,
51: object_version_number
52: ) VALUES (
53: DECODE(x_adapter_id, fnd_api.g_miss_num, hz_adapters_s.NEXTVAL,
54: NULL, hz_adapters_s.NEXTVAL, x_adapter_id),
55: DECODE(x_adapter_content_source,
56: fnd_api.g_miss_char, NULL, x_adapter_content_source),
57: DECODE(x_enabled_flag,
58: fnd_api.g_miss_char, NULL, x_enabled_flag),

Line 92: IF INSTRB(SQLERRM, 'HZ_ADAPTERS_U1') <> 0 OR

88: l_success := 'Y';
89:
90: EXCEPTION
91: WHEN DUP_VAL_ON_INDEX THEN
92: IF INSTRB(SQLERRM, 'HZ_ADAPTERS_U1') <> 0 OR
93: INSTRB(SQLERRM, 'HZ_ADAPTERS_PK') <> 0
94: THEN
95: IF l_primary_key_passed THEN
96: fnd_message.set_name('AR', 'HZ_API_DUPLICATE_COLUMN');

Line 93: INSTRB(SQLERRM, 'HZ_ADAPTERS_PK') <> 0

89:
90: EXCEPTION
91: WHEN DUP_VAL_ON_INDEX THEN
92: IF INSTRB(SQLERRM, 'HZ_ADAPTERS_U1') <> 0 OR
93: INSTRB(SQLERRM, 'HZ_ADAPTERS_PK') <> 0
94: THEN
95: IF l_primary_key_passed THEN
96: fnd_message.set_name('AR', 'HZ_API_DUPLICATE_COLUMN');
97: fnd_message.set_token('COLUMN', 'adapter_id');

Line 108: FROM HZ_ADAPTERS;

104: l_max_adapter_id NUMBER;
105: BEGIN
106: l_temp_adapter_id := 0;
107: SELECT max(ADAPTER_ID) INTO l_max_adapter_id
108: FROM HZ_ADAPTERS;
109: WHILE l_temp_adapter_id <= l_max_adapter_id LOOP
110: SELECT HZ_ADAPTERS_S.NEXTVAL
111: INTO l_temp_adapter_id FROM dual;
112: END LOOP;

Line 110: SELECT HZ_ADAPTERS_S.NEXTVAL

106: l_temp_adapter_id := 0;
107: SELECT max(ADAPTER_ID) INTO l_max_adapter_id
108: FROM HZ_ADAPTERS;
109: WHILE l_temp_adapter_id <= l_max_adapter_id LOOP
110: SELECT HZ_ADAPTERS_S.NEXTVAL
111: INTO l_temp_adapter_id FROM dual;
112: END LOOP;
113: END;
114: ELSE

Line 140: UPDATE hz_adapters

136: ) IS
137:
138: BEGIN
139:
140: UPDATE hz_adapters
141: SET adapter_id = DECODE(x_adapter_id, NULL, adapter_id,
142: fnd_api.g_miss_num, NULL, x_adapter_id),
143: adapter_content_source = DECODE(x_adapter_content_source,
144: NULL, adapter_content_source,

Line 209: FROM hz_adapters

205: ) IS
206:
207: CURSOR c IS
208: SELECT *
209: FROM hz_adapters
210: WHERE ROWID = x_rowid
211: FOR UPDATE NOWAIT;
212:
213: recinfo c%ROWTYPE;

Line 290: DELETE FROM hz_adapters

286:
287:
288: PROCEDURE delete_row (x_adapter_id IN NUMBER) IS
289: BEGIN
290: DELETE FROM hz_adapters
291: WHERE adapter_id = x_adapter_id;
292:
293: IF (SQL%NOTFOUND) THEN
294: RAISE NO_DATA_FOUND;

Line 298: END HZ_ADAPTERS_PKG;

294: RAISE NO_DATA_FOUND;
295: END IF;
296: END delete_row;
297:
298: END HZ_ADAPTERS_PKG;