41: -- Version Initial version number = 1.0
42: -- History Current version number = 1.0
43: --=======================================================
44: procedure DOWNLOAD_QUERY_OBJECT (
45: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
46: p_api_version_number IN NUMBER,
47: p_init_msg_tbl IN BOOLEAN := FALSE,
48: p_msg_count OUT NOCOPY NUMBER,
49: p_msg_data OUT NOCOPY VARCHAR2,
47: p_init_msg_tbl IN BOOLEAN := FALSE,
48: p_msg_count OUT NOCOPY NUMBER,
49: p_msg_data OUT NOCOPY VARCHAR2,
50: p_return_status OUT NOCOPY VARCHAR2,
51: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
53: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_queryobj_pk_tbl IN AK_QUERYOBJ_PUB.queryobj_PK_Tbl_Type :=
55: AK_QUERYOBJ_PUB.G_MISS_QUERYOBJ_PK_TBL
48: p_msg_count OUT NOCOPY NUMBER,
49: p_msg_data OUT NOCOPY VARCHAR2,
50: p_return_status OUT NOCOPY VARCHAR2,
51: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
53: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_queryobj_pk_tbl IN AK_QUERYOBJ_PUB.queryobj_PK_Tbl_Type :=
55: AK_QUERYOBJ_PUB.G_MISS_QUERYOBJ_PK_TBL
56: ) is
49: p_msg_data OUT NOCOPY VARCHAR2,
50: p_return_status OUT NOCOPY VARCHAR2,
51: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
52: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
53: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
54: p_queryobj_pk_tbl IN AK_QUERYOBJ_PUB.queryobj_PK_Tbl_Type :=
55: AK_QUERYOBJ_PUB.G_MISS_QUERYOBJ_PK_TBL
56: ) is
57: l_api_version_number CONSTANT number := 1.0;
64: begin
65: --
66: -- Check verion number
67: --
68: IF NOT FND_API.Compatible_API_Call (
69: l_api_version_number, p_api_version_number, l_api_name,
70: G_PKG_NAME) then
71: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: return;
67: --
68: IF NOT FND_API.Compatible_API_Call (
69: l_api_version_number, p_api_version_number, l_api_name,
70: G_PKG_NAME) then
71: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
72: return;
73: END IF;
74:
75: -- Initialize the message table if requested.
105:
106: --
107: -- If API call returns with an error status...
108: --
109: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
110: (l_return_status = FND_API.G_RET_STS_ERROR) then
111: RAISE FND_API.G_EXC_ERROR;
112: end if;
113:
106: --
107: -- If API call returns with an error status...
108: --
109: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
110: (l_return_status = FND_API.G_RET_STS_ERROR) then
111: RAISE FND_API.G_EXC_ERROR;
112: end if;
113:
114: --
107: -- If API call returns with an error status...
108: --
109: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
110: (l_return_status = FND_API.G_RET_STS_ERROR) then
111: RAISE FND_API.G_EXC_ERROR;
112: end if;
113:
114: --
115: -- - call the download procedure for attributes to retrieve the
130: --
131: -- If download call returns with an error status or
132: -- download failed to retrieve any information from the database..
133: --
134: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
135: (l_return_status = FND_API.G_RET_STS_ERROR) then
136: RAISE FND_API.G_EXC_ERROR;
137: end if;
138:
131: -- If download call returns with an error status or
132: -- download failed to retrieve any information from the database..
133: --
134: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
135: (l_return_status = FND_API.G_RET_STS_ERROR) then
136: RAISE FND_API.G_EXC_ERROR;
137: end if;
138:
139: p_return_status := FND_API.G_RET_STS_SUCCESS;
132: -- download failed to retrieve any information from the database..
133: --
134: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
135: (l_return_status = FND_API.G_RET_STS_ERROR) then
136: RAISE FND_API.G_EXC_ERROR;
137: end if;
138:
139: p_return_status := FND_API.G_RET_STS_SUCCESS;
140:
135: (l_return_status = FND_API.G_RET_STS_ERROR) then
136: RAISE FND_API.G_EXC_ERROR;
137: end if;
138:
139: p_return_status := FND_API.G_RET_STS_SUCCESS;
140:
141: FND_MSG_PUB.Count_And_Get (
142: p_count => p_msg_count,
143: p_data => p_msg_data);
142: p_count => p_msg_count,
143: p_data => p_msg_data);
144:
145: EXCEPTION
146: WHEN FND_API.G_EXC_ERROR THEN
147: p_return_status := FND_API.G_RET_STS_ERROR;
148: FND_MSG_PUB.Count_And_Get (
149: p_count => p_msg_count,
150: p_data => p_msg_data);
143: p_data => p_msg_data);
144:
145: EXCEPTION
146: WHEN FND_API.G_EXC_ERROR THEN
147: p_return_status := FND_API.G_RET_STS_ERROR;
148: FND_MSG_PUB.Count_And_Get (
149: p_count => p_msg_count,
150: p_data => p_msg_data);
151: WHEN OTHERS THEN
148: FND_MSG_PUB.Count_And_Get (
149: p_count => p_msg_count,
150: p_data => p_msg_data);
151: WHEN OTHERS THEN
152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
153: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
154: SUBSTR (SQLERRM, 1, 240) );
155: FND_MSG_PUB.Add;
156: FND_MSG_PUB.Count_And_Get (
177: -- Version Initial version number = 1.0
178: -- History Current version number = 1.0
179: --=======================================================
180: procedure CREATE_QUERY_OBJECT (
181: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
182: p_api_version_number IN NUMBER,
183: p_init_msg_tbl IN BOOLEAN := FALSE,
184: p_msg_count OUT NOCOPY NUMBER,
185: p_msg_data OUT NOCOPY VARCHAR2,
185: p_msg_data OUT NOCOPY VARCHAR2,
186: p_return_status OUT NOCOPY VARCHAR2,
187: p_query_code IN VARCHAR2,
188: p_application_id IN NUMBER,
189: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
190: p_creation_date IN DATE := FND_API.G_MISS_DATE,
191: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
192: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
193: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
186: p_return_status OUT NOCOPY VARCHAR2,
187: p_query_code IN VARCHAR2,
188: p_application_id IN NUMBER,
189: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
190: p_creation_date IN DATE := FND_API.G_MISS_DATE,
191: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
192: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
193: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
194: ) is
187: p_query_code IN VARCHAR2,
188: p_application_id IN NUMBER,
189: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
190: p_creation_date IN DATE := FND_API.G_MISS_DATE,
191: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
192: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
193: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
194: ) is
195: l_api_version_number CONSTANT number := 1.0;
188: p_application_id IN NUMBER,
189: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
190: p_creation_date IN DATE := FND_API.G_MISS_DATE,
191: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
192: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
193: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
194: ) is
195: l_api_version_number CONSTANT number := 1.0;
196: l_api_name CONSTANT varchar2(30) := 'Create_query_objects';
189: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
190: p_creation_date IN DATE := FND_API.G_MISS_DATE,
191: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
192: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
193: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
194: ) is
195: l_api_version_number CONSTANT number := 1.0;
196: l_api_name CONSTANT varchar2(30) := 'Create_query_objects';
197: l_return_status VARCHAR2(1);
196: l_api_name CONSTANT varchar2(30) := 'Create_query_objects';
197: l_return_status VARCHAR2(1);
198: begin
199: /* Check API version number */
200: IF NOT FND_API.Compatible_API_Call (
201: l_api_version_number, p_api_version_number, l_api_name,
202: G_PKG_NAME) then
203: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: return;
199: /* Check API version number */
200: IF NOT FND_API.Compatible_API_Call (
201: l_api_version_number, p_api_version_number, l_api_name,
202: G_PKG_NAME) then
203: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: return;
205: END IF;
206:
207: -- Initialize the message table if requested.
232:
233: --
234: -- If API call returns with an error status...
235: --
236: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
237: (l_return_status = FND_API.G_RET_STS_ERROR) then
238: RAISE FND_API.G_EXC_ERROR;
239: end if;
240:
233: --
234: -- If API call returns with an error status...
235: --
236: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
237: (l_return_status = FND_API.G_RET_STS_ERROR) then
238: RAISE FND_API.G_EXC_ERROR;
239: end if;
240:
241: p_return_status := FND_API.G_RET_STS_SUCCESS;
234: -- If API call returns with an error status...
235: --
236: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
237: (l_return_status = FND_API.G_RET_STS_ERROR) then
238: RAISE FND_API.G_EXC_ERROR;
239: end if;
240:
241: p_return_status := FND_API.G_RET_STS_SUCCESS;
242:
237: (l_return_status = FND_API.G_RET_STS_ERROR) then
238: RAISE FND_API.G_EXC_ERROR;
239: end if;
240:
241: p_return_status := FND_API.G_RET_STS_SUCCESS;
242:
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: p_return_status := FND_API.G_RET_STS_ERROR;
240:
241: p_return_status := FND_API.G_RET_STS_SUCCESS;
242:
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: p_return_status := FND_API.G_RET_STS_ERROR;
246: rollback to start_create_query_object;
247: WHEN OTHERS THEN
248: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
241: p_return_status := FND_API.G_RET_STS_SUCCESS;
242:
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: p_return_status := FND_API.G_RET_STS_ERROR;
246: rollback to start_create_query_object;
247: WHEN OTHERS THEN
248: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
249: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
244: WHEN FND_API.G_EXC_ERROR THEN
245: p_return_status := FND_API.G_RET_STS_ERROR;
246: rollback to start_create_query_object;
247: WHEN OTHERS THEN
248: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
249: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
250: SUBSTR (SQLERRM, 1, 240) );
251: FND_MSG_PUB.Add;
252: rollback to start_create_query_object;
270: -- Version Initial version number = 1.0
271: -- History Current version number = 1.0
272: --=======================================================
273: procedure CREATE_QUERY_OBJECT_LINE (
274: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
275: p_api_version_number IN NUMBER,
276: p_init_msg_tbl IN BOOLEAN := FALSE,
277: p_msg_count OUT NOCOPY NUMBER,
278: p_msg_data OUT NOCOPY VARCHAR2,
279: p_return_status OUT NOCOPY VARCHAR2,
280: p_query_code IN VARCHAR2,
281: p_seq_num IN NUMBER,
282: p_query_line_type IN VARCHAR2,
283: p_query_line IN VARCHAR2 := FND_API.G_MISS_CHAR,
284: p_linked_parameter IN VARCHAR2,
285: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
286: p_creation_date IN DATE := FND_API.G_MISS_DATE,
287: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
281: p_seq_num IN NUMBER,
282: p_query_line_type IN VARCHAR2,
283: p_query_line IN VARCHAR2 := FND_API.G_MISS_CHAR,
284: p_linked_parameter IN VARCHAR2,
285: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
286: p_creation_date IN DATE := FND_API.G_MISS_DATE,
287: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
288: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
289: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
282: p_query_line_type IN VARCHAR2,
283: p_query_line IN VARCHAR2 := FND_API.G_MISS_CHAR,
284: p_linked_parameter IN VARCHAR2,
285: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
286: p_creation_date IN DATE := FND_API.G_MISS_DATE,
287: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
288: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
289: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
290: ) is
283: p_query_line IN VARCHAR2 := FND_API.G_MISS_CHAR,
284: p_linked_parameter IN VARCHAR2,
285: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
286: p_creation_date IN DATE := FND_API.G_MISS_DATE,
287: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
288: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
289: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
290: ) is
291: l_api_version_number CONSTANT number := 1.0;
284: p_linked_parameter IN VARCHAR2,
285: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
286: p_creation_date IN DATE := FND_API.G_MISS_DATE,
287: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
288: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
289: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
290: ) is
291: l_api_version_number CONSTANT number := 1.0;
292: l_api_name CONSTANT varchar2(30) := 'Create_Query_Object_Line';
285: p_created_by IN NUMBER := FND_API.G_MISS_NUM,
286: p_creation_date IN DATE := FND_API.G_MISS_DATE,
287: p_last_updated_by IN NUMBER := FND_API.G_MISS_NUM,
288: p_last_update_date IN DATE := FND_API.G_MISS_DATE,
289: p_last_update_login IN NUMBER := FND_API.G_MISS_NUM
290: ) is
291: l_api_version_number CONSTANT number := 1.0;
292: l_api_name CONSTANT varchar2(30) := 'Create_Query_Object_Line';
293: l_return_status VARCHAR2(1);
292: l_api_name CONSTANT varchar2(30) := 'Create_Query_Object_Line';
293: l_return_status VARCHAR2(1);
294: begin
295: /* Check API version number */
296: IF NOT FND_API.Compatible_API_Call (
297: l_api_version_number, p_api_version_number, l_api_name,
298: G_PKG_NAME) then
299: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
300: return;
295: /* Check API version number */
296: IF NOT FND_API.Compatible_API_Call (
297: l_api_version_number, p_api_version_number, l_api_name,
298: G_PKG_NAME) then
299: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
300: return;
301: END IF;
302:
303: -- Initialize the message table if requested.
330:
331: --
332: -- If API call returns with an error status...
333: --
334: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
335: (l_return_status = FND_API.G_RET_STS_ERROR) then
336: RAISE FND_API.G_EXC_ERROR;
337: end if;
338:
331: --
332: -- If API call returns with an error status...
333: --
334: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
335: (l_return_status = FND_API.G_RET_STS_ERROR) then
336: RAISE FND_API.G_EXC_ERROR;
337: end if;
338:
339: p_return_status := FND_API.G_RET_STS_SUCCESS;
332: -- If API call returns with an error status...
333: --
334: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
335: (l_return_status = FND_API.G_RET_STS_ERROR) then
336: RAISE FND_API.G_EXC_ERROR;
337: end if;
338:
339: p_return_status := FND_API.G_RET_STS_SUCCESS;
340:
335: (l_return_status = FND_API.G_RET_STS_ERROR) then
336: RAISE FND_API.G_EXC_ERROR;
337: end if;
338:
339: p_return_status := FND_API.G_RET_STS_SUCCESS;
340:
341: EXCEPTION
342: WHEN FND_API.G_EXC_ERROR THEN
343: p_return_status := FND_API.G_RET_STS_ERROR;
338:
339: p_return_status := FND_API.G_RET_STS_SUCCESS;
340:
341: EXCEPTION
342: WHEN FND_API.G_EXC_ERROR THEN
343: p_return_status := FND_API.G_RET_STS_ERROR;
344: rollback to start_create_query_object_line;
345: WHEN OTHERS THEN
346: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
339: p_return_status := FND_API.G_RET_STS_SUCCESS;
340:
341: EXCEPTION
342: WHEN FND_API.G_EXC_ERROR THEN
343: p_return_status := FND_API.G_RET_STS_ERROR;
344: rollback to start_create_query_object_line;
345: WHEN OTHERS THEN
346: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
347: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
342: WHEN FND_API.G_EXC_ERROR THEN
343: p_return_status := FND_API.G_RET_STS_ERROR;
344: rollback to start_create_query_object_line;
345: WHEN OTHERS THEN
346: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
347: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
348: SUBSTR (SQLERRM, 1, 240) );
349: FND_MSG_PUB.Add;
350: rollback to start_create_query_object_line;