[Home] [Help]
26: -- Version Initial version number = 1.0
27: -- History Current version number = 1.0
28: --=======================================================
29: procedure CREATE_FOREIGN_KEY (
30: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
31: p_api_version_number IN NUMBER,
32: p_init_msg_tbl IN BOOLEAN := FALSE,
33: p_msg_count OUT NOCOPY NUMBER,
34: p_msg_data OUT NOCOPY VARCHAR2,
36: p_foreign_key_name IN VARCHAR2,
37: p_database_object_name IN VARCHAR2,
38: p_unique_key_name IN VARCHAR2,
39: p_application_id IN NUMBER,
40: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
37: p_database_object_name IN VARCHAR2,
38: p_unique_key_name IN VARCHAR2,
39: p_application_id IN NUMBER,
40: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
38: p_unique_key_name IN VARCHAR2,
39: p_application_id IN NUMBER,
40: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
39: p_application_id IN NUMBER,
40: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
40: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
41: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
42: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
43: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
44: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
45: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
46: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
47: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
48: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
49: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
50: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
51: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
53: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
54: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
55: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
56: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
64: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
57: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
64: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
65: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
58: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
64: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
65: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
66: p_pass IN NUMBER,
59: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
64: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
65: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
66: p_pass IN NUMBER,
67: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
60: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
64: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
65: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
66: p_pass IN NUMBER,
67: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
68: ) is
61: p_creation_date IN DATE := FND_API.G_MISS_DATE,
62: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
63: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
64: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
65: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
66: p_pass IN NUMBER,
67: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
68: ) is
69: l_api_version_number CONSTANT number := 1.0;
97: l_to_from_description VARCHAR2(1500);
98: l_to_from_name VARCHAR2(45);
99: begin
100:
101: IF NOT FND_API.Compatible_API_Call (
102: l_api_version_number, p_api_version_number, l_api_name,
103: G_PKG_NAME) then
104: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
105: return;
100:
101: IF NOT FND_API.Compatible_API_Call (
102: l_api_version_number, p_api_version_number, l_api_name,
103: G_PKG_NAME) then
104: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
105: return;
106: END IF;
107:
108: -- Initialize the message table if requested.
122: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_EXISTS');
123: FND_MSG_PUB.Add;
124: end if;
125: --dbms_output.put_line(l_api_name || 'Error - Row already exists');
126: raise FND_API.G_EXC_ERROR;
127: end if;
128:
129: --** validate table columns passed in **
130: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
126: raise FND_API.G_EXC_ERROR;
127: end if;
128:
129: --** validate table columns passed in **
130: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
131: if not VALIDATE_FOREIGN_KEY (
132: p_validation_level => p_validation_level,
133: p_api_version_number => 1.0,
134: p_return_status => l_return_status,
139: p_caller => AK_ON_OBJECTS_PVT.G_CREATE,
140: p_pass => p_pass
141: ) then
142: --dbms_output.put_line(l_api_name || 'validation failed');
143: raise FND_API.G_EXC_ERROR;
144: end if;
145: end if;
146:
147: --** Load non-required columns if their values are given **
144: end if;
145: end if;
146:
147: --** Load non-required columns if their values are given **
148: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
149: l_attribute_category := p_attribute_category;
150: end if;
151:
152: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
148: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
149: l_attribute_category := p_attribute_category;
150: end if;
151:
152: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
153: l_attribute1 := p_attribute1;
154: end if;
155:
156: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
152: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
153: l_attribute1 := p_attribute1;
154: end if;
155:
156: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
157: l_attribute2 := p_attribute2;
158: end if;
159:
160: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
156: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
157: l_attribute2 := p_attribute2;
158: end if;
159:
160: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
161: l_attribute3 := p_attribute3;
162: end if;
163:
164: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
160: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
161: l_attribute3 := p_attribute3;
162: end if;
163:
164: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
165: l_attribute4 := p_attribute4;
166: end if;
167:
168: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
164: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
165: l_attribute4 := p_attribute4;
166: end if;
167:
168: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
169: l_attribute5 := p_attribute5;
170: end if;
171:
172: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
168: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
169: l_attribute5 := p_attribute5;
170: end if;
171:
172: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
173: l_attribute6 := p_attribute6;
174: end if;
175:
176: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
172: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
173: l_attribute6 := p_attribute6;
174: end if;
175:
176: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
177: l_attribute7:= p_attribute7;
178: end if;
179:
180: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
176: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
177: l_attribute7:= p_attribute7;
178: end if;
179:
180: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
181: l_attribute8 := p_attribute8;
182: end if;
183:
184: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
180: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
181: l_attribute8 := p_attribute8;
182: end if;
183:
184: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
185: l_attribute9 := p_attribute9;
186: end if;
187:
188: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
184: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
185: l_attribute9 := p_attribute9;
186: end if;
187:
188: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
189: l_attribute10 := p_attribute10;
190: end if;
191:
192: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
188: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
189: l_attribute10 := p_attribute10;
190: end if;
191:
192: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
193: l_attribute11 := p_attribute11;
194: end if;
195:
196: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
192: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
193: l_attribute11 := p_attribute11;
194: end if;
195:
196: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
197: l_attribute12 := p_attribute12;
198: end if;
199:
200: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
196: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
197: l_attribute12 := p_attribute12;
198: end if;
199:
200: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
201: l_attribute13 := p_attribute13;
202: end if;
203:
204: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
200: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
201: l_attribute13 := p_attribute13;
202: end if;
203:
204: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
205: l_attribute14 := p_attribute14;
206: end if;
207:
208: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
204: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
205: l_attribute14 := p_attribute14;
206: end if;
207:
208: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
209: l_attribute15 := p_attribute15;
210: end if;
211:
212: if (p_from_to_name <> FND_API.G_MISS_CHAR) then
208: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
209: l_attribute15 := p_attribute15;
210: end if;
211:
212: if (p_from_to_name <> FND_API.G_MISS_CHAR) then
213: l_from_to_name := p_from_to_name;
214: end if;
215:
216: if (p_from_to_description <> FND_API.G_MISS_CHAR) then
212: if (p_from_to_name <> FND_API.G_MISS_CHAR) then
213: l_from_to_name := p_from_to_name;
214: end if;
215:
216: if (p_from_to_description <> FND_API.G_MISS_CHAR) then
217: l_from_to_description := p_from_to_description;
218: end if;
219:
220: if (p_to_from_name <> FND_API.G_MISS_CHAR) then
216: if (p_from_to_description <> FND_API.G_MISS_CHAR) then
217: l_from_to_description := p_from_to_description;
218: end if;
219:
220: if (p_to_from_name <> FND_API.G_MISS_CHAR) then
221: l_to_from_name := p_to_from_name;
222: end if;
223:
224: if (p_to_from_description <> FND_API.G_MISS_CHAR) then
220: if (p_to_from_name <> FND_API.G_MISS_CHAR) then
221: l_to_from_name := p_to_from_name;
222: end if;
223:
224: if (p_to_from_description <> FND_API.G_MISS_CHAR) then
225: l_to_from_description := p_to_from_description;
226: end if;
227:
228: if (p_created_by <> FND_API.G_MISS_NUM) then
224: if (p_to_from_description <> FND_API.G_MISS_CHAR) then
225: l_to_from_description := p_to_from_description;
226: end if;
227:
228: if (p_created_by <> FND_API.G_MISS_NUM) then
229: l_created_by := p_created_by;
230: end if;
231:
232: if (p_creation_date <> FND_API.G_MISS_DATE) then
228: if (p_created_by <> FND_API.G_MISS_NUM) then
229: l_created_by := p_created_by;
230: end if;
231:
232: if (p_creation_date <> FND_API.G_MISS_DATE) then
233: l_creation_date := p_creation_date;
234: end if;
235:
236: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
232: if (p_creation_date <> FND_API.G_MISS_DATE) then
233: l_creation_date := p_creation_date;
234: end if;
235:
236: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
237: l_last_updated_by := p_last_updated_by;
238: end if;
239:
240: if (p_last_update_date <> FND_API.G_MISS_DATE) then
236: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
237: l_last_updated_by := p_last_updated_by;
238: end if;
239:
240: if (p_last_update_date <> FND_API.G_MISS_DATE) then
241: l_last_update_date := p_last_update_date;
242: end if;
243:
244: if (p_last_update_login <> FND_API.G_MISS_NUM) then
240: if (p_last_update_date <> FND_API.G_MISS_DATE) then
241: l_last_update_date := p_last_update_date;
242: end if;
243:
244: if (p_last_update_login <> FND_API.G_MISS_NUM) then
245: l_last_update_login := p_last_update_login;
246: end if;
247:
248: -- Create record if no validation error was found
330: FND_MESSAGE.SET_NAME('AK','AK_INSERT_FK_FAILED');
331: FND_MSG_PUB.Add;
332: end if;
333: --dbms_output.put_line(G_PKG_NAME || 'Error - First insert failed');
334: raise FND_API.G_EXC_ERROR;
335: end if;
336:
337: insert into AK_FOREIGN_KEYS_TL (
338: FOREIGN_KEY_NAME,
373: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
374: FND_MSG_PUB.Add;
375: end if;
376:
377: p_return_status := FND_API.G_RET_STS_SUCCESS;
378:
379: FND_MSG_PUB.Count_And_Get (
380: p_count => p_msg_count,
381: p_data => p_msg_data);
386: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_VALUE_ERROR');
387: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
388: FND_MSG_PUB.Add;
389: end if;
390: p_return_status := FND_API.G_RET_STS_ERROR;
391: rollback to start_create_foreign_key;
392: FND_MSG_PUB.Count_And_Get (
393: p_count => p_msg_count,
394: p_data => p_msg_data);
391: rollback to start_create_foreign_key;
392: FND_MSG_PUB.Count_And_Get (
393: p_count => p_msg_count,
394: p_data => p_msg_data);
395: WHEN FND_API.G_EXC_ERROR THEN
396: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
397: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
398: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
399: FND_MSG_PUB.Add;
397: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
398: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
399: FND_MSG_PUB.Add;
400: end if;
401: p_return_status := FND_API.G_RET_STS_ERROR;
402: rollback to start_create_foreign_key;
403: FND_MSG_PUB.Count_And_Get (
404: p_count => p_msg_count,
405: p_data => p_msg_data);
403: FND_MSG_PUB.Count_And_Get (
404: p_count => p_msg_count,
405: p_data => p_msg_data);
406: WHEN OTHERS THEN
407: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
408: rollback to start_create_foreign_key;
409: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_CREATED');
410: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
411: FND_MSG_PUB.Add;
441: -- Version Initial version number = 1.0
442: -- History Current version number = 1.0
443: --=======================================================
444: procedure CREATE_FOREIGN_KEY_COLUMN (
445: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
446: p_api_version_number IN NUMBER,
447: p_init_msg_tbl IN BOOLEAN := FALSE,
448: p_msg_count OUT NOCOPY NUMBER,
449: p_msg_data OUT NOCOPY VARCHAR2,
451: p_foreign_key_name IN VARCHAR2,
452: p_attribute_application_id IN NUMBER,
453: p_attribute_code IN VARCHAR2,
454: p_foreign_key_sequence IN NUMBER,
455: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
456: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
452: p_attribute_application_id IN NUMBER,
453: p_attribute_code IN VARCHAR2,
454: p_foreign_key_sequence IN NUMBER,
455: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
456: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
453: p_attribute_code IN VARCHAR2,
454: p_foreign_key_sequence IN NUMBER,
455: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
456: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
454: p_foreign_key_sequence IN NUMBER,
455: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
456: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
455: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
456: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
456: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
457: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
458: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
459: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
460: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
461: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
462: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
463: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
464: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
465: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
466: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
467: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
475: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
468: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
475: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
476: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
469: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
475: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
476: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
477: p_pass IN NUMBER,
470: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
475: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
476: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
477: p_pass IN NUMBER,
478: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
471: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
475: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
476: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
477: p_pass IN NUMBER,
478: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
479: ) is
472: p_creation_date IN DATE := FND_API.G_MISS_DATE,
473: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
474: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
475: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
476: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
477: p_pass IN NUMBER,
478: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
479: ) is
480: l_api_version_number CONSTANT number := 1.0;
503: l_last_updated_by number;
504: l_return_status varchar2(1);
505: begin
506:
507: IF NOT FND_API.Compatible_API_Call (
508: l_api_version_number, p_api_version_number, l_api_name,
509: G_PKG_NAME) then
510: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
511: return;
506:
507: IF NOT FND_API.Compatible_API_Call (
508: l_api_version_number, p_api_version_number, l_api_name,
509: G_PKG_NAME) then
510: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
511: return;
512: END IF;
513:
514: -- Initialize the message table if requested.
529: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
530: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_EXISTS');
531: FND_MSG_PUB.Add;
532: end if;
533: raise FND_API.G_EXC_ERROR;
534: end if;
535:
536: --** validate table columns passed in **
537: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
533: raise FND_API.G_EXC_ERROR;
534: end if;
535:
536: --** validate table columns passed in **
537: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
538: if not VALIDATE_FOREIGN_KEY_COLUMN (
539: p_validation_level => p_validation_level,
540: p_api_version_number => 1.0,
541: p_return_status => l_return_status,
545: p_foreign_key_sequence => p_foreign_key_sequence,
546: p_caller => AK_ON_OBJECTS_PVT.G_CREATE,
547: p_pass => p_pass
548: ) then
549: raise FND_API.G_EXC_ERROR;
550: end if;
551: end if;
552:
553: --** Load non-required columns if their values are given **
551: end if;
552:
553: --** Load non-required columns if their values are given **
554: --
555: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
556: l_attribute_category := p_attribute_category;
557: end if;
558:
559: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
555: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
556: l_attribute_category := p_attribute_category;
557: end if;
558:
559: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
560: l_attribute1 := p_attribute1;
561: end if;
562:
563: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
559: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
560: l_attribute1 := p_attribute1;
561: end if;
562:
563: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
564: l_attribute2 := p_attribute2;
565: end if;
566:
567: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
563: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
564: l_attribute2 := p_attribute2;
565: end if;
566:
567: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
568: l_attribute3 := p_attribute3;
569: end if;
570:
571: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
567: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
568: l_attribute3 := p_attribute3;
569: end if;
570:
571: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
572: l_attribute4 := p_attribute4;
573: end if;
574:
575: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
571: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
572: l_attribute4 := p_attribute4;
573: end if;
574:
575: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
576: l_attribute5 := p_attribute5;
577: end if;
578:
579: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
575: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
576: l_attribute5 := p_attribute5;
577: end if;
578:
579: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
580: l_attribute6 := p_attribute6;
581: end if;
582:
583: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
579: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
580: l_attribute6 := p_attribute6;
581: end if;
582:
583: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
584: l_attribute7:= p_attribute7;
585: end if;
586:
587: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
583: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
584: l_attribute7:= p_attribute7;
585: end if;
586:
587: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
588: l_attribute8 := p_attribute8;
589: end if;
590:
591: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
587: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
588: l_attribute8 := p_attribute8;
589: end if;
590:
591: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
592: l_attribute9 := p_attribute9;
593: end if;
594:
595: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
591: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
592: l_attribute9 := p_attribute9;
593: end if;
594:
595: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
596: l_attribute10 := p_attribute10;
597: end if;
598:
599: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
595: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
596: l_attribute10 := p_attribute10;
597: end if;
598:
599: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
600: l_attribute11 := p_attribute11;
601: end if;
602:
603: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
599: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
600: l_attribute11 := p_attribute11;
601: end if;
602:
603: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
604: l_attribute12 := p_attribute12;
605: end if;
606:
607: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
603: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
604: l_attribute12 := p_attribute12;
605: end if;
606:
607: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
608: l_attribute13 := p_attribute13;
609: end if;
610:
611: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
607: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
608: l_attribute13 := p_attribute13;
609: end if;
610:
611: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
612: l_attribute14 := p_attribute14;
613: end if;
614:
615: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
611: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
612: l_attribute14 := p_attribute14;
613: end if;
614:
615: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
616: l_attribute15 := p_attribute15;
617: end if;
618:
619: if (p_created_by <> FND_API.G_MISS_NUM) then
615: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
616: l_attribute15 := p_attribute15;
617: end if;
618:
619: if (p_created_by <> FND_API.G_MISS_NUM) then
620: l_created_by := p_created_by;
621: end if;
622:
623: if (p_creation_date <> FND_API.G_MISS_DATE) then
619: if (p_created_by <> FND_API.G_MISS_NUM) then
620: l_created_by := p_created_by;
621: end if;
622:
623: if (p_creation_date <> FND_API.G_MISS_DATE) then
624: l_creation_date := p_creation_date;
625: end if;
626:
627: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
623: if (p_creation_date <> FND_API.G_MISS_DATE) then
624: l_creation_date := p_creation_date;
625: end if;
626:
627: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
628: l_last_updated_by := p_last_updated_by;
629: end if;
630:
631: if (p_last_update_date <> FND_API.G_MISS_DATE) then
627: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
628: l_last_updated_by := p_last_updated_by;
629: end if;
630:
631: if (p_last_update_date <> FND_API.G_MISS_DATE) then
632: l_last_update_date := p_last_update_date;
633: end if;
634:
635: if (p_last_update_login <> FND_API.G_MISS_NUM) then
631: if (p_last_update_date <> FND_API.G_MISS_DATE) then
632: l_last_update_date := p_last_update_date;
633: end if;
634:
635: if (p_last_update_login <> FND_API.G_MISS_NUM) then
636: l_last_update_login := p_last_update_login;
637: end if;
638:
639: -- Create record if no validation error was found
716: ' ' || p_attribute_code);
717: FND_MSG_PUB.Add;
718: end if;
719:
720: p_return_status := FND_API.G_RET_STS_SUCCESS;
721:
722: FND_MSG_PUB.Count_And_Get (
723: p_count => p_msg_count,
724: p_data => p_msg_data);
731: ' ' || to_char(p_attribute_application_id) ||
732: ' ' || p_attribute_code);
733: FND_MSG_PUB.Add;
734: end if;
735: p_return_status := FND_API.G_RET_STS_ERROR;
736: rollback to start_create_key_column;
737: FND_MSG_PUB.Count_And_Get (
738: p_count => p_msg_count,
739: p_data => p_msg_data);
736: rollback to start_create_key_column;
737: FND_MSG_PUB.Count_And_Get (
738: p_count => p_msg_count,
739: p_data => p_msg_data);
740: WHEN FND_API.G_EXC_ERROR THEN
741: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
742: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_CREATED');
743: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
744: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
745: ' ' || to_char(p_attribute_application_id) ||
746: ' ' || p_attribute_code);
747: FND_MSG_PUB.Add;
748: end if;
749: p_return_status := FND_API.G_RET_STS_ERROR;
750: rollback to start_create_key_column;
751: FND_MSG_PUB.Count_And_Get (
752: p_count => p_msg_count,
753: p_data => p_msg_data);
751: FND_MSG_PUB.Count_And_Get (
752: p_count => p_msg_count,
753: p_data => p_msg_data);
754: WHEN OTHERS THEN
755: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
756: rollback to start_create_key_column;
757: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_CREATED');
758: FND_MESSAGE.SET_TOKEN('OBJECT','AK_FOREIGN_KEY_COLUMN',TRUE);
759: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
793: -- Version Initial version number = 1.0
794: -- History Current version number = 1.0
795: --=======================================================
796: procedure CREATE_UNIQUE_KEY (
797: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
798: p_api_version_number IN NUMBER,
799: p_init_msg_tbl IN BOOLEAN := FALSE,
800: p_msg_count OUT NOCOPY NUMBER,
801: p_msg_data OUT NOCOPY VARCHAR2,
802: p_return_status OUT NOCOPY VARCHAR2,
803: p_unique_key_name IN VARCHAR2,
804: p_database_object_name IN VARCHAR2,
805: p_application_id IN NUMBER,
806: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
807: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
803: p_unique_key_name IN VARCHAR2,
804: p_database_object_name IN VARCHAR2,
805: p_application_id IN NUMBER,
806: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
807: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
804: p_database_object_name IN VARCHAR2,
805: p_application_id IN NUMBER,
806: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
807: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
805: p_application_id IN NUMBER,
806: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
807: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
806: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
807: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
807: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
808: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
809: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
810: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
811: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
812: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
813: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
814: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
815: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
816: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
817: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
818: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
826: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
819: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
826: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
827: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
820: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
826: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
827: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
828: p_pass IN NUMBER,
821: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
826: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
827: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
828: p_pass IN NUMBER,
829: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
822: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
826: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
827: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
828: p_pass IN NUMBER,
829: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
830: ) is
823: p_creation_date IN DATE := FND_API.G_MISS_DATE,
824: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
825: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
826: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
827: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
828: p_pass IN NUMBER,
829: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
830: ) is
831: l_attribute_category VARCHAR2(30);
855: l_last_updated_by number;
856: l_return_status varchar2(1);
857: begin
858:
859: IF NOT FND_API.Compatible_API_Call (
860: l_api_version_number, p_api_version_number, l_api_name,
861: G_PKG_NAME) then
862: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
863: return;
858:
859: IF NOT FND_API.Compatible_API_Call (
860: l_api_version_number, p_api_version_number, l_api_name,
861: G_PKG_NAME) then
862: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
863: return;
864: END IF;
865:
866: -- Initialize the message table if requested.
879: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
880: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_EXISTS');
881: FND_MSG_PUB.Add;
882: end if;
883: raise FND_API.G_EXC_ERROR;
884: end if;
885:
886: --** validate table columns passed in **
887: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
883: raise FND_API.G_EXC_ERROR;
884: end if;
885:
886: --** validate table columns passed in **
887: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
888: if not VALIDATE_UNIQUE_KEY (
889: p_validation_level => p_validation_level,
890: p_api_version_number => 1.0,
891: p_return_status => l_return_status,
894: p_application_id => p_application_id,
895: p_caller => AK_ON_OBJECTS_PVT.G_CREATE,
896: p_pass => p_pass
897: ) then
898: raise FND_API.G_EXC_ERROR;
899: end if;
900: end if;
901:
902: --
900: end if;
901:
902: --
903: -- Load non-required columns if their values are given
904: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
905: l_attribute_category := p_attribute_category;
906: end if;
907:
908: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
904: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
905: l_attribute_category := p_attribute_category;
906: end if;
907:
908: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
909: l_attribute1 := p_attribute1;
910: end if;
911:
912: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
908: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
909: l_attribute1 := p_attribute1;
910: end if;
911:
912: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
913: l_attribute2 := p_attribute2;
914: end if;
915:
916: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
912: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
913: l_attribute2 := p_attribute2;
914: end if;
915:
916: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
917: l_attribute3 := p_attribute3;
918: end if;
919:
920: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
916: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
917: l_attribute3 := p_attribute3;
918: end if;
919:
920: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
921: l_attribute4 := p_attribute4;
922: end if;
923:
924: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
920: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
921: l_attribute4 := p_attribute4;
922: end if;
923:
924: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
925: l_attribute5 := p_attribute5;
926: end if;
927:
928: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
924: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
925: l_attribute5 := p_attribute5;
926: end if;
927:
928: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
929: l_attribute6 := p_attribute6;
930: end if;
931:
932: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
928: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
929: l_attribute6 := p_attribute6;
930: end if;
931:
932: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
933: l_attribute7:= p_attribute7;
934: end if;
935:
936: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
932: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
933: l_attribute7:= p_attribute7;
934: end if;
935:
936: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
937: l_attribute8 := p_attribute8;
938: end if;
939:
940: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
936: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
937: l_attribute8 := p_attribute8;
938: end if;
939:
940: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
941: l_attribute9 := p_attribute9;
942: end if;
943:
944: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
940: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
941: l_attribute9 := p_attribute9;
942: end if;
943:
944: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
945: l_attribute10 := p_attribute10;
946: end if;
947:
948: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
944: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
945: l_attribute10 := p_attribute10;
946: end if;
947:
948: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
949: l_attribute11 := p_attribute11;
950: end if;
951:
952: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
948: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
949: l_attribute11 := p_attribute11;
950: end if;
951:
952: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
953: l_attribute12 := p_attribute12;
954: end if;
955:
956: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
952: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
953: l_attribute12 := p_attribute12;
954: end if;
955:
956: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
957: l_attribute13 := p_attribute13;
958: end if;
959:
960: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
956: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
957: l_attribute13 := p_attribute13;
958: end if;
959:
960: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
961: l_attribute14 := p_attribute14;
962: end if;
963:
964: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
960: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
961: l_attribute14 := p_attribute14;
962: end if;
963:
964: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
965: l_attribute15 := p_attribute15;
966: end if;
967:
968: if (p_created_by <> FND_API.G_MISS_NUM) then
964: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
965: l_attribute15 := p_attribute15;
966: end if;
967:
968: if (p_created_by <> FND_API.G_MISS_NUM) then
969: l_created_by := p_created_by;
970: end if;
971:
972: if (p_creation_date <> FND_API.G_MISS_DATE) then
968: if (p_created_by <> FND_API.G_MISS_NUM) then
969: l_created_by := p_created_by;
970: end if;
971:
972: if (p_creation_date <> FND_API.G_MISS_DATE) then
973: l_creation_date := p_creation_date;
974: end if;
975:
976: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
972: if (p_creation_date <> FND_API.G_MISS_DATE) then
973: l_creation_date := p_creation_date;
974: end if;
975:
976: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
977: l_last_updated_by := p_last_updated_by;
978: end if;
979:
980: if (p_last_update_date <> FND_API.G_MISS_DATE) then
976: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
977: l_last_updated_by := p_last_updated_by;
978: end if;
979:
980: if (p_last_update_date <> FND_API.G_MISS_DATE) then
981: l_last_update_date := p_last_update_date;
982: end if;
983:
984: if (p_last_update_login <> FND_API.G_MISS_NUM) then
980: if (p_last_update_date <> FND_API.G_MISS_DATE) then
981: l_last_update_date := p_last_update_date;
982: end if;
983:
984: if (p_last_update_login <> FND_API.G_MISS_NUM) then
985: l_last_update_login := p_last_update_login;
986: end if;
987:
988: -- Create record if no validation error was found
1061: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1062: FND_MSG_PUB.Add;
1063: end if;
1064:
1065: p_return_status := FND_API.G_RET_STS_SUCCESS;
1066:
1067: FND_MSG_PUB.Count_And_Get (
1068: p_count => p_msg_count,
1069: p_data => p_msg_data);
1074: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_VALUE_ERROR');
1075: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1076: FND_MSG_PUB.Add;
1077: end if;
1078: p_return_status := FND_API.G_RET_STS_ERROR;
1079: rollback to start_create_unique_key;
1080: FND_MSG_PUB.Count_And_Get (
1081: p_count => p_msg_count,
1082: p_data => p_msg_data);
1079: rollback to start_create_unique_key;
1080: FND_MSG_PUB.Count_And_Get (
1081: p_count => p_msg_count,
1082: p_data => p_msg_data);
1083: WHEN FND_API.G_EXC_ERROR THEN
1084: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1085: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_CREATED');
1086: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1087: FND_MSG_PUB.Add;
1085: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_CREATED');
1086: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
1087: FND_MSG_PUB.Add;
1088: end if;
1089: p_return_status := FND_API.G_RET_STS_ERROR;
1090: rollback to start_create_unique_key;
1091: FND_MSG_PUB.Count_And_Get (
1092: p_count => p_msg_count,
1093: p_data => p_msg_data);
1091: FND_MSG_PUB.Count_And_Get (
1092: p_count => p_msg_count,
1093: p_data => p_msg_data);
1094: WHEN OTHERS THEN
1095: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1096: rollback to start_create_unique_key;
1097: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1098: SUBSTR (SQLERRM, 1, 240) );
1099: FND_MSG_PUB.Add;
1127: -- Version Initial version number = 1.0
1128: -- History Current version number = 1.0
1129: --=======================================================
1130: procedure CREATE_UNIQUE_KEY_COLUMN (
1131: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1132: p_api_version_number IN NUMBER,
1133: p_init_msg_tbl IN BOOLEAN := FALSE,
1134: p_msg_count OUT NOCOPY NUMBER,
1135: p_msg_data OUT NOCOPY VARCHAR2,
1137: p_unique_key_name IN VARCHAR2,
1138: p_attribute_application_id IN NUMBER,
1139: p_attribute_code IN VARCHAR2,
1140: p_unique_key_sequence IN NUMBER,
1141: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
1142: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1138: p_attribute_application_id IN NUMBER,
1139: p_attribute_code IN VARCHAR2,
1140: p_unique_key_sequence IN NUMBER,
1141: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
1142: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1139: p_attribute_code IN VARCHAR2,
1140: p_unique_key_sequence IN NUMBER,
1141: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
1142: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1140: p_unique_key_sequence IN NUMBER,
1141: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
1142: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1141: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
1142: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1142: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1143: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1144: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1145: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1146: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1147: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1148: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1149: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1150: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1151: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1152: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1153: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1161: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
1154: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1161: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
1162: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
1155: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1161: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
1162: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
1163: p_pass IN NUMBER,
1156: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1161: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
1162: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
1163: p_pass IN NUMBER,
1164: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
1157: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1161: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
1162: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
1163: p_pass IN NUMBER,
1164: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
1165: ) is
1158: p_creation_date IN DATE := FND_API.G_MISS_DATE,
1159: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
1160: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
1161: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
1162: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
1163: p_pass IN NUMBER,
1164: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
1165: ) is
1166: l_attribute_category VARCHAR2(30);
1189: l_last_updated_by number;
1190: l_return_status varchar2(1);
1191: begin
1192:
1193: IF NOT FND_API.Compatible_API_Call (
1194: l_api_version_number, p_api_version_number, l_api_name,
1195: G_PKG_NAME) then
1196: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1197: return;
1192:
1193: IF NOT FND_API.Compatible_API_Call (
1194: l_api_version_number, p_api_version_number, l_api_name,
1195: G_PKG_NAME) then
1196: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1197: return;
1198: END IF;
1199:
1200: -- Initialize the message table if requested.
1215: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
1216: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_EXISTS');
1217: FND_MSG_PUB.Add;
1218: end if;
1219: raise FND_API.G_EXC_ERROR;
1220: end if;
1221:
1222: --** validate table columns passed in **
1223: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
1219: raise FND_API.G_EXC_ERROR;
1220: end if;
1221:
1222: --** validate table columns passed in **
1223: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
1224: if not VALIDATE_UNIQUE_KEY_COLUMN (
1225: p_validation_level => p_validation_level,
1226: p_api_version_number => 1.0,
1227: p_return_status => l_return_status,
1231: p_unique_key_sequence => p_unique_key_sequence,
1232: p_caller => AK_ON_OBJECTS_PVT.G_CREATE,
1233: p_pass => p_pass
1234: ) then
1235: raise FND_API.G_EXC_ERROR;
1236: end if;
1237: end if;
1238:
1239: --
1238:
1239: --
1240: -- Load non-required columns if their values are given
1241: --
1242: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
1243: l_attribute_category := p_attribute_category;
1244: end if;
1245:
1246: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
1242: if (p_attribute_category <> FND_API.G_MISS_CHAR) then
1243: l_attribute_category := p_attribute_category;
1244: end if;
1245:
1246: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
1247: l_attribute1 := p_attribute1;
1248: end if;
1249:
1250: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
1246: if (p_attribute1 <> FND_API.G_MISS_CHAR) then
1247: l_attribute1 := p_attribute1;
1248: end if;
1249:
1250: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
1251: l_attribute2 := p_attribute2;
1252: end if;
1253:
1254: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
1250: if (p_attribute2 <> FND_API.G_MISS_CHAR) then
1251: l_attribute2 := p_attribute2;
1252: end if;
1253:
1254: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
1255: l_attribute3 := p_attribute3;
1256: end if;
1257:
1258: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
1254: if (p_attribute3 <> FND_API.G_MISS_CHAR) then
1255: l_attribute3 := p_attribute3;
1256: end if;
1257:
1258: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
1259: l_attribute4 := p_attribute4;
1260: end if;
1261:
1262: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
1258: if (p_attribute4 <> FND_API.G_MISS_CHAR) then
1259: l_attribute4 := p_attribute4;
1260: end if;
1261:
1262: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
1263: l_attribute5 := p_attribute5;
1264: end if;
1265:
1266: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
1262: if (p_attribute5 <> FND_API.G_MISS_CHAR) then
1263: l_attribute5 := p_attribute5;
1264: end if;
1265:
1266: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
1267: l_attribute6 := p_attribute6;
1268: end if;
1269:
1270: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
1266: if (p_attribute6 <> FND_API.G_MISS_CHAR) then
1267: l_attribute6 := p_attribute6;
1268: end if;
1269:
1270: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
1271: l_attribute7:= p_attribute7;
1272: end if;
1273:
1274: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
1270: if (p_attribute7 <> FND_API.G_MISS_CHAR) then
1271: l_attribute7:= p_attribute7;
1272: end if;
1273:
1274: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
1275: l_attribute8 := p_attribute8;
1276: end if;
1277:
1278: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
1274: if (p_attribute8 <> FND_API.G_MISS_CHAR) then
1275: l_attribute8 := p_attribute8;
1276: end if;
1277:
1278: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
1279: l_attribute9 := p_attribute9;
1280: end if;
1281:
1282: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
1278: if (p_attribute9 <> FND_API.G_MISS_CHAR) then
1279: l_attribute9 := p_attribute9;
1280: end if;
1281:
1282: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
1283: l_attribute10 := p_attribute10;
1284: end if;
1285:
1286: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
1282: if (p_attribute10 <> FND_API.G_MISS_CHAR) then
1283: l_attribute10 := p_attribute10;
1284: end if;
1285:
1286: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
1287: l_attribute11 := p_attribute11;
1288: end if;
1289:
1290: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
1286: if (p_attribute11 <> FND_API.G_MISS_CHAR) then
1287: l_attribute11 := p_attribute11;
1288: end if;
1289:
1290: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
1291: l_attribute12 := p_attribute12;
1292: end if;
1293:
1294: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
1290: if (p_attribute12 <> FND_API.G_MISS_CHAR) then
1291: l_attribute12 := p_attribute12;
1292: end if;
1293:
1294: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
1295: l_attribute13 := p_attribute13;
1296: end if;
1297:
1298: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
1294: if (p_attribute13 <> FND_API.G_MISS_CHAR) then
1295: l_attribute13 := p_attribute13;
1296: end if;
1297:
1298: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
1299: l_attribute14 := p_attribute14;
1300: end if;
1301:
1302: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
1298: if (p_attribute14 <> FND_API.G_MISS_CHAR) then
1299: l_attribute14 := p_attribute14;
1300: end if;
1301:
1302: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
1303: l_attribute15 := p_attribute15;
1304: end if;
1305:
1306: if (p_created_by <> FND_API.G_MISS_NUM) then
1302: if (p_attribute15 <> FND_API.G_MISS_CHAR) then
1303: l_attribute15 := p_attribute15;
1304: end if;
1305:
1306: if (p_created_by <> FND_API.G_MISS_NUM) then
1307: l_created_by := p_created_by;
1308: end if;
1309:
1310: if (p_creation_date <> FND_API.G_MISS_DATE) then
1306: if (p_created_by <> FND_API.G_MISS_NUM) then
1307: l_created_by := p_created_by;
1308: end if;
1309:
1310: if (p_creation_date <> FND_API.G_MISS_DATE) then
1311: l_creation_date := p_creation_date;
1312: end if;
1313:
1314: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
1310: if (p_creation_date <> FND_API.G_MISS_DATE) then
1311: l_creation_date := p_creation_date;
1312: end if;
1313:
1314: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
1315: l_last_updated_by := p_last_updated_by;
1316: end if;
1317:
1318: if (p_last_update_date <> FND_API.G_MISS_DATE) then
1314: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
1315: l_last_updated_by := p_last_updated_by;
1316: end if;
1317:
1318: if (p_last_update_date <> FND_API.G_MISS_DATE) then
1319: l_last_update_date := p_last_update_date;
1320: end if;
1321:
1322: if (p_last_update_login <> FND_API.G_MISS_NUM) then
1318: if (p_last_update_date <> FND_API.G_MISS_DATE) then
1319: l_last_update_date := p_last_update_date;
1320: end if;
1321:
1322: if (p_last_update_login <> FND_API.G_MISS_NUM) then
1323: l_last_update_login := p_last_update_login;
1324: end if;
1325:
1326: -- Create record if no validation error was found
1403: p_attribute_code || '"');
1404: FND_MSG_PUB.Add;
1405: end if;
1406:
1407: p_return_status := FND_API.G_RET_STS_SUCCESS;
1408:
1409: FND_MSG_PUB.Count_And_Get (
1410: p_count => p_msg_count,
1411: p_data => p_msg_data);
1418: to_char(p_attribute_application_id) || ' "' ||
1419: p_attribute_code || '"');
1420: FND_MSG_PUB.Add;
1421: end if;
1422: p_return_status := FND_API.G_RET_STS_ERROR;
1423: rollback to start_create_key_column;
1424: FND_MSG_PUB.Count_And_Get (
1425: p_count => p_msg_count,
1426: p_data => p_msg_data);
1423: rollback to start_create_key_column;
1424: FND_MSG_PUB.Count_And_Get (
1425: p_count => p_msg_count,
1426: p_data => p_msg_data);
1427: WHEN FND_API.G_EXC_ERROR THEN
1428: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1429: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_CREATED');
1430: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
1431: to_char(p_attribute_application_id) || ' "' ||
1431: to_char(p_attribute_application_id) || ' "' ||
1432: p_attribute_code || '"');
1433: FND_MSG_PUB.Add;
1434: end if;
1435: p_return_status := FND_API.G_RET_STS_ERROR;
1436: rollback to start_create_key_column;
1437: FND_MSG_PUB.Count_And_Get (
1438: p_count => p_msg_count,
1439: p_data => p_msg_data);
1437: FND_MSG_PUB.Count_And_Get (
1438: p_count => p_msg_count,
1439: p_data => p_msg_data);
1440: WHEN OTHERS THEN
1441: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1442: rollback to start_create_key_column;
1443: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1444: SUBSTR (SQLERRM, 1, 240) );
1445: FND_MSG_PUB.Add;
1473: -- Version Initial version number = 1.0
1474: -- History Current version number = 1.0
1475: --=======================================================
1476: procedure DELETE_FOREIGN_KEY (
1477: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1478: p_api_version_number IN NUMBER,
1479: p_init_msg_tbl IN BOOLEAN := FALSE,
1480: p_msg_count OUT NOCOPY NUMBER,
1481: p_msg_data OUT NOCOPY VARCHAR2,
1510: l_to_page_code VARCHAR2(30);
1511: l_to_region_appl_id NUMBER;
1512: l_to_region_code VARCHAR2(30);
1513: begin
1514: IF NOT FND_API.Compatible_API_Call (
1515: l_api_version_number, p_api_version_number, l_api_name,
1516: G_PKG_NAME) then
1517: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1518: return;
1513: begin
1514: IF NOT FND_API.Compatible_API_Call (
1515: l_api_version_number, p_api_version_number, l_api_name,
1516: G_PKG_NAME) then
1517: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1518: return;
1519: END IF;
1520:
1521: -- Initialize the message table if requested.
1536: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1537: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1538: FND_MSG_PUB.Add;
1539: end if;
1540: raise FND_API.G_EXC_ERROR;
1541: end if;
1542:
1543: if (p_delete_cascade = 'N') then
1544: --
1555: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1556: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FK_FKC');
1557: FND_MSG_PUB.Add;
1558: end if;
1559: raise FND_API.G_EXC_ERROR;
1560: end if;
1561: close l_get_columns_csr;
1562: --
1563: -- AK_FLOW_REGION_RELATIONS
1573: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1574: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_FK_REL');
1575: FND_MSG_PUB.Add;
1576: end if;
1577: raise FND_API.G_EXC_ERROR;
1578: end if;
1579: close l_get_relations_csr;
1580:
1581: else
1598: p_attribute_application_id => l_attribute_appl_id,
1599: p_attribute_code => l_attribute_code,
1600: p_delete_cascade => p_delete_cascade
1601: );
1602: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1603: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1604: close l_get_columns_csr;
1605: raise FND_API.G_EXC_ERROR;
1606: end if;
1599: p_attribute_code => l_attribute_code,
1600: p_delete_cascade => p_delete_cascade
1601: );
1602: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1603: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1604: close l_get_columns_csr;
1605: raise FND_API.G_EXC_ERROR;
1606: end if;
1607: end loop;
1601: );
1602: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1603: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1604: close l_get_columns_csr;
1605: raise FND_API.G_EXC_ERROR;
1606: end if;
1607: end loop;
1608: close l_get_columns_csr;
1609: --
1635: p_to_region_appl_id => l_to_region_appl_id,
1636: p_to_region_code => l_to_region_code,
1637: p_delete_cascade => p_delete_cascade
1638: );
1639: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1640: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1641: close l_get_relations_csr;
1642: raise FND_API.G_EXC_ERROR;
1643: end if;
1636: p_to_region_code => l_to_region_code,
1637: p_delete_cascade => p_delete_cascade
1638: );
1639: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1640: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1641: close l_get_relations_csr;
1642: raise FND_API.G_EXC_ERROR;
1643: end if;
1644: end loop;
1638: );
1639: if (l_return_status = FND_API.G_RET_STS_ERROR) or
1640: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1641: close l_get_relations_csr;
1642: raise FND_API.G_EXC_ERROR;
1643: end if;
1644: end loop;
1645: close l_get_relations_csr;
1646:
1657: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1658: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1659: FND_MSG_PUB.Add;
1660: end if;
1661: raise FND_API.G_EXC_ERROR;
1662: end if;
1663:
1664: delete from ak_foreign_keys_tl
1665: where foreign_key_name = p_foreign_key_name;
1668: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1669: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_DOES_NOT_EXIST');
1670: FND_MSG_PUB.Add;
1671: end if;
1672: raise FND_API.G_EXC_ERROR;
1673: end if;
1674:
1675: --
1676: -- Load success message
1680: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1681: FND_MSG_PUB.Add;
1682: end if;
1683:
1684: p_return_status := FND_API.G_RET_STS_SUCCESS;
1685:
1686: FND_MSG_PUB.Count_And_Get (
1687: p_count => p_msg_count,
1688: p_data => p_msg_data);
1687: p_count => p_msg_count,
1688: p_data => p_msg_data);
1689:
1690: EXCEPTION
1691: WHEN FND_API.G_EXC_ERROR THEN
1692: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1693: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_DELETED');
1694: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1695: FND_MSG_PUB.Add;
1693: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_DELETED');
1694: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
1695: FND_MSG_PUB.Add;
1696: end if;
1697: p_return_status := FND_API.G_RET_STS_ERROR;
1698: rollback to start_delete_foreign_key;
1699: FND_MSG_PUB.Count_And_Get (
1700: p_count => p_msg_count,
1701: p_data => p_msg_data);
1699: FND_MSG_PUB.Count_And_Get (
1700: p_count => p_msg_count,
1701: p_data => p_msg_data);
1702: WHEN OTHERS THEN
1703: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1704: rollback to start_delete_foreign_key;
1705: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1706: SUBSTR (SQLERRM, 1, 240) );
1707: FND_MSG_PUB.Add;
1737: -- Version Initial version number = 1.0
1738: -- History Current version number = 1.0
1739: --=======================================================
1740: procedure DELETE_FOREIGN_KEY_COLUMN (
1741: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1742: p_api_version_number IN NUMBER,
1743: p_init_msg_tbl IN BOOLEAN := FALSE,
1744: p_msg_count OUT NOCOPY NUMBER,
1745: p_msg_data OUT NOCOPY VARCHAR2,
1752: l_api_version_number CONSTANT number := 1.0;
1753: l_api_name CONSTANT varchar2(30):= 'Delete_Foreign_Key_Column';
1754: l_return_status varchar2(1);
1755: begin
1756: IF NOT FND_API.Compatible_API_Call (
1757: l_api_version_number, p_api_version_number, l_api_name,
1758: G_PKG_NAME) then
1759: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1760: return;
1755: begin
1756: IF NOT FND_API.Compatible_API_Call (
1757: l_api_version_number, p_api_version_number, l_api_name,
1758: G_PKG_NAME) then
1759: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1760: return;
1761: END IF;
1762:
1763: -- Initialize the message table if requested.
1780: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1781: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
1782: FND_MSG_PUB.Add;
1783: end if;
1784: raise FND_API.G_EXC_ERROR;
1785: end if;
1786:
1787: if (p_delete_cascade = 'N') then
1788: --
1816: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
1817: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_FOREIGN_KEY_COLUMN',TRUE);
1818: FND_MSG_PUB.Add;
1819: end if;
1820: raise FND_API.G_EXC_ERROR;
1821: end if;
1822:
1823: --
1824: -- Load success message
1830: ' ' || p_attribute_code);
1831: FND_MSG_PUB.Add;
1832: end if;
1833:
1834: p_return_status := FND_API.G_RET_STS_SUCCESS;
1835:
1836: FND_MSG_PUB.Count_And_Get (
1837: p_count => p_msg_count,
1838: p_data => p_msg_data);
1837: p_count => p_msg_count,
1838: p_data => p_msg_data);
1839:
1840: EXCEPTION
1841: WHEN FND_API.G_EXC_ERROR THEN
1842: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1843: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_DELETED');
1844: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
1845: ' ' || to_char(p_attribute_application_id) ||
1845: ' ' || to_char(p_attribute_application_id) ||
1846: ' ' || p_attribute_code);
1847: FND_MSG_PUB.Add;
1848: end if;
1849: p_return_status := FND_API.G_RET_STS_ERROR;
1850: rollback to start_delete_key_column;
1851: FND_MSG_PUB.Count_And_Get (
1852: p_count => p_msg_count,
1853: p_data => p_msg_data);
1851: FND_MSG_PUB.Count_And_Get (
1852: p_count => p_msg_count,
1853: p_data => p_msg_data);
1854: WHEN OTHERS THEN
1855: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1856: rollback to start_delete_key_column;
1857: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1858: SUBSTR (SQLERRM, 1, 240) );
1859: FND_MSG_PUB.Add;
1887: -- Version Initial version number = 1.0
1888: -- History Current version number = 1.0
1889: --=======================================================
1890: procedure DELETE_UNIQUE_KEY (
1891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1892: p_api_version_number IN NUMBER,
1893: p_init_msg_tbl IN BOOLEAN := FALSE,
1894: p_msg_count OUT NOCOPY NUMBER,
1895: p_msg_data OUT NOCOPY VARCHAR2,
1914: l_msg_data VARCHAR2(2000);
1915: l_foreign_key_name VARCHAR2(30);
1916: l_return_status varchar2(1);
1917: begin
1918: IF NOT FND_API.Compatible_API_Call (
1919: l_api_version_number, p_api_version_number, l_api_name,
1920: G_PKG_NAME) then
1921: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1922: return;
1917: begin
1918: IF NOT FND_API.Compatible_API_Call (
1919: l_api_version_number, p_api_version_number, l_api_name,
1920: G_PKG_NAME) then
1921: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1922: return;
1923: END IF;
1924:
1925: -- Initialize the message table if requested.
1940: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1941: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
1942: FND_MSG_PUB.Add;
1943: end if;
1944: raise FND_API.G_EXC_ERROR;
1945: end if;
1946:
1947: if (p_delete_cascade = 'N') then
1948: --
1959: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1960: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UK_UKC');
1961: FND_MSG_PUB.Add;
1962: end if;
1963: raise FND_API.G_EXC_ERROR;
1964: end if;
1965: close l_get_columns_csr;
1966: --
1967: -- AK_FOREIGN_KEYS
1973: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
1974: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UK_FK');
1975: FND_MSG_PUB.Add;
1976: end if;
1977: raise FND_API.G_EXC_ERROR;
1978: end if;
1979: close l_get_fk_csr;
1980:
1981: else
1998: p_attribute_application_id => l_attribute_appl_id,
1999: p_attribute_code => l_attribute_code,
2000: p_delete_cascade => p_delete_cascade
2001: );
2002: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2003: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2004: close l_get_columns_csr;
2005: raise FND_API.G_EXC_ERROR;
2006: end if;
1999: p_attribute_code => l_attribute_code,
2000: p_delete_cascade => p_delete_cascade
2001: );
2002: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2003: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2004: close l_get_columns_csr;
2005: raise FND_API.G_EXC_ERROR;
2006: end if;
2007: end loop;
2001: );
2002: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2003: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2004: close l_get_columns_csr;
2005: raise FND_API.G_EXC_ERROR;
2006: end if;
2007: end loop;
2008: close l_get_columns_csr;
2009: --
2021: p_return_status => l_return_status,
2022: p_foreign_key_name => l_foreign_key_name,
2023: p_delete_cascade => p_delete_cascade
2024: );
2025: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2026: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2027: close l_get_fk_csr;
2028: raise FND_API.G_EXC_ERROR;
2029: end if;
2022: p_foreign_key_name => l_foreign_key_name,
2023: p_delete_cascade => p_delete_cascade
2024: );
2025: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2026: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2027: close l_get_fk_csr;
2028: raise FND_API.G_EXC_ERROR;
2029: end if;
2030: end loop;
2024: );
2025: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2026: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2027: close l_get_fk_csr;
2028: raise FND_API.G_EXC_ERROR;
2029: end if;
2030: end loop;
2031: close l_get_fk_csr;
2032:
2043: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2044: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_DOES_NOT_EXIST');
2045: FND_MSG_PUB.Add;
2046: end if;
2047: raise FND_API.G_EXC_ERROR;
2048: end if;
2049:
2050: --
2051: -- Load success message
2055: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2056: FND_MSG_PUB.Add;
2057: end if;
2058:
2059: p_return_status := FND_API.G_RET_STS_SUCCESS;
2060:
2061: FND_MSG_PUB.Count_And_Get (
2062: p_count => p_msg_count,
2063: p_data => p_msg_data);
2062: p_count => p_msg_count,
2063: p_data => p_msg_data);
2064:
2065: EXCEPTION
2066: WHEN FND_API.G_EXC_ERROR THEN
2067: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2068: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_DELETED');
2069: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2070: FND_MSG_PUB.Add;
2068: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_DELETED');
2069: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
2070: FND_MSG_PUB.Add;
2071: end if;
2072: p_return_status := FND_API.G_RET_STS_ERROR;
2073: rollback to start_delete_unique_key;
2074: FND_MSG_PUB.Count_And_Get (
2075: p_count => p_msg_count,
2076: p_data => p_msg_data);
2074: FND_MSG_PUB.Count_And_Get (
2075: p_count => p_msg_count,
2076: p_data => p_msg_data);
2077: WHEN OTHERS THEN
2078: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2079: rollback to start_delete_unique_key;
2080: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2081: SUBSTR (SQLERRM, 1, 240) );
2082: FND_MSG_PUB.Add;
2112: -- Version Initial version number = 1.0
2113: -- History Current version number = 1.0
2114: --=======================================================
2115: procedure DELETE_UNIQUE_KEY_COLUMN (
2116: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2117: p_api_version_number IN NUMBER,
2118: p_init_msg_tbl IN BOOLEAN := FALSE,
2119: p_msg_count OUT NOCOPY NUMBER,
2120: p_msg_data OUT NOCOPY VARCHAR2,
2145: l_msg_data VARCHAR2(2000);
2146: l_foreign_key_name VARCHAR2(30);
2147: l_return_status varchar2(1);
2148: begin
2149: IF NOT FND_API.Compatible_API_Call (
2150: l_api_version_number, p_api_version_number, l_api_name,
2151: G_PKG_NAME) then
2152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2153: return;
2148: begin
2149: IF NOT FND_API.Compatible_API_Call (
2150: l_api_version_number, p_api_version_number, l_api_name,
2151: G_PKG_NAME) then
2152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2153: return;
2154: END IF;
2155:
2156: -- Initialize the message table if requested.
2173: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2174: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
2175: FND_MSG_PUB.Add;
2176: end if;
2177: raise FND_API.G_EXC_ERROR;
2178: end if;
2179:
2180: -- p_override is set to 'Y' during upload
2181: --
2196: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2197: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_DEL_REF_UKC_FKC');
2198: FND_MSG_PUB.Add;
2199: end if;
2200: raise FND_API.G_EXC_ERROR;
2201: end if;
2202: close l_get_fkc_csr;
2203: else
2204: --
2221: p_attribute_application_id => l_attribute_appl_id,
2222: p_attribute_code => l_attribute_code,
2223: p_delete_cascade => p_delete_cascade
2224: );
2225: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2226: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2227: close l_get_fkc_csr;
2228: raise FND_API.G_EXC_ERROR;
2229: end if;
2222: p_attribute_code => l_attribute_code,
2223: p_delete_cascade => p_delete_cascade
2224: );
2225: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2226: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2227: close l_get_fkc_csr;
2228: raise FND_API.G_EXC_ERROR;
2229: end if;
2230: end loop;
2224: );
2225: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2226: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2227: close l_get_fkc_csr;
2228: raise FND_API.G_EXC_ERROR;
2229: end if;
2230: end loop;
2231: close l_get_fkc_csr;
2232: end if; -- /* if p_delete_cascade */
2244: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2245: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_DOES_NOT_EXIST');
2246: FND_MSG_PUB.Add;
2247: end if;
2248: raise FND_API.G_EXC_ERROR;
2249: end if;
2250:
2251: --
2252: -- Load success message
2258: ' ' || p_attribute_code);
2259: FND_MSG_PUB.Add;
2260: end if;
2261:
2262: p_return_status := FND_API.G_RET_STS_SUCCESS;
2263:
2264: FND_MSG_PUB.Count_And_Get (
2265: p_count => p_msg_count,
2266: p_data => p_msg_data);
2265: p_count => p_msg_count,
2266: p_data => p_msg_data);
2267:
2268: EXCEPTION
2269: WHEN FND_API.G_EXC_ERROR THEN
2270: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2271: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_DELETED');
2272: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
2273: ' ' || to_char(p_attribute_application_id) ||
2273: ' ' || to_char(p_attribute_application_id) ||
2274: ' ' || p_attribute_code);
2275: FND_MSG_PUB.Add;
2276: end if;
2277: p_return_status := FND_API.G_RET_STS_ERROR;
2278: rollback to start_delete_key_column;
2279: FND_MSG_PUB.Count_And_Get (
2280: p_count => p_msg_count,
2281: p_data => p_msg_data);
2279: FND_MSG_PUB.Count_And_Get (
2280: p_count => p_msg_count,
2281: p_data => p_msg_data);
2282: WHEN OTHERS THEN
2283: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2284: rollback to start_delete_key_column;
2285: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2286: SUBSTR (SQLERRM, 1, 240) );
2287: FND_MSG_PUB.Add;
2325: l_api_version_number CONSTANT number := 1.0;
2326: l_api_name CONSTANT varchar2(30) := 'Foreign_Key_Exists';
2327: l_dummy number;
2328: begin
2329: IF NOT FND_API.Compatible_API_Call (
2330: l_api_version_number, p_api_version_number, l_api_name,
2331: G_PKG_NAME) then
2332: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2333: return FALSE;
2328: begin
2329: IF NOT FND_API.Compatible_API_Call (
2330: l_api_version_number, p_api_version_number, l_api_name,
2331: G_PKG_NAME) then
2332: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2333: return FALSE;
2334: END IF;
2335:
2336: open l_check_csr;
2336: open l_check_csr;
2337: fetch l_check_csr into l_dummy;
2338: if (l_check_csr%notfound) then
2339: close l_check_csr;
2340: p_return_status := FND_API.G_RET_STS_SUCCESS;
2341: return FALSE;
2342: else
2343: close l_check_csr;
2344: p_return_status := FND_API.G_RET_STS_SUCCESS;
2340: p_return_status := FND_API.G_RET_STS_SUCCESS;
2341: return FALSE;
2342: else
2343: close l_check_csr;
2344: p_return_status := FND_API.G_RET_STS_SUCCESS;
2345: return TRUE;
2346: end if;
2347:
2348: EXCEPTION
2345: return TRUE;
2346: end if;
2347:
2348: EXCEPTION
2349: WHEN FND_API.G_EXC_ERROR THEN
2350: p_return_status := FND_API.G_RET_STS_ERROR;
2351: return FALSE;
2352: WHEN OTHERS THEN
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2346: end if;
2347:
2348: EXCEPTION
2349: WHEN FND_API.G_EXC_ERROR THEN
2350: p_return_status := FND_API.G_RET_STS_ERROR;
2351: return FALSE;
2352: WHEN OTHERS THEN
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2349: WHEN FND_API.G_EXC_ERROR THEN
2350: p_return_status := FND_API.G_RET_STS_ERROR;
2351: return FALSE;
2352: WHEN OTHERS THEN
2353: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2354: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2355: SUBSTR (SQLERRM, 1, 240) );
2356: FND_MSG_PUB.Add;
2357: return FALSE;
2402: open l_check_csr;
2403: fetch l_check_csr into l_dummy;
2404: if (l_check_csr%notfound) then
2405: close l_check_csr;
2406: p_return_status := FND_API.G_RET_STS_SUCCESS;
2407: return FALSE;
2408: else
2409: close l_check_csr;
2410: p_return_status := FND_API.G_RET_STS_SUCCESS;
2406: p_return_status := FND_API.G_RET_STS_SUCCESS;
2407: return FALSE;
2408: else
2409: close l_check_csr;
2410: p_return_status := FND_API.G_RET_STS_SUCCESS;
2411: return TRUE;
2412: end if;
2413:
2414: EXCEPTION
2411: return TRUE;
2412: end if;
2413:
2414: EXCEPTION
2415: WHEN FND_API.G_EXC_ERROR THEN
2416: p_return_status := FND_API.G_RET_STS_ERROR;
2417: return FALSE;
2418: WHEN OTHERS THEN
2419: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2412: end if;
2413:
2414: EXCEPTION
2415: WHEN FND_API.G_EXC_ERROR THEN
2416: p_return_status := FND_API.G_RET_STS_ERROR;
2417: return FALSE;
2418: WHEN OTHERS THEN
2419: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2420: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2415: WHEN FND_API.G_EXC_ERROR THEN
2416: p_return_status := FND_API.G_RET_STS_ERROR;
2417: return FALSE;
2418: WHEN OTHERS THEN
2419: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2420: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2421: SUBSTR (SQLERRM, 1, 240) );
2422: FND_MSG_PUB.Add;
2423: return FALSE;
2463: open l_check_csr;
2464: fetch l_check_csr into l_dummy;
2465: if (l_check_csr%notfound) then
2466: close l_check_csr;
2467: p_return_status := FND_API.G_RET_STS_SUCCESS;
2468: return FALSE;
2469: else
2470: close l_check_csr;
2471: p_return_status := FND_API.G_RET_STS_SUCCESS;
2467: p_return_status := FND_API.G_RET_STS_SUCCESS;
2468: return FALSE;
2469: else
2470: close l_check_csr;
2471: p_return_status := FND_API.G_RET_STS_SUCCESS;
2472: return TRUE;
2473: end if;
2474:
2475: EXCEPTION
2472: return TRUE;
2473: end if;
2474:
2475: EXCEPTION
2476: WHEN FND_API.G_EXC_ERROR THEN
2477: p_return_status := FND_API.G_RET_STS_ERROR;
2478: return FALSE;
2479: WHEN OTHERS THEN
2480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2473: end if;
2474:
2475: EXCEPTION
2476: WHEN FND_API.G_EXC_ERROR THEN
2477: p_return_status := FND_API.G_RET_STS_ERROR;
2478: return FALSE;
2479: WHEN OTHERS THEN
2480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2481: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2476: WHEN FND_API.G_EXC_ERROR THEN
2477: p_return_status := FND_API.G_RET_STS_ERROR;
2478: return FALSE;
2479: WHEN OTHERS THEN
2480: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2481: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2482: SUBSTR (SQLERRM, 1, 240) );
2483: FND_MSG_PUB.Add;
2484: return FALSE;
2528: open l_check_csr;
2529: fetch l_check_csr into l_dummy;
2530: if (l_check_csr%notfound) then
2531: close l_check_csr;
2532: p_return_status := FND_API.G_RET_STS_SUCCESS;
2533: return FALSE;
2534: else
2535: close l_check_csr;
2536: p_return_status := FND_API.G_RET_STS_SUCCESS;
2532: p_return_status := FND_API.G_RET_STS_SUCCESS;
2533: return FALSE;
2534: else
2535: close l_check_csr;
2536: p_return_status := FND_API.G_RET_STS_SUCCESS;
2537: return TRUE;
2538: end if;
2539:
2540: EXCEPTION
2537: return TRUE;
2538: end if;
2539:
2540: EXCEPTION
2541: WHEN FND_API.G_EXC_ERROR THEN
2542: p_return_status := FND_API.G_RET_STS_ERROR;
2543: return FALSE;
2544: WHEN OTHERS THEN
2545: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2538: end if;
2539:
2540: EXCEPTION
2541: WHEN FND_API.G_EXC_ERROR THEN
2542: p_return_status := FND_API.G_RET_STS_ERROR;
2543: return FALSE;
2544: WHEN OTHERS THEN
2545: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2546: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2541: WHEN FND_API.G_EXC_ERROR THEN
2542: p_return_status := FND_API.G_RET_STS_ERROR;
2543: return FALSE;
2544: WHEN OTHERS THEN
2545: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2546: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2547: SUBSTR (SQLERRM, 1, 240) );
2548: FND_MSG_PUB.Add;
2549: return FALSE;
2573: -- Version Initial version number = 1.0
2574: -- History Current version number = 1.0
2575: --=======================================================
2576: procedure UPDATE_FOREIGN_KEY (
2577: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2578: p_api_version_number IN NUMBER,
2579: p_init_msg_tbl IN BOOLEAN := FALSE,
2580: p_msg_count OUT NOCOPY NUMBER,
2581: p_msg_data OUT NOCOPY VARCHAR2,
2580: p_msg_count OUT NOCOPY NUMBER,
2581: p_msg_data OUT NOCOPY VARCHAR2,
2582: p_return_status OUT NOCOPY VARCHAR2,
2583: p_foreign_key_name IN VARCHAR2,
2584: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2585: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2581: p_msg_data OUT NOCOPY VARCHAR2,
2582: p_return_status OUT NOCOPY VARCHAR2,
2583: p_foreign_key_name IN VARCHAR2,
2584: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2585: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2582: p_return_status OUT NOCOPY VARCHAR2,
2583: p_foreign_key_name IN VARCHAR2,
2584: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2585: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2583: p_foreign_key_name IN VARCHAR2,
2584: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2585: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2584: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2585: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2585: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2586: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2587: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2588: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2589: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2590: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2591: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2592: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2593: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2594: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2595: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2596: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2597: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2598: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2599: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2600: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2601: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2602: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2603: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2611: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2604: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2611: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2612: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2605: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2611: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2612: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2613: p_pass IN NUMBER,
2606: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2611: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2612: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2613: p_pass IN NUMBER,
2614: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
2607: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2611: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2612: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2613: p_pass IN NUMBER,
2614: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
2615: ) is
2608: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2609: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2610: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2611: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2612: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2613: p_pass IN NUMBER,
2614: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
2615: ) is
2616: cursor l_get_row_csr is
2638: l_return_status varchar2(1);
2639: l_file_version number;
2640: begin
2641:
2642: IF NOT FND_API.Compatible_API_Call (
2643: l_api_version_number, p_api_version_number, l_api_name,
2644: G_PKG_NAME) then
2645: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2646: return;
2641:
2642: IF NOT FND_API.Compatible_API_Call (
2643: l_api_version_number, p_api_version_number, l_api_name,
2644: G_PKG_NAME) then
2645: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2646: return;
2647: END IF;
2648:
2649: -- Initialize the message table if requested.
2666: FND_MSG_PUB.Add;
2667: end if;
2668: --dbms_output.put_line('Error - Row does not exist');
2669: close l_get_row_csr;
2670: raise FND_API.G_EXC_ERROR;
2671: end if;
2672: close l_get_row_csr;
2673:
2674: --** retrieve ak_foreign_keys_tl row if it exists **
2680: FND_MSG_PUB.Add;
2681: end if;
2682: --dbms_output.put_line('Error - TL Row does not exist');
2683: close l_get_tl_row_csr;
2684: raise FND_API.G_EXC_ERROR;
2685: end if;
2686: close l_get_tl_row_csr;
2687:
2688: --** validate table columns passed in **
2685: end if;
2686: close l_get_tl_row_csr;
2687:
2688: --** validate table columns passed in **
2689: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
2690: if not VALIDATE_FOREIGN_KEY (
2691: p_validation_level => p_validation_level,
2692: p_api_version_number => 1.0,
2693: p_return_status => l_return_status,
2702: p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
2703: p_pass => p_pass
2704: ) then
2705: --dbms_output.put_line(l_api_name || ' validation failed');
2706: raise FND_API.G_EXC_ERROR;
2707: end if;
2708: end if;
2709:
2710: --** Load record to be updated to the database **
2709:
2710: --** Load record to be updated to the database **
2711: --** - first load nullable columns **
2712:
2713: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
2714: (p_attribute_category is null) then
2715: l_foreign_key_rec.attribute_category := p_attribute_category;
2716: end if;
2717: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
2713: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
2714: (p_attribute_category is null) then
2715: l_foreign_key_rec.attribute_category := p_attribute_category;
2716: end if;
2717: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
2718: (p_attribute1 is null) then
2719: l_foreign_key_rec.attribute1 := p_attribute1;
2720: end if;
2721: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
2717: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
2718: (p_attribute1 is null) then
2719: l_foreign_key_rec.attribute1 := p_attribute1;
2720: end if;
2721: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
2722: (p_attribute2 is null) then
2723: l_foreign_key_rec.attribute2 := p_attribute2;
2724: end if;
2725: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
2721: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
2722: (p_attribute2 is null) then
2723: l_foreign_key_rec.attribute2 := p_attribute2;
2724: end if;
2725: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
2726: (p_attribute3 is null) then
2727: l_foreign_key_rec.attribute3 := p_attribute3;
2728: end if;
2729: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
2725: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
2726: (p_attribute3 is null) then
2727: l_foreign_key_rec.attribute3 := p_attribute3;
2728: end if;
2729: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
2730: (p_attribute4 is null) then
2731: l_foreign_key_rec.attribute4 := p_attribute4;
2732: end if;
2733: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
2729: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
2730: (p_attribute4 is null) then
2731: l_foreign_key_rec.attribute4 := p_attribute4;
2732: end if;
2733: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
2734: (p_attribute5 is null) then
2735: l_foreign_key_rec.attribute5 := p_attribute5;
2736: end if;
2737: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
2733: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
2734: (p_attribute5 is null) then
2735: l_foreign_key_rec.attribute5 := p_attribute5;
2736: end if;
2737: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
2738: (p_attribute6 is null) then
2739: l_foreign_key_rec.attribute6 := p_attribute6;
2740: end if;
2741: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
2737: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
2738: (p_attribute6 is null) then
2739: l_foreign_key_rec.attribute6 := p_attribute6;
2740: end if;
2741: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
2742: (p_attribute7 is null) then
2743: l_foreign_key_rec.attribute7 := p_attribute7;
2744: end if;
2745: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
2741: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
2742: (p_attribute7 is null) then
2743: l_foreign_key_rec.attribute7 := p_attribute7;
2744: end if;
2745: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
2746: (p_attribute8 is null) then
2747: l_foreign_key_rec.attribute8 := p_attribute8;
2748: end if;
2749: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
2745: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
2746: (p_attribute8 is null) then
2747: l_foreign_key_rec.attribute8 := p_attribute8;
2748: end if;
2749: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
2750: (p_attribute9 is null) then
2751: l_foreign_key_rec.attribute9 := p_attribute9;
2752: end if;
2753: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
2749: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
2750: (p_attribute9 is null) then
2751: l_foreign_key_rec.attribute9 := p_attribute9;
2752: end if;
2753: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
2754: (p_attribute10 is null) then
2755: l_foreign_key_rec.attribute10 := p_attribute10;
2756: end if;
2757: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
2753: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
2754: (p_attribute10 is null) then
2755: l_foreign_key_rec.attribute10 := p_attribute10;
2756: end if;
2757: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
2758: (p_attribute11 is null) then
2759: l_foreign_key_rec.attribute11 := p_attribute11;
2760: end if;
2761: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
2757: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
2758: (p_attribute11 is null) then
2759: l_foreign_key_rec.attribute11 := p_attribute11;
2760: end if;
2761: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
2762: (p_attribute12 is null) then
2763: l_foreign_key_rec.attribute12 := p_attribute12;
2764: end if;
2765: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
2761: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
2762: (p_attribute12 is null) then
2763: l_foreign_key_rec.attribute12 := p_attribute12;
2764: end if;
2765: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
2766: (p_attribute13 is null) then
2767: l_foreign_key_rec.attribute13 := p_attribute13;
2768: end if;
2769: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
2765: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
2766: (p_attribute13 is null) then
2767: l_foreign_key_rec.attribute13 := p_attribute13;
2768: end if;
2769: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
2770: (p_attribute14 is null) then
2771: l_foreign_key_rec.attribute14 := p_attribute14;
2772: end if;
2773: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
2769: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
2770: (p_attribute14 is null) then
2771: l_foreign_key_rec.attribute14 := p_attribute14;
2772: end if;
2773: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
2774: (p_attribute15 is null) then
2775: l_foreign_key_rec.attribute15 := p_attribute15;
2776: end if;
2777: if (p_from_to_name <> FND_API.G_MISS_CHAR) or
2773: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
2774: (p_attribute15 is null) then
2775: l_foreign_key_rec.attribute15 := p_attribute15;
2776: end if;
2777: if (p_from_to_name <> FND_API.G_MISS_CHAR) or
2778: (p_from_to_name is null) then
2779: l_foreign_key_tl_rec.from_to_name := p_from_to_name;
2780: end if;
2781:
2778: (p_from_to_name is null) then
2779: l_foreign_key_tl_rec.from_to_name := p_from_to_name;
2780: end if;
2781:
2782: if (p_from_to_description <> FND_API.G_MISS_CHAR) or
2783: (p_from_to_description is null) then
2784: l_foreign_key_tl_rec.from_to_description := p_from_to_description;
2785: end if;
2786:
2783: (p_from_to_description is null) then
2784: l_foreign_key_tl_rec.from_to_description := p_from_to_description;
2785: end if;
2786:
2787: if (p_to_from_name <> FND_API.G_MISS_CHAR) or
2788: (p_to_from_name is null) then
2789: l_foreign_key_tl_rec.to_from_name := p_to_from_name;
2790: end if;
2791:
2788: (p_to_from_name is null) then
2789: l_foreign_key_tl_rec.to_from_name := p_to_from_name;
2790: end if;
2791:
2792: if (p_to_from_description <> FND_API.G_MISS_CHAR) or
2793: (p_to_from_description is null) then
2794: l_foreign_key_tl_rec.to_from_description := p_to_from_description;
2795: end if;
2796:
2794: l_foreign_key_tl_rec.to_from_description := p_to_from_description;
2795: end if;
2796:
2797: --** - load non-null columns **
2798: if (p_database_object_name <> FND_API.G_MISS_CHAR) then
2799: l_foreign_key_rec.database_object_name := p_database_object_name;
2800: end if;
2801: if (p_unique_key_name <> FND_API.G_MISS_CHAR) then
2802: l_foreign_key_rec.unique_key_name := p_unique_key_name;
2797: --** - load non-null columns **
2798: if (p_database_object_name <> FND_API.G_MISS_CHAR) then
2799: l_foreign_key_rec.database_object_name := p_database_object_name;
2800: end if;
2801: if (p_unique_key_name <> FND_API.G_MISS_CHAR) then
2802: l_foreign_key_rec.unique_key_name := p_unique_key_name;
2803: end if;
2804: if (p_application_id <> FND_API.G_MISS_NUM) then
2805: l_foreign_key_rec.application_id := p_application_id;
2800: end if;
2801: if (p_unique_key_name <> FND_API.G_MISS_CHAR) then
2802: l_foreign_key_rec.unique_key_name := p_unique_key_name;
2803: end if;
2804: if (p_application_id <> FND_API.G_MISS_NUM) then
2805: l_foreign_key_rec.application_id := p_application_id;
2806: end if;
2807:
2808: if (p_created_by <> FND_API.G_MISS_NUM) then
2804: if (p_application_id <> FND_API.G_MISS_NUM) then
2805: l_foreign_key_rec.application_id := p_application_id;
2806: end if;
2807:
2808: if (p_created_by <> FND_API.G_MISS_NUM) then
2809: l_created_by := p_created_by;
2810: end if;
2811: if (p_creation_date <> FND_API.G_MISS_DATE) then
2812: l_creation_date := p_creation_date;
2807:
2808: if (p_created_by <> FND_API.G_MISS_NUM) then
2809: l_created_by := p_created_by;
2810: end if;
2811: if (p_creation_date <> FND_API.G_MISS_DATE) then
2812: l_creation_date := p_creation_date;
2813: end if;
2814: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
2815: l_last_updated_by := p_last_updated_by;
2810: end if;
2811: if (p_creation_date <> FND_API.G_MISS_DATE) then
2812: l_creation_date := p_creation_date;
2813: end if;
2814: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
2815: l_last_updated_by := p_last_updated_by;
2816: end if;
2817: if (p_last_update_date <> FND_API.G_MISS_DATE) then
2818: l_last_update_date := p_last_update_date;
2813: end if;
2814: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
2815: l_last_updated_by := p_last_updated_by;
2816: end if;
2817: if (p_last_update_date <> FND_API.G_MISS_DATE) then
2818: l_last_update_date := p_last_update_date;
2819: end if;
2820: if (p_last_update_login <> FND_API.G_MISS_NUM) then
2821: l_last_update_login := p_last_update_login;
2816: end if;
2817: if (p_last_update_date <> FND_API.G_MISS_DATE) then
2818: l_last_update_date := p_last_update_date;
2819: end if;
2820: if (p_last_update_login <> FND_API.G_MISS_NUM) then
2821: l_last_update_login := p_last_update_login;
2822: end if;
2823:
2824: if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
2861: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATE_FAILED');
2862: FND_MSG_PUB.Add;
2863: end if;
2864: -- dbms_output.put_line('Row does not exist during update');
2865: raise FND_API.G_EXC_ERROR;
2866: end if;
2867:
2868: update AK_FOREIGN_KEYS_TL set
2869: FROM_TO_NAME = l_foreign_key_tl_rec.from_to_name,
2881: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATE_FAILED');
2882: FND_MSG_PUB.Add;
2883: end if;
2884: --dbms_output.put_line('TL Row does not exist during update');
2885: raise FND_API.G_EXC_ERROR;
2886: end if;
2887:
2888: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
2889: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_UPDATED');
2891: FND_MSG_PUB.Add;
2892: end if;
2893:
2894: end if;
2895: p_return_status := FND_API.G_RET_STS_SUCCESS;
2896:
2897: FND_MSG_PUB.Count_And_Get (
2898: p_count => p_msg_count,
2899: p_data => p_msg_data);
2905: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2906: FND_MSG_PUB.Add;
2907: end if;
2908: rollback to start_update_foreign_key;
2909: p_return_status := FND_API.G_RET_STS_ERROR;
2910: FND_MSG_PUB.Count_And_Get (
2911: p_count => p_msg_count,
2912: p_data => p_msg_data);
2913: WHEN FND_API.G_EXC_ERROR THEN
2909: p_return_status := FND_API.G_RET_STS_ERROR;
2910: FND_MSG_PUB.Count_And_Get (
2911: p_count => p_msg_count,
2912: p_data => p_msg_data);
2913: WHEN FND_API.G_EXC_ERROR THEN
2914: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2915: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_UPDATED');
2916: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2917: FND_MSG_PUB.Add;
2915: FND_MESSAGE.SET_NAME('AK','AK_FOREIGN_KEY_NOT_UPDATED');
2916: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name);
2917: FND_MSG_PUB.Add;
2918: end if;
2919: p_return_status := FND_API.G_RET_STS_ERROR;
2920: rollback to start_update_foreign_key;
2921: FND_MSG_PUB.Count_And_Get (
2922: p_count => p_msg_count,
2923: p_data => p_msg_data);
2921: FND_MSG_PUB.Count_And_Get (
2922: p_count => p_msg_count,
2923: p_data => p_msg_data);
2924: WHEN OTHERS THEN
2925: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2926: rollback to start_update_foreign_key;
2927: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
2928: SUBSTR (SQLERRM, 1, 240) );
2929: FND_MSG_PUB.Add;
2955: -- Version Initial version number = 1.0
2956: -- History Current version number = 1.0
2957: --=======================================================
2958: procedure UPDATE_FOREIGN_KEY_COLUMN (
2959: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2960: p_api_version_number IN NUMBER,
2961: p_init_msg_tbl IN BOOLEAN := FALSE,
2962: p_msg_count OUT NOCOPY NUMBER,
2963: p_msg_data OUT NOCOPY VARCHAR2,
2964: p_return_status OUT NOCOPY VARCHAR2,
2965: p_foreign_key_name IN VARCHAR2,
2966: p_attribute_application_id IN NUMBER,
2967: p_attribute_code IN VARCHAR2,
2968: p_foreign_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
2969: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2965: p_foreign_key_name IN VARCHAR2,
2966: p_attribute_application_id IN NUMBER,
2967: p_attribute_code IN VARCHAR2,
2968: p_foreign_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
2969: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2966: p_attribute_application_id IN NUMBER,
2967: p_attribute_code IN VARCHAR2,
2968: p_foreign_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
2969: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2967: p_attribute_code IN VARCHAR2,
2968: p_foreign_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
2969: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2968: p_foreign_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
2969: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2969: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2970: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2971: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2972: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2973: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2974: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2975: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2976: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2977: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2978: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2979: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2980: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2981: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2989: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2982: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2989: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2990: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2983: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2989: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2990: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2991: p_pass IN NUMBER,
2984: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2989: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2990: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2991: p_pass IN NUMBER,
2992: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
2985: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2989: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2990: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2991: p_pass IN NUMBER,
2992: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
2993: ) is
2986: p_creation_date IN DATE := FND_API.G_MISS_DATE,
2987: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
2988: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
2989: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
2990: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
2991: p_pass IN NUMBER,
2992: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
2993: ) is
2994: cursor l_get_row_csr is
3009: l_last_updated_by number;
3010: l_return_status varchar2(1);
3011: l_file_version number;
3012: begin
3013: IF NOT FND_API.Compatible_API_Call (
3014: l_api_version_number, p_api_version_number, l_api_name,
3015: G_PKG_NAME) then
3016: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3017: return;
3012: begin
3013: IF NOT FND_API.Compatible_API_Call (
3014: l_api_version_number, p_api_version_number, l_api_name,
3015: G_PKG_NAME) then
3016: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3017: return;
3018: END IF;
3019:
3020: -- Initialize the message table if requested.
3033: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_DOES_NOT_EXIST');
3034: FND_MSG_PUB.Add;
3035: end if;
3036: close l_get_row_csr;
3037: raise FND_API.G_EXC_ERROR;
3038: end if;
3039: close l_get_row_csr;
3040:
3041: --** validate table columns passed in **
3038: end if;
3039: close l_get_row_csr;
3040:
3041: --** validate table columns passed in **
3042: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
3043: if not VALIDATE_FOREIGN_KEY_COLUMN (
3044: p_validation_level => p_validation_level,
3045: p_api_version_number => 1.0,
3046: p_return_status => l_return_status,
3050: p_foreign_key_sequence => p_foreign_key_sequence,
3051: p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
3052: p_pass => p_pass
3053: ) then
3054: raise FND_API.G_EXC_ERROR;
3055: end if;
3056: end if;
3057:
3058: --** Load record to be updated to the database **
3060: -- (none)
3061:
3062: --** - load non-null columns **
3063:
3064: if (p_foreign_key_sequence <> FND_API.G_MISS_NUM) then
3065: l_key_column_rec.foreign_key_sequence := p_foreign_key_sequence;
3066: end if;
3067: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3068: (p_attribute_category is null) then
3063:
3064: if (p_foreign_key_sequence <> FND_API.G_MISS_NUM) then
3065: l_key_column_rec.foreign_key_sequence := p_foreign_key_sequence;
3066: end if;
3067: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3068: (p_attribute_category is null) then
3069: l_key_column_rec.attribute_category := p_attribute_category;
3070: end if;
3071: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3067: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3068: (p_attribute_category is null) then
3069: l_key_column_rec.attribute_category := p_attribute_category;
3070: end if;
3071: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3072: (p_attribute1 is null) then
3073: l_key_column_rec.attribute1 := p_attribute1;
3074: end if;
3075: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3071: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3072: (p_attribute1 is null) then
3073: l_key_column_rec.attribute1 := p_attribute1;
3074: end if;
3075: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3076: (p_attribute2 is null) then
3077: l_key_column_rec.attribute2 := p_attribute2;
3078: end if;
3079: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3075: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3076: (p_attribute2 is null) then
3077: l_key_column_rec.attribute2 := p_attribute2;
3078: end if;
3079: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3080: (p_attribute3 is null) then
3081: l_key_column_rec.attribute3 := p_attribute3;
3082: end if;
3083: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3079: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3080: (p_attribute3 is null) then
3081: l_key_column_rec.attribute3 := p_attribute3;
3082: end if;
3083: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3084: (p_attribute4 is null) then
3085: l_key_column_rec.attribute4 := p_attribute4;
3086: end if;
3087: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3083: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3084: (p_attribute4 is null) then
3085: l_key_column_rec.attribute4 := p_attribute4;
3086: end if;
3087: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3088: (p_attribute5 is null) then
3089: l_key_column_rec.attribute5 := p_attribute5;
3090: end if;
3091: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3087: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3088: (p_attribute5 is null) then
3089: l_key_column_rec.attribute5 := p_attribute5;
3090: end if;
3091: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3092: (p_attribute6 is null) then
3093: l_key_column_rec.attribute6 := p_attribute6;
3094: end if;
3095: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3091: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3092: (p_attribute6 is null) then
3093: l_key_column_rec.attribute6 := p_attribute6;
3094: end if;
3095: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3096: (p_attribute7 is null) then
3097: l_key_column_rec.attribute7 := p_attribute7;
3098: end if;
3099: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3095: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3096: (p_attribute7 is null) then
3097: l_key_column_rec.attribute7 := p_attribute7;
3098: end if;
3099: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3100: (p_attribute8 is null) then
3101: l_key_column_rec.attribute8 := p_attribute8;
3102: end if;
3103: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3099: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3100: (p_attribute8 is null) then
3101: l_key_column_rec.attribute8 := p_attribute8;
3102: end if;
3103: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3104: (p_attribute9 is null) then
3105: l_key_column_rec.attribute9 := p_attribute9;
3106: end if;
3107: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3103: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3104: (p_attribute9 is null) then
3105: l_key_column_rec.attribute9 := p_attribute9;
3106: end if;
3107: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3108: (p_attribute10 is null) then
3109: l_key_column_rec.attribute10 := p_attribute10;
3110: end if;
3111: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3107: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3108: (p_attribute10 is null) then
3109: l_key_column_rec.attribute10 := p_attribute10;
3110: end if;
3111: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3112: (p_attribute11 is null) then
3113: l_key_column_rec.attribute11 := p_attribute11;
3114: end if;
3115: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3111: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3112: (p_attribute11 is null) then
3113: l_key_column_rec.attribute11 := p_attribute11;
3114: end if;
3115: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3116: (p_attribute12 is null) then
3117: l_key_column_rec.attribute12 := p_attribute12;
3118: end if;
3119: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3115: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3116: (p_attribute12 is null) then
3117: l_key_column_rec.attribute12 := p_attribute12;
3118: end if;
3119: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3120: (p_attribute13 is null) then
3121: l_key_column_rec.attribute13 := p_attribute13;
3122: end if;
3123: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3119: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3120: (p_attribute13 is null) then
3121: l_key_column_rec.attribute13 := p_attribute13;
3122: end if;
3123: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3124: (p_attribute14 is null) then
3125: l_key_column_rec.attribute14 := p_attribute14;
3126: end if;
3127: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
3123: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3124: (p_attribute14 is null) then
3125: l_key_column_rec.attribute14 := p_attribute14;
3126: end if;
3127: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
3128: (p_attribute15 is null) then
3129: l_key_column_rec.attribute15 := p_attribute15;
3130: end if;
3131:
3128: (p_attribute15 is null) then
3129: l_key_column_rec.attribute15 := p_attribute15;
3130: end if;
3131:
3132: if (p_created_by <> FND_API.G_MISS_NUM) then
3133: l_created_by := p_created_by;
3134: end if;
3135: if (p_creation_date <> FND_API.G_MISS_DATE) then
3136: l_creation_date := p_creation_date;
3131:
3132: if (p_created_by <> FND_API.G_MISS_NUM) then
3133: l_created_by := p_created_by;
3134: end if;
3135: if (p_creation_date <> FND_API.G_MISS_DATE) then
3136: l_creation_date := p_creation_date;
3137: end if;
3138: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3139: l_last_updated_by := p_last_updated_by;
3134: end if;
3135: if (p_creation_date <> FND_API.G_MISS_DATE) then
3136: l_creation_date := p_creation_date;
3137: end if;
3138: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3139: l_last_updated_by := p_last_updated_by;
3140: end if;
3141: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3142: l_last_update_date := p_last_update_date;
3137: end if;
3138: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3139: l_last_updated_by := p_last_updated_by;
3140: end if;
3141: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3142: l_last_update_date := p_last_update_date;
3143: end if;
3144: if (p_last_update_login <> FND_API.G_MISS_NUM) then
3145: l_last_update_login := p_last_update_login;
3140: end if;
3141: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3142: l_last_update_date := p_last_update_date;
3143: end if;
3144: if (p_last_update_login <> FND_API.G_MISS_NUM) then
3145: l_last_update_login := p_last_update_login;
3146: end if;
3147:
3148: if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
3185: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_UPDATE_FAILED');
3186: FND_MSG_PUB.Add;
3187: end if;
3188: --dbms_output.put_line('Row does not exist during update');
3189: raise FND_API.G_EXC_ERROR;
3190: end if;
3191:
3192: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3193: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_UPDATED');
3198: FND_MSG_PUB.Add;
3199: end if;
3200:
3201: end if;
3202: p_return_status := FND_API.G_RET_STS_SUCCESS;
3203:
3204: FND_MSG_PUB.Count_And_Get (
3205: p_count => p_msg_count,
3206: p_data => p_msg_data);
3214: ' ' || p_attribute_code);
3215: FND_MSG_PUB.Add;
3216: end if;
3217: rollback to start_update_key_column;
3218: p_return_status := FND_API.G_RET_STS_ERROR;
3219: FND_MSG_PUB.Count_And_Get (
3220: p_count => p_msg_count,
3221: p_data => p_msg_data);
3222: WHEN FND_API.G_EXC_ERROR THEN
3218: p_return_status := FND_API.G_RET_STS_ERROR;
3219: FND_MSG_PUB.Count_And_Get (
3220: p_count => p_msg_count,
3221: p_data => p_msg_data);
3222: WHEN FND_API.G_EXC_ERROR THEN
3223: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3224: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_UPDATED');
3225: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
3226: ' ' || to_char(p_attribute_application_id) ||
3226: ' ' || to_char(p_attribute_application_id) ||
3227: ' ' || p_attribute_code);
3228: FND_MSG_PUB.Add;
3229: end if;
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: rollback to start_update_key_column;
3232: FND_MSG_PUB.Count_And_Get (
3233: p_count => p_msg_count,
3234: p_data => p_msg_data);
3232: FND_MSG_PUB.Count_And_Get (
3233: p_count => p_msg_count,
3234: p_data => p_msg_data);
3235: WHEN OTHERS THEN
3236: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3237: rollback to start_update_key_column;
3238: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3239: SUBSTR (SQLERRM, 1, 240) );
3240: FND_MSG_PUB.Add;
3266: -- Version Initial version number = 1.0
3267: -- History Current version number = 1.0
3268: --=======================================================
3269: procedure UPDATE_UNIQUE_KEY (
3270: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3271: p_api_version_number IN NUMBER,
3272: p_init_msg_tbl IN BOOLEAN := FALSE,
3273: p_msg_count OUT NOCOPY NUMBER,
3274: p_msg_data OUT NOCOPY VARCHAR2,
3273: p_msg_count OUT NOCOPY NUMBER,
3274: p_msg_data OUT NOCOPY VARCHAR2,
3275: p_return_status OUT NOCOPY VARCHAR2,
3276: p_unique_key_name IN VARCHAR2,
3277: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3278: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3274: p_msg_data OUT NOCOPY VARCHAR2,
3275: p_return_status OUT NOCOPY VARCHAR2,
3276: p_unique_key_name IN VARCHAR2,
3277: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3278: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3275: p_return_status OUT NOCOPY VARCHAR2,
3276: p_unique_key_name IN VARCHAR2,
3277: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3278: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3276: p_unique_key_name IN VARCHAR2,
3277: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3278: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3277: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3278: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3278: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3279: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3280: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3281: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3282: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3283: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3284: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3285: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3286: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3287: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3288: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3289: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3290: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3291: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3299: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3292: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3299: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3300: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3293: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3299: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3300: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3301: p_pass IN NUMBER,
3294: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3299: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3300: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3301: p_pass IN NUMBER,
3302: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
3295: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3299: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3300: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3301: p_pass IN NUMBER,
3302: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
3303: ) is
3296: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3297: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3298: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3299: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3300: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3301: p_pass IN NUMBER,
3302: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
3303: ) is
3304: cursor l_get_row_csr is
3317: l_last_updated_by number;
3318: l_return_status varchar2(1);
3319: l_file_version number;
3320: begin
3321: IF NOT FND_API.Compatible_API_Call (
3322: l_api_version_number, p_api_version_number, l_api_name,
3323: G_PKG_NAME) then
3324: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3325: return;
3320: begin
3321: IF NOT FND_API.Compatible_API_Call (
3322: l_api_version_number, p_api_version_number, l_api_name,
3323: G_PKG_NAME) then
3324: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3325: return;
3326: END IF;
3327:
3328: -- Initialize the message table if requested.
3342: FND_MSG_PUB.Add;
3343: end if;
3344: -- dbms_output.put_line('Error - Row does not exist');
3345: close l_get_row_csr;
3346: raise FND_API.G_EXC_ERROR;
3347: end if;
3348: close l_get_row_csr;
3349:
3350: --** validate table columns passed in **
3347: end if;
3348: close l_get_row_csr;
3349:
3350: --** validate table columns passed in **
3351: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
3352: if not VALIDATE_UNIQUE_KEY (
3353: p_validation_level => p_validation_level,
3354: p_api_version_number => 1.0,
3355: p_return_status => l_return_status,
3359: p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
3360: p_pass => p_pass
3361: ) then
3362: --dbms_output.put_line(l_api_name || ' validation failed');
3363: raise FND_API.G_EXC_ERROR;
3364: end if;
3365: end if;
3366:
3367: --** Load record to be updated to the database **
3366:
3367: --** Load record to be updated to the database **
3368: --** - load non-null columns **
3369:
3370: if (p_database_object_name <> FND_API.G_MISS_CHAR) then
3371: l_unique_key_rec.database_object_name := p_database_object_name;
3372: end if;
3373: if (p_application_id <> FND_API.G_MISS_NUM) then
3374: l_unique_key_rec.application_id := p_application_id;
3369:
3370: if (p_database_object_name <> FND_API.G_MISS_CHAR) then
3371: l_unique_key_rec.database_object_name := p_database_object_name;
3372: end if;
3373: if (p_application_id <> FND_API.G_MISS_NUM) then
3374: l_unique_key_rec.application_id := p_application_id;
3375: end if;
3376: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3377: (p_attribute_category is null) then
3372: end if;
3373: if (p_application_id <> FND_API.G_MISS_NUM) then
3374: l_unique_key_rec.application_id := p_application_id;
3375: end if;
3376: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3377: (p_attribute_category is null) then
3378: l_unique_key_rec.attribute_category := p_attribute_category;
3379: end if;
3380: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3376: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3377: (p_attribute_category is null) then
3378: l_unique_key_rec.attribute_category := p_attribute_category;
3379: end if;
3380: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3381: (p_attribute1 is null) then
3382: l_unique_key_rec.attribute1 := p_attribute1;
3383: end if;
3384: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3380: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3381: (p_attribute1 is null) then
3382: l_unique_key_rec.attribute1 := p_attribute1;
3383: end if;
3384: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3385: (p_attribute2 is null) then
3386: l_unique_key_rec.attribute2 := p_attribute2;
3387: end if;
3388: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3384: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3385: (p_attribute2 is null) then
3386: l_unique_key_rec.attribute2 := p_attribute2;
3387: end if;
3388: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3389: (p_attribute3 is null) then
3390: l_unique_key_rec.attribute3 := p_attribute3;
3391: end if;
3392: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3388: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3389: (p_attribute3 is null) then
3390: l_unique_key_rec.attribute3 := p_attribute3;
3391: end if;
3392: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3393: (p_attribute4 is null) then
3394: l_unique_key_rec.attribute4 := p_attribute4;
3395: end if;
3396: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3392: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3393: (p_attribute4 is null) then
3394: l_unique_key_rec.attribute4 := p_attribute4;
3395: end if;
3396: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3397: (p_attribute5 is null) then
3398: l_unique_key_rec.attribute5 := p_attribute5;
3399: end if;
3400: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3396: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3397: (p_attribute5 is null) then
3398: l_unique_key_rec.attribute5 := p_attribute5;
3399: end if;
3400: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3401: (p_attribute6 is null) then
3402: l_unique_key_rec.attribute6 := p_attribute6;
3403: end if;
3404: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3400: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3401: (p_attribute6 is null) then
3402: l_unique_key_rec.attribute6 := p_attribute6;
3403: end if;
3404: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3405: (p_attribute7 is null) then
3406: l_unique_key_rec.attribute7 := p_attribute7;
3407: end if;
3408: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3404: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3405: (p_attribute7 is null) then
3406: l_unique_key_rec.attribute7 := p_attribute7;
3407: end if;
3408: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3409: (p_attribute8 is null) then
3410: l_unique_key_rec.attribute8 := p_attribute8;
3411: end if;
3412: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3408: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3409: (p_attribute8 is null) then
3410: l_unique_key_rec.attribute8 := p_attribute8;
3411: end if;
3412: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3413: (p_attribute9 is null) then
3414: l_unique_key_rec.attribute9 := p_attribute9;
3415: end if;
3416: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3412: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3413: (p_attribute9 is null) then
3414: l_unique_key_rec.attribute9 := p_attribute9;
3415: end if;
3416: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3417: (p_attribute10 is null) then
3418: l_unique_key_rec.attribute10 := p_attribute10;
3419: end if;
3420: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3416: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3417: (p_attribute10 is null) then
3418: l_unique_key_rec.attribute10 := p_attribute10;
3419: end if;
3420: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3421: (p_attribute11 is null) then
3422: l_unique_key_rec.attribute11 := p_attribute11;
3423: end if;
3424: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3420: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3421: (p_attribute11 is null) then
3422: l_unique_key_rec.attribute11 := p_attribute11;
3423: end if;
3424: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3425: (p_attribute12 is null) then
3426: l_unique_key_rec.attribute12 := p_attribute12;
3427: end if;
3428: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3424: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3425: (p_attribute12 is null) then
3426: l_unique_key_rec.attribute12 := p_attribute12;
3427: end if;
3428: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3429: (p_attribute13 is null) then
3430: l_unique_key_rec.attribute13 := p_attribute13;
3431: end if;
3432: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3428: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3429: (p_attribute13 is null) then
3430: l_unique_key_rec.attribute13 := p_attribute13;
3431: end if;
3432: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3433: (p_attribute14 is null) then
3434: l_unique_key_rec.attribute14 := p_attribute14;
3435: end if;
3436: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
3432: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3433: (p_attribute14 is null) then
3434: l_unique_key_rec.attribute14 := p_attribute14;
3435: end if;
3436: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
3437: (p_attribute15 is null) then
3438: l_unique_key_rec.attribute15 := p_attribute15;
3439: end if;
3440:
3437: (p_attribute15 is null) then
3438: l_unique_key_rec.attribute15 := p_attribute15;
3439: end if;
3440:
3441: if (p_created_by <> FND_API.G_MISS_NUM) then
3442: l_created_by := p_created_by;
3443: end if;
3444: if (p_creation_date <> FND_API.G_MISS_DATE) then
3445: l_creation_date := p_creation_date;
3440:
3441: if (p_created_by <> FND_API.G_MISS_NUM) then
3442: l_created_by := p_created_by;
3443: end if;
3444: if (p_creation_date <> FND_API.G_MISS_DATE) then
3445: l_creation_date := p_creation_date;
3446: end if;
3447: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3448: l_last_updated_by := p_last_updated_by;
3443: end if;
3444: if (p_creation_date <> FND_API.G_MISS_DATE) then
3445: l_creation_date := p_creation_date;
3446: end if;
3447: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3448: l_last_updated_by := p_last_updated_by;
3449: end if;
3450: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3451: l_last_update_date := p_last_update_date;
3446: end if;
3447: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3448: l_last_updated_by := p_last_updated_by;
3449: end if;
3450: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3451: l_last_update_date := p_last_update_date;
3452: end if;
3453: if (p_last_update_login <> FND_API.G_MISS_NUM) then
3454: l_last_update_login := p_last_update_login;
3449: end if;
3450: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3451: l_last_update_date := p_last_update_date;
3452: end if;
3453: if (p_last_update_login <> FND_API.G_MISS_NUM) then
3454: l_last_update_login := p_last_update_login;
3455: end if;
3456:
3457: if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
3493: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_UPDATE_FAILED');
3494: FND_MSG_PUB.Add;
3495: end if;
3496: --dbms_output.put_line('Row does not exist during update');
3497: raise FND_API.G_EXC_ERROR;
3498: end if;
3499:
3500: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3501: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_UPDATED');
3503: FND_MSG_PUB.Add;
3504: end if;
3505:
3506: end if;
3507: p_return_status := FND_API.G_RET_STS_SUCCESS;
3508:
3509: FND_MSG_PUB.Count_And_Get (
3510: p_count => p_msg_count,
3511: p_data => p_msg_data);
3517: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3518: FND_MSG_PUB.Add;
3519: end if;
3520: rollback to start_update_unique_key;
3521: p_return_status := FND_API.G_RET_STS_ERROR;
3522: FND_MSG_PUB.Count_And_Get (
3523: p_count => p_msg_count,
3524: p_data => p_msg_data);
3525: WHEN FND_API.G_EXC_ERROR THEN
3521: p_return_status := FND_API.G_RET_STS_ERROR;
3522: FND_MSG_PUB.Count_And_Get (
3523: p_count => p_msg_count,
3524: p_data => p_msg_data);
3525: WHEN FND_API.G_EXC_ERROR THEN
3526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3527: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_UPDATED');
3528: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3529: FND_MSG_PUB.Add;
3527: FND_MESSAGE.SET_NAME('AK','AK_UNIQUE_KEY_NOT_UPDATED');
3528: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name);
3529: FND_MSG_PUB.Add;
3530: end if;
3531: p_return_status := FND_API.G_RET_STS_ERROR;
3532: rollback to start_update_unique_key;
3533: FND_MSG_PUB.Count_And_Get (
3534: p_count => p_msg_count,
3535: p_data => p_msg_data);
3533: FND_MSG_PUB.Count_And_Get (
3534: p_count => p_msg_count,
3535: p_data => p_msg_data);
3536: WHEN OTHERS THEN
3537: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3538: rollback to start_update_unique_key;
3539: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3540: SUBSTR (SQLERRM, 1, 240) );
3541: FND_MSG_PUB.Add;
3567: -- Version Initial version number = 1.0
3568: -- History Current version number = 1.0
3569: --=======================================================
3570: procedure UPDATE_UNIQUE_KEY_COLUMN (
3571: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3572: p_api_version_number IN NUMBER,
3573: p_init_msg_tbl IN BOOLEAN := FALSE,
3574: p_msg_count OUT NOCOPY NUMBER,
3575: p_msg_data OUT NOCOPY VARCHAR2,
3576: p_return_status OUT NOCOPY VARCHAR2,
3577: p_unique_key_name IN VARCHAR2,
3578: p_attribute_application_id IN NUMBER,
3579: p_attribute_code IN VARCHAR2,
3580: p_unique_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
3581: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3577: p_unique_key_name IN VARCHAR2,
3578: p_attribute_application_id IN NUMBER,
3579: p_attribute_code IN VARCHAR2,
3580: p_unique_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
3581: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3578: p_attribute_application_id IN NUMBER,
3579: p_attribute_code IN VARCHAR2,
3580: p_unique_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
3581: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3579: p_attribute_code IN VARCHAR2,
3580: p_unique_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
3581: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3580: p_unique_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
3581: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3581: p_attribute_category IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3582: p_attribute1 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3583: p_attribute2 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3584: p_attribute3 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3585: p_attribute4 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3586: p_attribute5 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3587: p_attribute6 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3588: p_attribute7 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3589: p_attribute8 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3590: p_attribute9 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3591: p_attribute10 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3592: p_attribute11 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3593: p_attribute12 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3601: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3594: p_attribute13 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3601: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3602: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3595: p_attribute14 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3601: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3602: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3603: p_pass IN NUMBER,
3596: p_attribute15 IN VARCHAR2 := FND_API.G_MISS_CHAR,
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3601: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3602: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3603: p_pass IN NUMBER,
3604: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
3597: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3601: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3602: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3603: p_pass IN NUMBER,
3604: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
3605: ) is
3598: p_creation_date IN DATE := FND_API.G_MISS_DATE,
3599: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
3600: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
3601: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM,
3602: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3603: p_pass IN NUMBER,
3604: p_copy_redo_flag IN OUT NOCOPY BOOLEAN
3605: ) is
3606: cursor l_get_row_csr is
3621: l_last_updated_by number;
3622: l_return_status varchar2(1);
3623: l_file_version number;
3624: begin
3625: IF NOT FND_API.Compatible_API_Call (
3626: l_api_version_number, p_api_version_number, l_api_name,
3627: G_PKG_NAME) then
3628: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3629: return;
3624: begin
3625: IF NOT FND_API.Compatible_API_Call (
3626: l_api_version_number, p_api_version_number, l_api_name,
3627: G_PKG_NAME) then
3628: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3629: return;
3630: END IF;
3631:
3632: -- Initialize the message table if requested.
3646: FND_MSG_PUB.Add;
3647: end if;
3648: --dbms_output.put_line('Error - Row does not exist');
3649: close l_get_row_csr;
3650: raise FND_API.G_EXC_ERROR;
3651: end if;
3652: close l_get_row_csr;
3653:
3654: --** validate table columns passed in **
3651: end if;
3652: close l_get_row_csr;
3653:
3654: --** validate table columns passed in **
3655: if p_validation_level <> FND_API.G_VALID_LEVEL_NONE then
3656: if not VALIDATE_UNIQUE_KEY_COLUMN (
3657: p_validation_level => p_validation_level,
3658: p_api_version_number => 1.0,
3659: p_return_status => l_return_status,
3664: p_caller => AK_ON_OBJECTS_PVT.G_UPDATE,
3665: p_pass => p_pass
3666: ) then
3667: --dbms_output.put_line(l_api_name || ' validation failed');
3668: raise FND_API.G_EXC_ERROR;
3669: end if;
3670: end if;
3671:
3672: --** Load record to be updated to the database **
3671:
3672: --** Load record to be updated to the database **
3673: --** - load non-null columns **
3674:
3675: if (p_unique_key_sequence <> FND_API.G_MISS_NUM) then
3676: l_key_column_rec.unique_key_sequence := p_unique_key_sequence;
3677: end if;
3678: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3679: (p_attribute_category is null) then
3674:
3675: if (p_unique_key_sequence <> FND_API.G_MISS_NUM) then
3676: l_key_column_rec.unique_key_sequence := p_unique_key_sequence;
3677: end if;
3678: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3679: (p_attribute_category is null) then
3680: l_key_column_rec.attribute_category := p_attribute_category;
3681: end if;
3682: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3678: if (p_attribute_category <> FND_API.G_MISS_CHAR) or
3679: (p_attribute_category is null) then
3680: l_key_column_rec.attribute_category := p_attribute_category;
3681: end if;
3682: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3683: (p_attribute1 is null) then
3684: l_key_column_rec.attribute1 := p_attribute1;
3685: end if;
3686: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3682: if (p_attribute1 <> FND_API.G_MISS_CHAR) or
3683: (p_attribute1 is null) then
3684: l_key_column_rec.attribute1 := p_attribute1;
3685: end if;
3686: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3687: (p_attribute2 is null) then
3688: l_key_column_rec.attribute2 := p_attribute2;
3689: end if;
3690: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3686: if (p_attribute2 <> FND_API.G_MISS_CHAR) or
3687: (p_attribute2 is null) then
3688: l_key_column_rec.attribute2 := p_attribute2;
3689: end if;
3690: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3691: (p_attribute3 is null) then
3692: l_key_column_rec.attribute3 := p_attribute3;
3693: end if;
3694: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3690: if (p_attribute3 <> FND_API.G_MISS_CHAR) or
3691: (p_attribute3 is null) then
3692: l_key_column_rec.attribute3 := p_attribute3;
3693: end if;
3694: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3695: (p_attribute4 is null) then
3696: l_key_column_rec.attribute4 := p_attribute4;
3697: end if;
3698: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3694: if (p_attribute4 <> FND_API.G_MISS_CHAR) or
3695: (p_attribute4 is null) then
3696: l_key_column_rec.attribute4 := p_attribute4;
3697: end if;
3698: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3699: (p_attribute5 is null) then
3700: l_key_column_rec.attribute5 := p_attribute5;
3701: end if;
3702: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3698: if (p_attribute5 <> FND_API.G_MISS_CHAR) or
3699: (p_attribute5 is null) then
3700: l_key_column_rec.attribute5 := p_attribute5;
3701: end if;
3702: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3703: (p_attribute6 is null) then
3704: l_key_column_rec.attribute6 := p_attribute6;
3705: end if;
3706: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3702: if (p_attribute6 <> FND_API.G_MISS_CHAR) or
3703: (p_attribute6 is null) then
3704: l_key_column_rec.attribute6 := p_attribute6;
3705: end if;
3706: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3707: (p_attribute7 is null) then
3708: l_key_column_rec.attribute7 := p_attribute7;
3709: end if;
3710: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3706: if (p_attribute7 <> FND_API.G_MISS_CHAR) or
3707: (p_attribute7 is null) then
3708: l_key_column_rec.attribute7 := p_attribute7;
3709: end if;
3710: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3711: (p_attribute8 is null) then
3712: l_key_column_rec.attribute8 := p_attribute8;
3713: end if;
3714: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3710: if (p_attribute8 <> FND_API.G_MISS_CHAR) or
3711: (p_attribute8 is null) then
3712: l_key_column_rec.attribute8 := p_attribute8;
3713: end if;
3714: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3715: (p_attribute9 is null) then
3716: l_key_column_rec.attribute9 := p_attribute9;
3717: end if;
3718: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3714: if (p_attribute9 <> FND_API.G_MISS_CHAR) or
3715: (p_attribute9 is null) then
3716: l_key_column_rec.attribute9 := p_attribute9;
3717: end if;
3718: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3719: (p_attribute10 is null) then
3720: l_key_column_rec.attribute10 := p_attribute10;
3721: end if;
3722: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3718: if (p_attribute10 <> FND_API.G_MISS_CHAR) or
3719: (p_attribute10 is null) then
3720: l_key_column_rec.attribute10 := p_attribute10;
3721: end if;
3722: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3723: (p_attribute11 is null) then
3724: l_key_column_rec.attribute11 := p_attribute11;
3725: end if;
3726: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3722: if (p_attribute11 <> FND_API.G_MISS_CHAR) or
3723: (p_attribute11 is null) then
3724: l_key_column_rec.attribute11 := p_attribute11;
3725: end if;
3726: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3727: (p_attribute12 is null) then
3728: l_key_column_rec.attribute12 := p_attribute12;
3729: end if;
3730: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3726: if (p_attribute12 <> FND_API.G_MISS_CHAR) or
3727: (p_attribute12 is null) then
3728: l_key_column_rec.attribute12 := p_attribute12;
3729: end if;
3730: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3731: (p_attribute13 is null) then
3732: l_key_column_rec.attribute13 := p_attribute13;
3733: end if;
3734: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3730: if (p_attribute13 <> FND_API.G_MISS_CHAR) or
3731: (p_attribute13 is null) then
3732: l_key_column_rec.attribute13 := p_attribute13;
3733: end if;
3734: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3735: (p_attribute14 is null) then
3736: l_key_column_rec.attribute14 := p_attribute14;
3737: end if;
3738: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
3734: if (p_attribute14 <> FND_API.G_MISS_CHAR) or
3735: (p_attribute14 is null) then
3736: l_key_column_rec.attribute14 := p_attribute14;
3737: end if;
3738: if (p_attribute15 <> FND_API.G_MISS_CHAR) or
3739: (p_attribute15 is null) then
3740: l_key_column_rec.attribute15 := p_attribute15;
3741: end if;
3742:
3739: (p_attribute15 is null) then
3740: l_key_column_rec.attribute15 := p_attribute15;
3741: end if;
3742:
3743: if (p_created_by <> FND_API.G_MISS_NUM) then
3744: l_created_by := p_created_by;
3745: end if;
3746: if (p_creation_date <> FND_API.G_MISS_DATE) then
3747: l_creation_date := p_creation_date;
3742:
3743: if (p_created_by <> FND_API.G_MISS_NUM) then
3744: l_created_by := p_created_by;
3745: end if;
3746: if (p_creation_date <> FND_API.G_MISS_DATE) then
3747: l_creation_date := p_creation_date;
3748: end if;
3749: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3750: l_last_updated_by := p_last_updated_by;
3745: end if;
3746: if (p_creation_date <> FND_API.G_MISS_DATE) then
3747: l_creation_date := p_creation_date;
3748: end if;
3749: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3750: l_last_updated_by := p_last_updated_by;
3751: end if;
3752: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3753: l_last_update_date := p_last_update_date;
3748: end if;
3749: if (p_last_updated_by <> FND_API.G_MISS_NUM) then
3750: l_last_updated_by := p_last_updated_by;
3751: end if;
3752: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3753: l_last_update_date := p_last_update_date;
3754: end if;
3755: if (p_last_update_login <> FND_API.G_MISS_NUM) then
3756: l_last_update_login := p_last_update_login;
3751: end if;
3752: if (p_last_update_date <> FND_API.G_MISS_DATE) then
3753: l_last_update_date := p_last_update_date;
3754: end if;
3755: if (p_last_update_login <> FND_API.G_MISS_NUM) then
3756: l_last_update_login := p_last_update_login;
3757: end if;
3758:
3759: if AK_ON_OBJECTS_PVT.IS_UPDATEABLE(
3796: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_UPDATE_FAILED');
3797: FND_MSG_PUB.Add;
3798: end if;
3799: --dbms_output.put_line('Row does not exist during update');
3800: raise FND_API.G_EXC_ERROR;
3801: end if;
3802:
3803: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
3804: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_UPDATED');
3808: FND_MSG_PUB.Add;
3809: end if;
3810:
3811: end if;
3812: p_return_status := FND_API.G_RET_STS_SUCCESS;
3813:
3814: FND_MSG_PUB.Count_And_Get (
3815: p_count => p_msg_count,
3816: p_data => p_msg_data);
3824: ' ' || p_attribute_code);
3825: FND_MSG_PUB.Add;
3826: end if;
3827: rollback to start_update_key_column;
3828: p_return_status := FND_API.G_RET_STS_ERROR;
3829: FND_MSG_PUB.Count_And_Get (
3830: p_count => p_msg_count,
3831: p_data => p_msg_data);
3832: WHEN FND_API.G_EXC_ERROR THEN
3828: p_return_status := FND_API.G_RET_STS_ERROR;
3829: FND_MSG_PUB.Count_And_Get (
3830: p_count => p_msg_count,
3831: p_data => p_msg_data);
3832: WHEN FND_API.G_EXC_ERROR THEN
3833: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3834: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_UPDATED');
3835: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name || ' ' ||
3836: ' ' || to_char(p_attribute_application_id) ||
3836: ' ' || to_char(p_attribute_application_id) ||
3837: ' ' || p_attribute_code);
3838: FND_MSG_PUB.Add;
3839: end if;
3840: p_return_status := FND_API.G_RET_STS_ERROR;
3841: rollback to start_update_key_column;
3842: FND_MSG_PUB.Count_And_Get (
3843: p_count => p_msg_count,
3844: p_data => p_msg_data);
3842: FND_MSG_PUB.Count_And_Get (
3843: p_count => p_msg_count,
3844: p_data => p_msg_data);
3845: WHEN OTHERS THEN
3846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3847: rollback to start_update_key_column;
3848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3849: SUBSTR (SQLERRM, 1, 240) );
3850: FND_MSG_PUB.Add;
3884: -- Version Initial version number = 1.0
3885: -- History Current version number = 1.0
3886: --========================================================
3887: function VALIDATE_FOREIGN_KEY (
3888: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3889: p_api_version_number IN NUMBER,
3890: p_return_status OUT NOCOPY VARCHAR2,
3891: p_foreign_key_name IN VARCHAR2,
3892: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3888: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3889: p_api_version_number IN NUMBER,
3890: p_return_status OUT NOCOPY VARCHAR2,
3891: p_foreign_key_name IN VARCHAR2,
3892: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3893: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3889: p_api_version_number IN NUMBER,
3890: p_return_status OUT NOCOPY VARCHAR2,
3891: p_foreign_key_name IN VARCHAR2,
3892: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3893: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3897: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3890: p_return_status OUT NOCOPY VARCHAR2,
3891: p_foreign_key_name IN VARCHAR2,
3892: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3893: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3897: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3898: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3891: p_foreign_key_name IN VARCHAR2,
3892: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3893: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3897: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3898: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3899: p_caller IN VARCHAR2,
3892: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3893: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3897: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3898: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3899: p_caller IN VARCHAR2,
3900: p_pass IN NUMBER := 2
3893: p_unique_key_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3897: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3898: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3899: p_caller IN VARCHAR2,
3900: p_pass IN NUMBER := 2
3901: ) return BOOLEAN is
3894: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
3895: p_from_to_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3896: p_from_to_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3897: p_to_from_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
3898: p_to_from_description IN VARCHAR2 := FND_API.G_MISS_CHAR,
3899: p_caller IN VARCHAR2,
3900: p_pass IN NUMBER := 2
3901: ) return BOOLEAN is
3902: l_api_version_number CONSTANT number := 1.0;
3903: l_api_name CONSTANT varchar2(30) := 'Validate_Foreign_Key';
3904: l_error BOOLEAN;
3905: l_return_status VARCHAR2(1);
3906: begin
3907: IF NOT FND_API.Compatible_API_Call (
3908: l_api_version_number, p_api_version_number, l_api_name,
3909: G_PKG_NAME) then
3910: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3911: return FALSE;
3906: begin
3907: IF NOT FND_API.Compatible_API_Call (
3908: l_api_version_number, p_api_version_number, l_api_name,
3909: G_PKG_NAME) then
3910: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3911: return FALSE;
3912: END IF;
3913:
3914: l_error := FALSE;
3913:
3914: l_error := FALSE;
3915:
3916: --** if validation level is none, no validation is necessary
3917: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
3918: p_return_status := FND_API.G_RET_STS_SUCCESS;
3919: return TRUE;
3920: end if;
3921:
3914: l_error := FALSE;
3915:
3916: --** if validation level is none, no validation is necessary
3917: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
3918: p_return_status := FND_API.G_RET_STS_SUCCESS;
3919: return TRUE;
3920: end if;
3921:
3922: --** check that key columns are not null and not missing **
3920: end if;
3921:
3922: --** check that key columns are not null and not missing **
3923: if ((p_foreign_key_name is null) or
3924: (p_foreign_key_name = FND_API.G_MISS_CHAR)) then
3925: l_error := TRUE;
3926: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3927: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3928: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_NAME');
3935: --* which have already read the parent object.)
3936: --* (This check is only done if a view name is given, which may not
3937: --* be the case if called from the Update_Foreign_Key API.)
3938: if (p_caller <> AK_ON_OBJECTS_PVT.G_DOWNLOAD) then
3939: if (p_database_object_name <> FND_API.G_MISS_CHAR) then
3940: if (NOT AK_OBJECT_PVT.OBJECT_EXISTS (
3941: p_api_version_number => 1.0,
3942: p_return_status => l_return_status,
3943: p_database_object_name => p_database_object_name) ) then
3953:
3954: --** check that required columns are not null and, unless calling **
3955: --** from UPDATE procedure, the columns are not missing **
3956: if ((p_database_object_name is null) or
3957: (p_database_object_name = FND_API.G_MISS_CHAR and
3958: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
3959: then
3960: l_error := TRUE;
3961: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3965: end if;
3966: end if;
3967:
3968: if ((p_unique_key_name is null) or
3969: (p_unique_key_name = FND_API.G_MISS_CHAR and
3970: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
3971: l_error := TRUE;
3972: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3973: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3976: end if;
3977: end if;
3978:
3979: if ((p_application_id is null) or
3980: (p_application_id = FND_API.G_MISS_NUM and
3981: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
3982: l_error := TRUE;
3983: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
3984: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
3988: end if;
3989:
3990: --** Validate columns **
3991: -- - application ID
3992: if (p_application_id <> FND_API.G_MISS_NUM) then
3993: if (NOT AK_ON_OBJECTS_PVT.VALID_APPLICATION_ID (
3994: p_api_version_number => 1.0,
3995: p_return_status => l_return_status,
3996: p_application_id => p_application_id) ) then
4003: end if;
4004: end if;
4005:
4006: -- - unique_key_name
4007: if (p_unique_key_name <> FND_API.G_MISS_CHAR) then
4008: if (NOT AK_KEY_PVT.UNIQUE_KEY_EXISTS (
4009: p_api_version_number => 1.0,
4010: p_return_status => l_return_status,
4011: p_unique_key_name => p_unique_key_name) ) then
4019: end if;
4020: end if;
4021:
4022: -- return true if no error, false otherwise
4023: p_return_status := FND_API.G_RET_STS_SUCCESS;
4024: return (not l_error);
4025:
4026: EXCEPTION
4027: WHEN FND_API.G_EXC_ERROR THEN
4023: p_return_status := FND_API.G_RET_STS_SUCCESS;
4024: return (not l_error);
4025:
4026: EXCEPTION
4027: WHEN FND_API.G_EXC_ERROR THEN
4028: p_return_status := FND_API.G_RET_STS_ERROR;
4029: return FALSE;
4030: WHEN OTHERS THEN
4031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4024: return (not l_error);
4025:
4026: EXCEPTION
4027: WHEN FND_API.G_EXC_ERROR THEN
4028: p_return_status := FND_API.G_RET_STS_ERROR;
4029: return FALSE;
4030: WHEN OTHERS THEN
4031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4032: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4027: WHEN FND_API.G_EXC_ERROR THEN
4028: p_return_status := FND_API.G_RET_STS_ERROR;
4029: return FALSE;
4030: WHEN OTHERS THEN
4031: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4032: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4033: SUBSTR (SQLERRM, 1, 240) );
4034: FND_MSG_PUB.Add;
4035: return FALSE;
4067: -- Version Initial version number = 1.0
4068: -- History Current version number = 1.0
4069: --========================================================
4070: function VALIDATE_FOREIGN_KEY_COLUMN (
4071: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4072: p_api_version_number IN NUMBER,
4073: p_return_status OUT NOCOPY VARCHAR2,
4074: p_foreign_key_name IN VARCHAR2,
4075: p_attribute_application_id IN NUMBER,
4073: p_return_status OUT NOCOPY VARCHAR2,
4074: p_foreign_key_name IN VARCHAR2,
4075: p_attribute_application_id IN NUMBER,
4076: p_attribute_code IN VARCHAR2,
4077: p_foreign_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
4078: p_caller IN VARCHAR2,
4079: p_pass IN NUMBER := 2
4080: ) return BOOLEAN is
4081: cursor l_check_fk_csr is
4095: l_return_status VARCHAR2(1);
4096: l_database_object_name VARCHAR2(30);
4097: begin
4098:
4099: IF NOT FND_API.Compatible_API_Call (
4100: l_api_version_number, p_api_version_number, l_api_name,
4101: G_PKG_NAME) then
4102: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4103: return FALSE;
4098:
4099: IF NOT FND_API.Compatible_API_Call (
4100: l_api_version_number, p_api_version_number, l_api_name,
4101: G_PKG_NAME) then
4102: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4103: return FALSE;
4104: END IF;
4105:
4106: l_error := FALSE;
4105:
4106: l_error := FALSE;
4107:
4108: --** if validation level is none, no validation is necessary
4109: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
4110: p_return_status := FND_API.G_RET_STS_SUCCESS;
4111: return TRUE;
4112: end if;
4113:
4106: l_error := FALSE;
4107:
4108: --** if validation level is none, no validation is necessary
4109: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
4110: p_return_status := FND_API.G_RET_STS_SUCCESS;
4111: return TRUE;
4112: end if;
4113:
4114: --** check that key columns are not null and not missing **
4112: end if;
4113:
4114: --** check that key columns are not null and not missing **
4115: if ((p_foreign_key_name is null) or
4116: (p_foreign_key_name = FND_API.G_MISS_CHAR)) then
4117: l_error := TRUE;
4118: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4119: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4120: FND_MESSAGE.SET_TOKEN('COLUMN', 'FOREIGN_KEY_NAME');
4122: end if;
4123: end if;
4124:
4125: if ((p_attribute_application_id is null) or
4126: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
4127: l_error := TRUE;
4128: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4129: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4130: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
4132: end if;
4133: end if;
4134:
4135: if ((p_attribute_code is null) or
4136: (p_attribute_code = FND_API.G_MISS_CHAR)) then
4137: l_error := TRUE;
4138: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4139: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4140: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
4177:
4178: --** check that required columns are not null and, unless calling **
4179: --** from UPDATE procedure, the columns are not missing **
4180: if ((p_foreign_key_sequence is null) or
4181: (p_foreign_key_sequence = FND_API.G_MISS_NUM and
4182: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
4183: then
4184: l_error := TRUE;
4185: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4191:
4192: --** check that the foreign_key_sequence should be referencing *
4193: --** some valid unique key columns *
4194: --** (Check this only if a foreign_key_sequence value is passed) *
4195: if (p_foreign_key_sequence <> FND_API.G_MISS_NUM) then
4196: open l_check_seq_csr;
4197: fetch l_check_seq_csr into l_dummy;
4198: if (l_check_seq_csr%notfound) then
4199: close l_check_seq_csr;
4208: end if;
4209: end if;
4210:
4211: -- return true if no error, false otherwise
4212: p_return_status := FND_API.G_RET_STS_SUCCESS;
4213: return (not l_error);
4214:
4215: EXCEPTION
4216: WHEN FND_API.G_EXC_ERROR THEN
4212: p_return_status := FND_API.G_RET_STS_SUCCESS;
4213: return (not l_error);
4214:
4215: EXCEPTION
4216: WHEN FND_API.G_EXC_ERROR THEN
4217: p_return_status := FND_API.G_RET_STS_ERROR;
4218: return FALSE;
4219: WHEN OTHERS THEN
4220: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4213: return (not l_error);
4214:
4215: EXCEPTION
4216: WHEN FND_API.G_EXC_ERROR THEN
4217: p_return_status := FND_API.G_RET_STS_ERROR;
4218: return FALSE;
4219: WHEN OTHERS THEN
4220: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4221: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4216: WHEN FND_API.G_EXC_ERROR THEN
4217: p_return_status := FND_API.G_RET_STS_ERROR;
4218: return FALSE;
4219: WHEN OTHERS THEN
4220: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4221: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4222: SUBSTR (SQLERRM, 1, 240) );
4223: FND_MSG_PUB.Add;
4224: return FALSE;
4256: -- Version Initial version number = 1.0
4257: -- History Current version number = 1.0
4258: --========================================================
4259: function VALIDATE_UNIQUE_KEY (
4260: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4261: p_api_version_number IN NUMBER,
4262: p_return_status OUT NOCOPY VARCHAR2,
4263: p_unique_key_name IN VARCHAR2,
4264: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
4260: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4261: p_api_version_number IN NUMBER,
4262: p_return_status OUT NOCOPY VARCHAR2,
4263: p_unique_key_name IN VARCHAR2,
4264: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
4265: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
4266: p_caller IN VARCHAR2,
4267: p_pass IN NUMBER := 2
4268: ) return BOOLEAN is
4261: p_api_version_number IN NUMBER,
4262: p_return_status OUT NOCOPY VARCHAR2,
4263: p_unique_key_name IN VARCHAR2,
4264: p_database_object_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
4265: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
4266: p_caller IN VARCHAR2,
4267: p_pass IN NUMBER := 2
4268: ) return BOOLEAN is
4269: l_api_version_number CONSTANT number := 1.0;
4271: l_error BOOLEAN;
4272: l_return_status VARCHAR2(1);
4273: begin
4274:
4275: IF NOT FND_API.Compatible_API_Call (
4276: l_api_version_number, p_api_version_number, l_api_name,
4277: G_PKG_NAME) then
4278: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4279: return FALSE;
4274:
4275: IF NOT FND_API.Compatible_API_Call (
4276: l_api_version_number, p_api_version_number, l_api_name,
4277: G_PKG_NAME) then
4278: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4279: return FALSE;
4280: END IF;
4281:
4282: l_error := FALSE;
4281:
4282: l_error := FALSE;
4283:
4284: --** if validation level is none, no validation is necessary
4285: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
4286: p_return_status := FND_API.G_RET_STS_SUCCESS;
4287: return TRUE;
4288: end if;
4289:
4282: l_error := FALSE;
4283:
4284: --** if validation level is none, no validation is necessary
4285: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
4286: p_return_status := FND_API.G_RET_STS_SUCCESS;
4287: return TRUE;
4288: end if;
4289:
4290: --** check that key columns are not null and not missing **
4288: end if;
4289:
4290: --** check that key columns are not null and not missing **
4291: if ((p_unique_key_name is null) or
4292: (p_unique_key_name = FND_API.G_MISS_CHAR)) then
4293: l_error := TRUE;
4294: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4295: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4296: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
4302: --* (This check can be skipped if called from the download procedure
4303: --* which have already read the parent object.)
4304: --* (This check will only be done if a view name is passed.)
4305: if (p_caller <> AK_ON_OBJECTS_PVT.G_DOWNLOAD) then
4306: if (p_database_object_name <> FND_API.G_MISS_CHAR) then
4307: if (NOT AK_OBJECT_PVT.OBJECT_EXISTS (
4308: p_api_version_number => 1.0,
4309: p_return_status => l_return_status,
4310: p_database_object_name => p_database_object_name) ) then
4320:
4321: --** check that required columns are not null and, unless calling **
4322: --** from UPDATE procedure, the columns are not missing **
4323: if ((p_database_object_name is null) or
4324: (p_database_object_name = FND_API.G_MISS_CHAR and
4325: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
4326: l_error := TRUE;
4327: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4328: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4331: end if;
4332: end if;
4333:
4334: if ((p_application_id is null) or
4335: (p_application_id = FND_API.G_MISS_NUM and
4336: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE)) then
4337: l_error := TRUE;
4338: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4339: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4344:
4345:
4346: --** Validate columns **
4347: -- - application ID
4348: if (p_application_id <> FND_API.G_MISS_NUM) then
4349: if (NOT AK_ON_OBJECTS_PVT.VALID_APPLICATION_ID (
4350: p_api_version_number => 1.0,
4351: p_return_status => l_return_status,
4352: p_application_id => p_application_id) ) then
4360: end if;
4361: end if;
4362:
4363: -- return true if no error, false otherwise
4364: p_return_status := FND_API.G_RET_STS_SUCCESS;
4365: return (not l_error);
4366:
4367: EXCEPTION
4368: WHEN FND_API.G_EXC_ERROR THEN
4364: p_return_status := FND_API.G_RET_STS_SUCCESS;
4365: return (not l_error);
4366:
4367: EXCEPTION
4368: WHEN FND_API.G_EXC_ERROR THEN
4369: p_return_status := FND_API.G_RET_STS_ERROR;
4370: return FALSE;
4371: WHEN OTHERS THEN
4372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4365: return (not l_error);
4366:
4367: EXCEPTION
4368: WHEN FND_API.G_EXC_ERROR THEN
4369: p_return_status := FND_API.G_RET_STS_ERROR;
4370: return FALSE;
4371: WHEN OTHERS THEN
4372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4368: WHEN FND_API.G_EXC_ERROR THEN
4369: p_return_status := FND_API.G_RET_STS_ERROR;
4370: return FALSE;
4371: WHEN OTHERS THEN
4372: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4374: SUBSTR (SQLERRM, 1, 240) );
4375: FND_MSG_PUB.Add;
4376: return FALSE;
4408: -- Version Initial version number = 1.0
4409: -- History Current version number = 1.0
4410: --========================================================
4411: function VALIDATE_UNIQUE_KEY_COLUMN (
4412: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4413: p_api_version_number IN NUMBER,
4414: p_return_status OUT NOCOPY VARCHAR2,
4415: p_unique_key_name IN VARCHAR2,
4416: p_attribute_application_id IN NUMBER,
4414: p_return_status OUT NOCOPY VARCHAR2,
4415: p_unique_key_name IN VARCHAR2,
4416: p_attribute_application_id IN NUMBER,
4417: p_attribute_code IN VARCHAR2,
4418: p_unique_key_sequence IN NUMBER := FND_API.G_MISS_NUM,
4419: p_caller IN VARCHAR2,
4420: p_pass IN NUMBER := 2
4421: ) return BOOLEAN is
4422: cursor l_check_pk_csr is
4437: l_return_status VARCHAR2(1);
4438: l_database_object_name VARCHAR2(30);
4439: begin
4440:
4441: IF NOT FND_API.Compatible_API_Call (
4442: l_api_version_number, p_api_version_number, l_api_name,
4443: G_PKG_NAME) then
4444: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4445: return FALSE;
4440:
4441: IF NOT FND_API.Compatible_API_Call (
4442: l_api_version_number, p_api_version_number, l_api_name,
4443: G_PKG_NAME) then
4444: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4445: return FALSE;
4446: END IF;
4447:
4448: l_error := FALSE;
4447:
4448: l_error := FALSE;
4449:
4450: --** if validation level is none, no validation is necessary
4451: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
4452: p_return_status := FND_API.G_RET_STS_SUCCESS;
4453: return TRUE;
4454: end if;
4455:
4448: l_error := FALSE;
4449:
4450: --** if validation level is none, no validation is necessary
4451: if (p_validation_level = FND_API.G_VALID_LEVEL_NONE) then
4452: p_return_status := FND_API.G_RET_STS_SUCCESS;
4453: return TRUE;
4454: end if;
4455:
4456: --** check that key columns are not null and not missing **
4454: end if;
4455:
4456: --** check that key columns are not null and not missing **
4457: if ((p_unique_key_name is null) or
4458: (p_unique_key_name = FND_API.G_MISS_CHAR)) then
4459: l_error := TRUE;
4460: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4461: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4462: FND_MESSAGE.SET_TOKEN('COLUMN', 'UNIQUE_KEY_NAME');
4464: end if;
4465: end if;
4466:
4467: if ((p_attribute_application_id is null) or
4468: (p_attribute_application_id = FND_API.G_MISS_NUM)) then
4469: l_error := TRUE;
4470: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4471: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4472: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_APPLICATION_ID');
4474: end if;
4475: end if;
4476:
4477: if ((p_attribute_code is null) or
4478: (p_attribute_code = FND_API.G_MISS_CHAR)) then
4479: l_error := TRUE;
4480: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4481: FND_MESSAGE.SET_NAME('AK','AK_CANNOT_BE_NULL');
4482: FND_MESSAGE.SET_TOKEN('COLUMN', 'ATTRIBUTE_CODE');
4518:
4519: --** check that required columns are not null and, unless calling **
4520: --** from UPDATE procedure, the columns are not missing **
4521: if ((p_unique_key_sequence is null) or
4522: (p_unique_key_sequence = FND_API.G_MISS_NUM and
4523: p_caller <> AK_ON_OBJECTS_PVT.G_UPDATE))
4524: then
4525: l_error := TRUE;
4526: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) and (p_pass = 2) then
4547: close l_check_seq_csr;
4548: end if;
4549:
4550: -- return true if no error, false otherwise
4551: p_return_status := FND_API.G_RET_STS_SUCCESS;
4552: return (not l_error);
4553:
4554: EXCEPTION
4555: WHEN FND_API.G_EXC_ERROR THEN
4551: p_return_status := FND_API.G_RET_STS_SUCCESS;
4552: return (not l_error);
4553:
4554: EXCEPTION
4555: WHEN FND_API.G_EXC_ERROR THEN
4556: p_return_status := FND_API.G_RET_STS_ERROR;
4557: return FALSE;
4558: WHEN OTHERS THEN
4559: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4552: return (not l_error);
4553:
4554: EXCEPTION
4555: WHEN FND_API.G_EXC_ERROR THEN
4556: p_return_status := FND_API.G_RET_STS_ERROR;
4557: return FALSE;
4558: WHEN OTHERS THEN
4559: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4560: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4555: WHEN FND_API.G_EXC_ERROR THEN
4556: p_return_status := FND_API.G_RET_STS_ERROR;
4557: return FALSE;
4558: WHEN OTHERS THEN
4559: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4560: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4561: SUBSTR (SQLERRM, 1, 240) );
4562: FND_MSG_PUB.Add;
4563: return FALSE;
4589: -- Version Initial version number = 1.0
4590: -- History Current version number = 1.0
4591: --=======================================================
4592: procedure CHECK_FOREIGN_KEY_SEQUENCE (
4593: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4594: p_api_version_number IN NUMBER,
4595: p_return_status OUT NOCOPY VARCHAR2,
4596: p_foreign_key_name IN VARCHAR2,
4597: p_attribute_application_id IN NUMBER,
4616: loop
4617: fetch l_check_csr into l_attribute_code, l_attribute_application_id;
4618: if (l_check_csr%notfound) then
4619: close l_check_csr;
4620: p_return_status := FND_API.G_RET_STS_SUCCESS;
4621: exit;
4622: else
4623: if (l_attribute_code <> p_attribute_code) or
4624: (l_attribute_application_id <> p_attribute_application_id) then
4637: p_attribute_application_id => l_attribute_application_id,
4638: p_attribute_code => l_attribute_code,
4639: p_delete_cascade => 'Y'
4640: );
4641: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4642: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4643: close l_check_csr;
4644: raise FND_API.G_EXC_ERROR;
4645: end if;
4638: p_attribute_code => l_attribute_code,
4639: p_delete_cascade => 'Y'
4640: );
4641: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4642: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4643: close l_check_csr;
4644: raise FND_API.G_EXC_ERROR;
4645: end if;
4646: end if; -- /* if l_attribute_code */
4640: );
4641: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4642: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4643: close l_check_csr;
4644: raise FND_API.G_EXC_ERROR;
4645: end if;
4646: end if; -- /* if l_attribute_code */
4647: end if; -- /* if l_check_csr%notfound */
4648: end loop;
4650: close l_check_csr;
4651: end if;
4652:
4653: EXCEPTION
4654: WHEN FND_API.G_EXC_ERROR THEN
4655: p_return_status := FND_API.G_RET_STS_ERROR;
4656: WHEN OTHERS THEN
4657: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4658: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4651: end if;
4652:
4653: EXCEPTION
4654: WHEN FND_API.G_EXC_ERROR THEN
4655: p_return_status := FND_API.G_RET_STS_ERROR;
4656: WHEN OTHERS THEN
4657: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4658: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4659: SUBSTR (SQLERRM, 1, 240) );
4653: EXCEPTION
4654: WHEN FND_API.G_EXC_ERROR THEN
4655: p_return_status := FND_API.G_RET_STS_ERROR;
4656: WHEN OTHERS THEN
4657: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4658: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4659: SUBSTR (SQLERRM, 1, 240) );
4660: FND_MSG_PUB.Add;
4661:
4682: -- Version Initial version number = 1.0
4683: -- History Current version number = 1.0
4684: --=======================================================
4685: procedure DELETE_RELATED_FOREIGN_KEY_COL (
4686: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4687: p_api_version_number IN NUMBER,
4688: p_msg_count OUT NOCOPY NUMBER,
4689: p_msg_data OUT NOCOPY VARCHAR2,
4690: p_return_status OUT NOCOPY VARCHAR2,
4718: p_attribute_application_id => csr_rec.attribute_application_id,
4719: p_attribute_code => csr_rec.attribute_code,
4720: p_delete_cascade => 'Y'
4721: );
4722: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4723: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4724: l_attribute_code := csr_rec.attribute_code;
4725: l_attribute_appl_id := csr_rec.attribute_application_id;
4726: raise FND_API.G_EXC_ERROR;
4719: p_attribute_code => csr_rec.attribute_code,
4720: p_delete_cascade => 'Y'
4721: );
4722: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4723: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4724: l_attribute_code := csr_rec.attribute_code;
4725: l_attribute_appl_id := csr_rec.attribute_application_id;
4726: raise FND_API.G_EXC_ERROR;
4727: end if;
4722: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4723: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4724: l_attribute_code := csr_rec.attribute_code;
4725: l_attribute_appl_id := csr_rec.attribute_application_id;
4726: raise FND_API.G_EXC_ERROR;
4727: end if;
4728: end loop;
4729:
4730: p_return_status := FND_API.G_RET_STS_SUCCESS;
4726: raise FND_API.G_EXC_ERROR;
4727: end if;
4728: end loop;
4729:
4730: p_return_status := FND_API.G_RET_STS_SUCCESS;
4731:
4732: EXCEPTION
4733: WHEN FND_API.G_EXC_ERROR THEN
4734: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4729:
4730: p_return_status := FND_API.G_RET_STS_SUCCESS;
4731:
4732: EXCEPTION
4733: WHEN FND_API.G_EXC_ERROR THEN
4734: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4735: FND_MESSAGE.SET_NAME('AK','AK_FK_COLUMN_NOT_DELETED');
4736: FND_MESSAGE.SET_TOKEN('KEY',p_foreign_key_name ||
4737: ' ' || to_char(l_attribute_appl_id) ||
4737: ' ' || to_char(l_attribute_appl_id) ||
4738: ' ' || l_attribute_code);
4739: FND_MSG_PUB.Add;
4740: end if;
4741: p_return_status := FND_API.G_RET_STS_ERROR;
4742: rollback to start_delete_rel_foreign_col;
4743: FND_MSG_PUB.Count_And_Get (
4744: p_count => p_msg_count,
4745: p_data => p_msg_data);
4743: FND_MSG_PUB.Count_And_Get (
4744: p_count => p_msg_count,
4745: p_data => p_msg_data);
4746: WHEN OTHERS THEN
4747: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4748: -- dbms_output.put_line('Unexpected error:'||substr(SQLERRM,1,240));
4749: rollback to start_delete_rel_foreign_col;
4750: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4751: SUBSTR (SQLERRM, 1, 240) );
4775: -- Version Initial version number = 1.0
4776: -- History Current version number = 1.0
4777: --=======================================================
4778: procedure DELETE_RELATED_UNIQUE_KEY_COL (
4779: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
4780: p_api_version_number IN NUMBER,
4781: p_msg_count OUT NOCOPY NUMBER,
4782: p_msg_data OUT NOCOPY VARCHAR2,
4783: p_return_status OUT NOCOPY VARCHAR2,
4816: p_delete_cascade => 'N',
4817: p_override => 'Y'
4818: );
4819:
4820: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4821: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4822: l_attribute_code := csr_rec.attribute_code;
4823: l_attribute_appl_id := csr_rec.attribute_application_id;
4824: raise FND_API.G_EXC_ERROR;
4817: p_override => 'Y'
4818: );
4819:
4820: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4821: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4822: l_attribute_code := csr_rec.attribute_code;
4823: l_attribute_appl_id := csr_rec.attribute_application_id;
4824: raise FND_API.G_EXC_ERROR;
4825: end if;
4820: if (l_return_status = FND_API.G_RET_STS_ERROR) or
4821: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
4822: l_attribute_code := csr_rec.attribute_code;
4823: l_attribute_appl_id := csr_rec.attribute_application_id;
4824: raise FND_API.G_EXC_ERROR;
4825: end if;
4826: end loop;
4827:
4828: p_return_status := FND_API.G_RET_STS_SUCCESS;
4824: raise FND_API.G_EXC_ERROR;
4825: end if;
4826: end loop;
4827:
4828: p_return_status := FND_API.G_RET_STS_SUCCESS;
4829:
4830: EXCEPTION
4831: WHEN FND_API.G_EXC_ERROR THEN
4832: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4827:
4828: p_return_status := FND_API.G_RET_STS_SUCCESS;
4829:
4830: EXCEPTION
4831: WHEN FND_API.G_EXC_ERROR THEN
4832: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
4833: FND_MESSAGE.SET_NAME('AK','AK_UK_COLUMN_NOT_DELETED');
4834: FND_MESSAGE.SET_TOKEN('OBJECT', 'AK_UNIQUE_KEY_COLUMN',TRUE);
4835: FND_MESSAGE.SET_TOKEN('KEY',p_unique_key_name ||
4836: ' ' || to_char(l_attribute_appl_id) ||
4837: ' ' || l_attribute_code);
4838: FND_MSG_PUB.Add;
4839: end if;
4840: p_return_status := FND_API.G_RET_STS_ERROR;
4841: rollback to start_delete_rel_unique_col;
4842: FND_MSG_PUB.Count_And_Get (
4843: p_count => p_msg_count,
4844: p_data => p_msg_data);
4842: FND_MSG_PUB.Count_And_Get (
4843: p_count => p_msg_count,
4844: p_data => p_msg_data);
4845: WHEN OTHERS THEN
4846: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4847: rollback to start_delete_rel_unique_col;
4848: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
4849: SUBSTR (SQLERRM, 1, 240) );
4850: FND_MSG_PUB.Add;