APPS.AK_ON_OBJECTS_PVT dependencies on FND_API

Line 133: p_return_status := FND_API.G_RET_STS_SUCCESS;

129: --
130: -- Return if from table is empty
131: --
132: if (p_from_table.count = 0) then
133: p_return_status := FND_API.G_RET_STS_SUCCESS;
134: return;
135: end if;
136:
137: l_to_index := nvl(p_to_table.LAST, 0) + 1;

Line 146: p_return_status := FND_API.G_RET_STS_SUCCESS;

142: l_to_index := l_to_index + 1;
143: end if;
144: end loop;
145:
146: p_return_status := FND_API.G_RET_STS_SUCCESS;
147:
148: EXCEPTION
149: WHEN FND_API.G_EXC_ERROR THEN
150: p_return_status := FND_API.G_RET_STS_ERROR;

Line 149: WHEN FND_API.G_EXC_ERROR THEN

145:
146: p_return_status := FND_API.G_RET_STS_SUCCESS;
147:
148: EXCEPTION
149: WHEN FND_API.G_EXC_ERROR THEN
150: p_return_status := FND_API.G_RET_STS_ERROR;
151: WHEN OTHERS THEN
152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
153: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 150: p_return_status := FND_API.G_RET_STS_ERROR;

146: p_return_status := FND_API.G_RET_STS_SUCCESS;
147:
148: EXCEPTION
149: WHEN FND_API.G_EXC_ERROR THEN
150: p_return_status := FND_API.G_RET_STS_ERROR;
151: WHEN OTHERS THEN
152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
153: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
154: SUBSTR (SQLERRM, 1, 240) );

Line 152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

148: EXCEPTION
149: WHEN FND_API.G_EXC_ERROR THEN
150: p_return_status := FND_API.G_RET_STS_ERROR;
151: WHEN OTHERS THEN
152: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
153: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
154: SUBSTR (SQLERRM, 1, 240) );
155: end APPEND_BUFFER_TABLES;
156:

Line 217: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

213: -- p_application_id are not given, the p_application_id_out
214: -- will be null.
215: --==============================================
216: procedure DOWNLOAD_HEADER (
217: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
218: p_api_version_number IN NUMBER,
219: p_return_status OUT NOCOPY VARCHAR2,
220: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
221: p_application_id IN NUMBER := FND_API.G_MISS_NUM,

Line 220: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,

216: procedure DOWNLOAD_HEADER (
217: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
218: p_api_version_number IN NUMBER,
219: p_return_status OUT NOCOPY VARCHAR2,
220: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
221: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
222: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
223: p_table_size IN NUMBER,
224: p_download_by_object IN VARCHAR2,

Line 221: p_application_id IN NUMBER := FND_API.G_MISS_NUM,

217: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
218: p_api_version_number IN NUMBER,
219: p_return_status OUT NOCOPY VARCHAR2,
220: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
221: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
222: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
223: p_table_size IN NUMBER,
224: p_download_by_object IN VARCHAR2,
225: p_nls_language_out OUT NOCOPY VARCHAR2,

Line 222: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,

218: p_api_version_number IN NUMBER,
219: p_return_status OUT NOCOPY VARCHAR2,
220: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
221: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
222: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
223: p_table_size IN NUMBER,
224: p_download_by_object IN VARCHAR2,
225: p_nls_language_out OUT NOCOPY VARCHAR2,
226: p_application_id_out OUT NOCOPY NUMBER

Line 245: IF NOT FND_API.Compatible_API_Call (

241: begin
242: --
243: -- Check verion number
244: --
245: IF NOT FND_API.Compatible_API_Call (
246: l_api_version_number, p_api_version_number, l_api_name,
247: G_PKG_NAME) then
248: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
249: return;

Line 248: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

244: --
245: IF NOT FND_API.Compatible_API_Call (
246: l_api_version_number, p_api_version_number, l_api_name,
247: G_PKG_NAME) then
248: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
249: return;
250: END IF;
251:
252: --

Line 258: if ((p_application_short_name = FND_API.G_MISS_CHAR) or

254: -- a list of attributes/regions/objects/flows to be extracted from
255: -- the database must be provided
256: --
257:
258: if ((p_application_short_name = FND_API.G_MISS_CHAR) or
259: (p_application_short_name is null)) and
260: ((p_application_id = FND_API.G_MISS_NUM) or
261: (p_application_id is null)) and
262: (p_table_size = 0) then

Line 260: ((p_application_id = FND_API.G_MISS_NUM) or

256: --
257:
258: if ((p_application_short_name = FND_API.G_MISS_CHAR) or
259: (p_application_short_name is null)) and
260: ((p_application_id = FND_API.G_MISS_NUM) or
261: (p_application_id is null)) and
262: (p_table_size = 0) then
263: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
264: FND_MESSAGE.SET_NAME('AK','AK_NO_SELECTION');

Line 267: raise FND_API.G_EXC_ERROR;

263: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
264: FND_MESSAGE.SET_NAME('AK','AK_NO_SELECTION');
265: FND_MSG_PUB.Add;
266: end if;
267: raise FND_API.G_EXC_ERROR;
268: end if;
269:
270: --
271: -- - Load l_application_id

Line 277: if (p_application_short_name <> FND_API.G_MISS_CHAR) then

273: -- given, find the application ID from the application short name
274: --
275: l_application_id := p_application_id;
276:
277: if (p_application_short_name <> FND_API.G_MISS_CHAR) then
278:
279: -- /** Since we pass appl short name only from Java wrapper, this
280: -- meesage is not necessary **/
281: --if (p_application_id <> FND_API.G_MISS_NUM) then

Line 281: --if (p_application_id <> FND_API.G_MISS_NUM) then

277: if (p_application_short_name <> FND_API.G_MISS_CHAR) then
278:
279: -- /** Since we pass appl short name only from Java wrapper, this
280: -- meesage is not necessary **/
281: --if (p_application_id <> FND_API.G_MISS_NUM) then
282: --if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
283: -- FND_MESSAGE.SET_NAME('AK','AK_APPL_SHORT_NAME_IGNORED');
284: -- FND_MSG_PUB.Add;
285: --end if;

Line 288: if (p_application_id = FND_API.G_MISS_NUM) then

284: -- FND_MSG_PUB.Add;
285: --end if;
286: --else
287: -- /***********************************************/
288: if (p_application_id = FND_API.G_MISS_NUM) then
289: open l_get_appl_id_csr(p_application_short_name);
290: fetch l_get_appl_id_csr into l_application_id;
291: if (l_get_appl_id_csr%notfound) then
292: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 298: raise FND_API.G_EXC_ERROR;

294: FND_MESSAGE.SET_TOKEN('APPL_SHORT_NAME', p_application_short_name);
295: FND_MSG_PUB.Add;
296: end if;
297: close l_get_appl_id_csr;
298: raise FND_API.G_EXC_ERROR;
299: end if;
300: close l_get_appl_id_csr;
301: end if;
302: end if;

Line 307: if ((p_nls_language = FND_API.G_MISS_CHAR) or

303:
304: --
305: -- If no LANGUAGE CODE is given, use the default language code
306: --
307: if ((p_nls_language = FND_API.G_MISS_CHAR) or
308: (p_nls_language is null)) then
309:
310: select userenv('LANG') into l_nls_language
311: from dual;

Line 2012: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2008: p_return_status => l_return_status,
2009: p_buffer_tbl => l_header_tbl,
2010: p_write_mode => AK_ON_OBJECTS_PUB.G_OVERWRITE
2011: );
2012: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2013: (l_return_status = FND_API.G_RET_STS_ERROR) then
2014: --dbms_output.put_line(G_PKG_NAME || ': first write_File failed');
2015: RAISE FND_API.G_EXC_ERROR;
2016: end if;

Line 2013: (l_return_status = FND_API.G_RET_STS_ERROR) then

2009: p_buffer_tbl => l_header_tbl,
2010: p_write_mode => AK_ON_OBJECTS_PUB.G_OVERWRITE
2011: );
2012: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2013: (l_return_status = FND_API.G_RET_STS_ERROR) then
2014: --dbms_output.put_line(G_PKG_NAME || ': first write_File failed');
2015: RAISE FND_API.G_EXC_ERROR;
2016: end if;
2017:

Line 2015: RAISE FND_API.G_EXC_ERROR;

2011: );
2012: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2013: (l_return_status = FND_API.G_RET_STS_ERROR) then
2014: --dbms_output.put_line(G_PKG_NAME || ': first write_File failed');
2015: RAISE FND_API.G_EXC_ERROR;
2016: end if;
2017:
2018: --
2019: -- Load output parameters and set return status to success

Line 2023: p_return_status := FND_API.G_RET_STS_SUCCESS;

2019: -- Load output parameters and set return status to success
2020: --
2021: p_nls_language_out := l_nls_language;
2022: p_application_id_out := l_application_id;
2023: p_return_status := FND_API.G_RET_STS_SUCCESS;
2024:
2025: EXCEPTION
2026: WHEN FND_API.G_EXC_ERROR THEN
2027: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 2026: WHEN FND_API.G_EXC_ERROR THEN

2022: p_application_id_out := l_application_id;
2023: p_return_status := FND_API.G_RET_STS_SUCCESS;
2024:
2025: EXCEPTION
2026: WHEN FND_API.G_EXC_ERROR THEN
2027: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2028: FND_MESSAGE.SET_NAME('AK','AK_HEADER_DOWNLOAD_ERROR');
2029: FND_MSG_PUB.Add;
2030: end if;

Line 2031: p_return_status := FND_API.G_RET_STS_ERROR;

2027: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2028: FND_MESSAGE.SET_NAME('AK','AK_HEADER_DOWNLOAD_ERROR');
2029: FND_MSG_PUB.Add;
2030: end if;
2031: p_return_status := FND_API.G_RET_STS_ERROR;
2032: WHEN OTHERS THEN
2033: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2034: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2035: SUBSTR (SQLERRM, 1, 240) );

Line 2033: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2029: FND_MSG_PUB.Add;
2030: end if;
2031: p_return_status := FND_API.G_RET_STS_ERROR;
2032: WHEN OTHERS THEN
2033: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2034: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2035: SUBSTR (SQLERRM, 1, 240) );
2036: end DOWNLOAD_HEADER;
2037:

Line 2061: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2057: -- * Success
2058: -- Parameters
2059: --==============================================
2060: procedure UPLOAD (
2061: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2062: p_api_version_number IN NUMBER,
2063: p_init_msg_tbl IN BOOLEAN := FALSE,
2064: p_msg_count OUT NOCOPY NUMBER,
2065: p_msg_data OUT NOCOPY VARCHAR2,

Line 2094: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2090: l_timestamp DATE := sysdate;
2091: l_token AK_ON_OBJECTS_PUB.Buffer_Type;
2092: l_tbl_index NUMBER;
2093: l_file_version NUMBER;
2094: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2095: l_not_compatible_version BOOLEAN := TRUE;
2096: i NUMBER;
2097: begin
2098: IF NOT FND_API.Compatible_API_Call (

Line 2098: IF NOT FND_API.Compatible_API_Call (

2094: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2095: l_not_compatible_version BOOLEAN := TRUE;
2096: i NUMBER;
2097: begin
2098: IF NOT FND_API.Compatible_API_Call (
2099: l_api_version_number, p_api_version_number, l_api_name,
2100: G_PKG_NAME) then
2101: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2102: return;

Line 2101: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2097: begin
2098: IF NOT FND_API.Compatible_API_Call (
2099: l_api_version_number, p_api_version_number, l_api_name,
2100: G_PKG_NAME) then
2101: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2102: return;
2103: END IF;
2104:
2105: -- Initialize the message table if requested.

Line 2153: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2149: p_eof_flag => l_eof_flag,
2150: p_upl_loader_cur => l_upl_loader_cur
2151: );
2152:
2153: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2154: (l_return_status = FND_API.G_RET_STS_ERROR) then
2155: RAISE FND_API.G_EXC_ERROR;
2156: end if;
2157: l_line_num := l_line_num + l_lines_read;

Line 2154: (l_return_status = FND_API.G_RET_STS_ERROR) then

2150: p_upl_loader_cur => l_upl_loader_cur
2151: );
2152:
2153: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2154: (l_return_status = FND_API.G_RET_STS_ERROR) then
2155: RAISE FND_API.G_EXC_ERROR;
2156: end if;
2157: l_line_num := l_line_num + l_lines_read;
2158:

Line 2155: RAISE FND_API.G_EXC_ERROR;

2151: );
2152:
2153: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2154: (l_return_status = FND_API.G_RET_STS_ERROR) then
2155: RAISE FND_API.G_EXC_ERROR;
2156: end if;
2157: l_line_num := l_line_num + l_lines_read;
2158:
2159: --

Line 2187: RAISE FND_API.G_EXC_ERROR;

2183: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2184: FND_MESSAGE.SET_NAME('AK','AK_EMPTY_FILE');
2185: FND_MSG_PUB.Add;
2186: end if;
2187: RAISE FND_API.G_EXC_ERROR;
2188: end if;
2189:
2190: --
2191: -- Parse the buffer read to obtain header information such as

Line 2205: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2201: p_in_buf => l_buffer,
2202: p_token => l_token
2203: );
2204:
2205: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2206: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2207: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2208: FND_MESSAGE.SET_NAME('AK','AK_GET_TOKEN_ERROR');
2209: FND_MSG_PUB.Add;

Line 2206: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2202: p_token => l_token
2203: );
2204:
2205: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2206: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2207: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2208: FND_MESSAGE.SET_NAME('AK','AK_GET_TOKEN_ERROR');
2209: FND_MSG_PUB.Add;
2210: end if;

Line 2211: raise FND_API.G_EXC_ERROR;

2207: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2208: FND_MESSAGE.SET_NAME('AK','AK_GET_TOKEN_ERROR');
2209: FND_MSG_PUB.Add;
2210: end if;
2211: raise FND_API.G_EXC_ERROR;
2212: end if;
2213: --dbms_output.put_line(' State:' || l_state || 'Token:' || l_token);
2214:
2215: --

Line 2229: raise FND_API.G_EXC_ERROR;

2225: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2226: FND_MESSAGE.SET_NAME('AK','AK_HEADER_INFO_MISSING');
2227: FND_MSG_PUB.Add;
2228: end if;
2229: raise FND_API.G_EXC_ERROR;
2230: else
2231: -- dbms_output.put_line('l_language is ' || l_language);
2232: -- dbms_output.put_line('l_extract_by_obj is ' || l_extract_by_obj);
2233: l_state := 3;

Line 2251: raise FND_API.G_EXC_ERROR;

2247: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN, LANGUAGE, CODESET, ' ||
2248: 'EXTRACT_BY_OBJECT, EXTRACT_BY_APPLICATION');
2249: FND_MSG_PUB.Add;
2250: end if;
2251: raise FND_API.G_EXC_ERROR;
2252: end if; -- endif of (l_token = 'BEGIN')
2253: elsif (l_state = 1) then
2254: if (l_token = '=') then
2255: l_state := 2;

Line 2265: raise FND_API.G_EXC_ERROR;

2261: FND_MESSAGE.SET_TOKEN('EXPECTED','=');
2262: FND_MSG_PUB.Add;
2263: end if;
2264: --dbms_output.put_line('Expecting =');
2265: raise FND_API.G_EXC_ERROR;
2266: end if;
2267: elsif (l_state = 2) then
2268: if (l_column = 'LANGUAGE') then
2269: l_language := UPPER(l_token);

Line 2284: raise FND_API.G_EXC_ERROR;

2280: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
2281: FND_MESSAGE.SET_TOKEN('COLUMN','EXTRACT_BY_OBJECT');
2282: FND_MSG_PUB.Add;
2283: end if;
2284: raise FND_API.G_EXC_ERROR;
2285: else
2286: l_extract_by_obj := UPPER(l_token);
2287: AK_UPLOAD_GRP.G_EXTRACT_OBJ := l_extract_by_obj;
2288: end if;

Line 2311: raise FND_API.G_EXC_ERROR;

2307: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2308: FND_MESSAGE.SET_NAME('AK','AK_WRONG_FILE_VERSION');
2309: FND_MSG_PUB.Add;
2310: end if;
2311: raise FND_API.G_EXC_ERROR;
2312: end if; -- end if l_file_version
2313: else
2314: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2315: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR_VALUE');

Line 2322: raise FND_API.G_EXC_ERROR;

2318: FND_MESSAGE.SET_TOKEN('EXPECTED',l_column);
2319: FND_MSG_PUB.Add;
2320: end if;
2321: -- dbms_output.put_line('Expecting ' || l_column || ' value');
2322: raise FND_API.G_EXC_ERROR;
2323: end if;
2324: l_state := 0;
2325: elsif (l_state = 4) then
2326: if (l_token = 'BEGIN') then

Line 2337: raise FND_API.G_EXC_ERROR;

2333: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN');
2334: FND_MSG_PUB.Add;
2335: end if;
2336: -- dbms_output.put_line('Expecting BEGIN');
2337: raise FND_API.G_EXC_ERROR;
2338: end if;
2339: elsif (l_state = 3) or (l_state = 5) then
2340: if (l_token = 'ATTRIBUTE') then
2341: -- call ak_attribute_pvt.upload --

Line 2379: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2375: );
2376: l_buffer := l_buffer2;
2377: l_line_num := l_line_num2;
2378:
2379: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2380: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2381: raise FND_API.G_EXC_ERROR;
2382: else
2383: -- commit the changes from uploading attribute

Line 2380: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2376: l_buffer := l_buffer2;
2377: l_line_num := l_line_num2;
2378:
2379: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2380: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2381: raise FND_API.G_EXC_ERROR;
2382: else
2383: -- commit the changes from uploading attribute
2384: commit;

Line 2381: raise FND_API.G_EXC_ERROR;

2377: l_line_num := l_line_num2;
2378:
2379: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2380: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2381: raise FND_API.G_EXC_ERROR;
2382: else
2383: -- commit the changes from uploading attribute
2384: commit;
2385: end if;

Line 2436: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2432: );
2433: l_buffer := l_buffer2;
2434: l_line_num := l_line_num2;
2435: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2436: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2437: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2438: raise FND_API.G_EXC_ERROR;
2439: else
2440: -- commit the changes from uploading object

Line 2437: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2433: l_buffer := l_buffer2;
2434: l_line_num := l_line_num2;
2435: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2436: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2437: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2438: raise FND_API.G_EXC_ERROR;
2439: else
2440: -- commit the changes from uploading object
2441: commit;

Line 2438: raise FND_API.G_EXC_ERROR;

2434: l_line_num := l_line_num2;
2435: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2436: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2437: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2438: raise FND_API.G_EXC_ERROR;
2439: else
2440: -- commit the changes from uploading object
2441: commit;
2442: end if;

Line 2476: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2472: );
2473: l_buffer := l_buffer2;
2474: l_line_num := l_line_num2;
2475: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2476: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2477: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2478: raise FND_API.G_EXC_ERROR;
2479: else
2480: -- commit the changes from uploading region

Line 2477: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2473: l_buffer := l_buffer2;
2474: l_line_num := l_line_num2;
2475: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2476: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2477: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2478: raise FND_API.G_EXC_ERROR;
2479: else
2480: -- commit the changes from uploading region
2481: commit;

Line 2478: raise FND_API.G_EXC_ERROR;

2474: l_line_num := l_line_num2;
2475: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2476: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2477: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2478: raise FND_API.G_EXC_ERROR;
2479: else
2480: -- commit the changes from uploading region
2481: commit;
2482: end if;

Line 2514: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2510: p_pass => l_index
2511: );
2512: l_buffer := l_buffer2;
2513: l_line_num := l_line_num2;
2514: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2515: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2516: raise FND_API.G_EXC_ERROR;
2517: else
2518: -- commit the changes from uploading customization

Line 2515: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2511: );
2512: l_buffer := l_buffer2;
2513: l_line_num := l_line_num2;
2514: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2515: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2516: raise FND_API.G_EXC_ERROR;
2517: else
2518: -- commit the changes from uploading customization
2519: commit;

Line 2516: raise FND_API.G_EXC_ERROR;

2512: l_buffer := l_buffer2;
2513: l_line_num := l_line_num2;
2514: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2515: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2516: raise FND_API.G_EXC_ERROR;
2517: else
2518: -- commit the changes from uploading customization
2519: commit;
2520: end if;

Line 2556: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2552: l_buffer := l_buffer2;
2553: l_line_num := l_line_num2;
2554: -- dbms_output.put_line('Returning from flow upload: '||
2555: -- to_char(sysdate, 'MON-DD HH24:MI:SS')||' status: '||l_return_status);
2556: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2557: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2558: raise FND_API.G_EXC_ERROR;
2559: else
2560: -- commit the changes from uploading flow

Line 2557: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2553: l_line_num := l_line_num2;
2554: -- dbms_output.put_line('Returning from flow upload: '||
2555: -- to_char(sysdate, 'MON-DD HH24:MI:SS')||' status: '||l_return_status);
2556: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2557: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2558: raise FND_API.G_EXC_ERROR;
2559: else
2560: -- commit the changes from uploading flow
2561: commit;

Line 2558: raise FND_API.G_EXC_ERROR;

2554: -- dbms_output.put_line('Returning from flow upload: '||
2555: -- to_char(sysdate, 'MON-DD HH24:MI:SS')||' status: '||l_return_status);
2556: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2557: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2558: raise FND_API.G_EXC_ERROR;
2559: else
2560: -- commit the changes from uploading flow
2561: commit;
2562: end if;

Line 2593: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2589: p_upl_loader_cur => l_upl_loader_cur
2590: );
2591: l_buffer := l_buffer2;
2592: l_line_num := l_line_num2;
2593: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2594: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2595: raise FND_API.G_EXC_ERROR;
2596: else
2597: -- commit the changes from uploading security

Line 2594: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2590: );
2591: l_buffer := l_buffer2;
2592: l_line_num := l_line_num2;
2593: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2594: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2595: raise FND_API.G_EXC_ERROR;
2596: else
2597: -- commit the changes from uploading security
2598: commit;

Line 2595: raise FND_API.G_EXC_ERROR;

2591: l_buffer := l_buffer2;
2592: l_line_num := l_line_num2;
2593: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2594: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2595: raise FND_API.G_EXC_ERROR;
2596: else
2597: -- commit the changes from uploading security
2598: commit;
2599: end if;

Line 2629: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2625: );
2626: l_buffer := l_buffer2;
2627: l_line_num := l_line_num2;
2628: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2629: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2630: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2631: raise FND_API.G_EXC_ERROR;
2632: else
2633: -- commit the changes from uploading query object

Line 2630: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2626: l_buffer := l_buffer2;
2627: l_line_num := l_line_num2;
2628: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2629: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2630: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2631: raise FND_API.G_EXC_ERROR;
2632: else
2633: -- commit the changes from uploading query object
2634: commit;

Line 2631: raise FND_API.G_EXC_ERROR;

2627: l_line_num := l_line_num2;
2628: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2629: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2630: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2631: raise FND_API.G_EXC_ERROR;
2632: else
2633: -- commit the changes from uploading query object
2634: commit;
2635: end if;

Line 2664: if (l_return_status = FND_API.G_RET_STS_ERROR) or

2660: );
2661: l_buffer := l_buffer2;
2662: l_line_num := l_line_num2;
2663: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2664: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2665: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2666: raise FND_API.G_EXC_ERROR;
2667: else
2668: -- commit the changes from uploading amparam_registry

Line 2665: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2661: l_buffer := l_buffer2;
2662: l_line_num := l_line_num2;
2663: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2664: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2665: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2666: raise FND_API.G_EXC_ERROR;
2667: else
2668: -- commit the changes from uploading amparam_registry
2669: commit;

Line 2666: raise FND_API.G_EXC_ERROR;

2662: l_line_num := l_line_num2;
2663: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2664: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2665: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2666: raise FND_API.G_EXC_ERROR;
2667: else
2668: -- commit the changes from uploading amparam_registry
2669: commit;
2670: end if;

Line 2683: raise FND_API.G_EXC_ERROR;

2679: FND_MESSAGE.SET_TOKEN('EXPECTED','ATTRIBUTE, OBJECT, REGION,
2680: FLOW, EXCLUDED_ITEMS, RESP_SECURITY_ATTRIBUTES OR QUERY_OBJECT');
2681: FND_MSG_PUB.Add;
2682: end if;
2683: raise FND_API.G_EXC_ERROR;
2684: end if;
2685: l_state := 4;
2686: -- l_buffer := ''; /* clears buffer so a different line will be read */
2687: elsif (l_state = 10) then

Line 2704: raise FND_API.G_EXC_ERROR;

2700: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2701: FND_MESSAGE.SET_TOKEN('EXPECTED', 'END ' || l_object_name);
2702: FND_MSG_PUB.Add;
2703: end if;
2704: raise FND_API.G_EXC_ERROR;
2705: end if;
2706: elsif (l_state = 12) then
2707: if (l_token = l_object_name) then
2708: l_state := 0;

Line 2733: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2729: p_lines_read => l_lines_read,
2730: p_eof_flag => l_eof_flag,
2731: p_upl_loader_cur => l_upl_loader_cur
2732: );
2733: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2734: (l_return_status = FND_API.G_RET_STS_ERROR) then
2735: RAISE FND_API.G_EXC_ERROR;
2736: end if;
2737: l_line_num := l_line_num + l_lines_read;

Line 2734: (l_return_status = FND_API.G_RET_STS_ERROR) then

2730: p_eof_flag => l_eof_flag,
2731: p_upl_loader_cur => l_upl_loader_cur
2732: );
2733: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2734: (l_return_status = FND_API.G_RET_STS_ERROR) then
2735: RAISE FND_API.G_EXC_ERROR;
2736: end if;
2737: l_line_num := l_line_num + l_lines_read;
2738: --

Line 2735: RAISE FND_API.G_EXC_ERROR;

2731: p_upl_loader_cur => l_upl_loader_cur
2732: );
2733: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2734: (l_return_status = FND_API.G_RET_STS_ERROR) then
2735: RAISE FND_API.G_EXC_ERROR;
2736: end if;
2737: l_line_num := l_line_num + l_lines_read;
2738: --
2739: -- trim leading spaces and discard comment lines

Line 2776: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2772: p_loader_timestamp => l_timestamp,
2773: p_pass => l_index
2774: );
2775: -- If API call returns with an error status, upload aborts
2776: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2777: (l_return_status = FND_API.G_RET_STS_ERROR) then
2778: RAISE FND_API.G_EXC_ERROR;
2779: end if; -- /* if l_return_status */
2780:

Line 2777: (l_return_status = FND_API.G_RET_STS_ERROR) then

2773: p_pass => l_index
2774: );
2775: -- If API call returns with an error status, upload aborts
2776: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2777: (l_return_status = FND_API.G_RET_STS_ERROR) then
2778: RAISE FND_API.G_EXC_ERROR;
2779: end if; -- /* if l_return_status */
2780:
2781: AK_OBJECT2_PVT.UPLOAD_OBJECT_SECOND (

Line 2778: RAISE FND_API.G_EXC_ERROR;

2774: );
2775: -- If API call returns with an error status, upload aborts
2776: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2777: (l_return_status = FND_API.G_RET_STS_ERROR) then
2778: RAISE FND_API.G_EXC_ERROR;
2779: end if; -- /* if l_return_status */
2780:
2781: AK_OBJECT2_PVT.UPLOAD_OBJECT_SECOND (
2782: p_validation_level => p_validation_level,

Line 2788: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2784: p_loader_timestamp => l_timestamp,
2785: p_pass => l_index
2786: );
2787: -- If API call returns with an error status, upload aborts
2788: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2789: (l_return_status = FND_API.G_RET_STS_ERROR) then
2790: RAISE FND_API.G_EXC_ERROR;
2791: end if; -- /* if l_return_status */
2792:

Line 2789: (l_return_status = FND_API.G_RET_STS_ERROR) then

2785: p_pass => l_index
2786: );
2787: -- If API call returns with an error status, upload aborts
2788: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2789: (l_return_status = FND_API.G_RET_STS_ERROR) then
2790: RAISE FND_API.G_EXC_ERROR;
2791: end if; -- /* if l_return_status */
2792:
2793: AK_REGION2_PVT.UPLOAD_REGION_SECOND (

Line 2790: RAISE FND_API.G_EXC_ERROR;

2786: );
2787: -- If API call returns with an error status, upload aborts
2788: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2789: (l_return_status = FND_API.G_RET_STS_ERROR) then
2790: RAISE FND_API.G_EXC_ERROR;
2791: end if; -- /* if l_return_status */
2792:
2793: AK_REGION2_PVT.UPLOAD_REGION_SECOND (
2794: p_validation_level => p_validation_level,

Line 2800: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2796: p_loader_timestamp => l_timestamp,
2797: p_pass => l_index
2798: );
2799: -- If API call returns with an error status, upload aborts
2800: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2801: (l_return_status = FND_API.G_RET_STS_ERROR) then
2802: RAISE FND_API.G_EXC_ERROR;
2803: end if; -- /* if l_return_status */
2804:

Line 2801: (l_return_status = FND_API.G_RET_STS_ERROR) then

2797: p_pass => l_index
2798: );
2799: -- If API call returns with an error status, upload aborts
2800: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2801: (l_return_status = FND_API.G_RET_STS_ERROR) then
2802: RAISE FND_API.G_EXC_ERROR;
2803: end if; -- /* if l_return_status */
2804:
2805: AK_CUSTOM2_PVT.UPLOAD_CUSTOM_SECOND (

Line 2802: RAISE FND_API.G_EXC_ERROR;

2798: );
2799: -- If API call returns with an error status, upload aborts
2800: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2801: (l_return_status = FND_API.G_RET_STS_ERROR) then
2802: RAISE FND_API.G_EXC_ERROR;
2803: end if; -- /* if l_return_status */
2804:
2805: AK_CUSTOM2_PVT.UPLOAD_CUSTOM_SECOND (
2806: p_validation_level => p_validation_level,

Line 2812: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2808: p_loader_timestamp => l_timestamp,
2809: p_pass => l_index
2810: );
2811: -- If API call returns with an error status, upload aborts
2812: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2813: (l_return_status = FND_API.G_RET_STS_ERROR) then
2814: RAISE FND_API.G_EXC_ERROR;
2815: end if; -- /* if l_return_status */
2816:

Line 2813: (l_return_status = FND_API.G_RET_STS_ERROR) then

2809: p_pass => l_index
2810: );
2811: -- If API call returns with an error status, upload aborts
2812: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2813: (l_return_status = FND_API.G_RET_STS_ERROR) then
2814: RAISE FND_API.G_EXC_ERROR;
2815: end if; -- /* if l_return_status */
2816:
2817: AK_FLOW2_PVT.UPLOAD_FLOW_SECOND (

Line 2814: RAISE FND_API.G_EXC_ERROR;

2810: );
2811: -- If API call returns with an error status, upload aborts
2812: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2813: (l_return_status = FND_API.G_RET_STS_ERROR) then
2814: RAISE FND_API.G_EXC_ERROR;
2815: end if; -- /* if l_return_status */
2816:
2817: AK_FLOW2_PVT.UPLOAD_FLOW_SECOND (
2818: p_validation_level => p_validation_level,

Line 2824: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or

2820: p_loader_timestamp => l_timestamp,
2821: p_pass => l_index
2822: );
2823: -- If API call returns with an error status, upload aborts
2824: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2825: (l_return_status = FND_API.G_RET_STS_ERROR) then
2826: RAISE FND_API.G_EXC_ERROR;
2827: end if; -- /* if l_return_status */
2828:

Line 2825: (l_return_status = FND_API.G_RET_STS_ERROR) then

2821: p_pass => l_index
2822: );
2823: -- If API call returns with an error status, upload aborts
2824: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2825: (l_return_status = FND_API.G_RET_STS_ERROR) then
2826: RAISE FND_API.G_EXC_ERROR;
2827: end if; -- /* if l_return_status */
2828:
2829: -- ******* FUTURE ENHANCEMENT ********

Line 2826: RAISE FND_API.G_EXC_ERROR;

2822: );
2823: -- If API call returns with an error status, upload aborts
2824: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2825: (l_return_status = FND_API.G_RET_STS_ERROR) then
2826: RAISE FND_API.G_EXC_ERROR;
2827: end if; -- /* if l_return_status */
2828:
2829: -- ******* FUTURE ENHANCEMENT ********
2830:

Line 2838: p_return_status := FND_API.G_RET_STS_SUCCESS;

2834: -- by are both 1, call ak_object_pvt.delete with cascade = 'Y'.
2835: -- Then for each attribute referenced by any object attributes to be
2836: -- deleted, call ak_attribute_pvt.delete with cascade = 'N'.
2837:
2838: p_return_status := FND_API.G_RET_STS_SUCCESS;
2839:
2840: FND_MSG_PUB.Count_And_Get (
2841: p_count => p_msg_count,
2842: p_data => p_msg_data);

Line 2845: WHEN FND_API.G_EXC_ERROR THEN

2841: p_count => p_msg_count,
2842: p_data => p_msg_data);
2843:
2844: EXCEPTION
2845: WHEN FND_API.G_EXC_ERROR THEN
2846: p_return_status := FND_API.G_RET_STS_ERROR;
2847: FND_MSG_PUB.Count_And_Get (
2848: p_count => p_msg_count,
2849: p_data => p_msg_data);

Line 2846: p_return_status := FND_API.G_RET_STS_ERROR;

2842: p_data => p_msg_data);
2843:
2844: EXCEPTION
2845: WHEN FND_API.G_EXC_ERROR THEN
2846: p_return_status := FND_API.G_RET_STS_ERROR;
2847: FND_MSG_PUB.Count_And_Get (
2848: p_count => p_msg_count,
2849: p_data => p_msg_data);
2850: WHEN OTHERS THEN

Line 2851: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2847: FND_MSG_PUB.Count_And_Get (
2848: p_count => p_msg_count,
2849: p_data => p_msg_data);
2850: WHEN OTHERS THEN
2851: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2852: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2853: SUBSTR (SQLERRM, 1, 240) );
2854: FND_MSG_PUB.Count_And_Get (
2855: p_count => p_msg_count,

Line 2905: raise FND_API.G_EXC_ERROR;

2901:
2902: if (p_in_buf is null) then
2903: p_token := null;
2904: --dbms_output.put_line('No more token');
2905: raise FND_API.G_EXC_ERROR;
2906: end if;
2907:
2908: l_start_pos := 1;
2909: l_curr_pos := 1;

Line 2960: p_return_status := FND_API.G_RET_STS_SUCCESS;

2956: if (l_end_pos > 0) then
2957: p_token := REPLACE_ESCAPED_CHARS(
2958: SUBSTR(p_in_buf, l_start_pos, l_end_pos - l_start_pos) );
2959: p_in_buf := SUBSTR(p_in_buf, l_end_pos + 1, length(p_in_buf)- l_end_pos+1);
2960: p_return_status := FND_API.G_RET_STS_SUCCESS;
2961: else
2962: --
2963: -- error: missing end quote
2964: --

Line 2967: raise FND_API.G_EXC_ERROR;

2963: -- error: missing end quote
2964: --
2965: p_token := null;
2966: -- dbms_output.put_line('Error - Missing end quote');
2967: raise FND_API.G_EXC_ERROR;
2968: end if;
2969:
2970: EXCEPTION
2971: WHEN FND_API.G_EXC_ERROR THEN

Line 2971: WHEN FND_API.G_EXC_ERROR THEN

2967: raise FND_API.G_EXC_ERROR;
2968: end if;
2969:
2970: EXCEPTION
2971: WHEN FND_API.G_EXC_ERROR THEN
2972: p_return_status := FND_API.G_RET_STS_ERROR;
2973: WHEN OTHERS THEN
2974: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2975: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 2972: p_return_status := FND_API.G_RET_STS_ERROR;

2968: end if;
2969:
2970: EXCEPTION
2971: WHEN FND_API.G_EXC_ERROR THEN
2972: p_return_status := FND_API.G_RET_STS_ERROR;
2973: WHEN OTHERS THEN
2974: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2975: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2976: SUBSTR (SQLERRM, 1, 240) );

Line 2974: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2970: EXCEPTION
2971: WHEN FND_API.G_EXC_ERROR THEN
2972: p_return_status := FND_API.G_RET_STS_ERROR;
2973: WHEN OTHERS THEN
2974: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2975: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2976: SUBSTR (SQLERRM, 1, 240) );
2977: end GET_TOKEN;
2978:

Line 3088: p_return_status := FND_API.G_RET_STS_SUCCESS;

3084: --
3085: p_lines_read := l_lines_read;
3086: p_eof_flag := 'N';
3087: p_index := l_index;
3088: p_return_status := FND_API.G_RET_STS_SUCCESS;
3089:
3090: EXCEPTION
3091: WHEN NO_DATA_FOUND THEN
3092: if not l_done then

Line 3096: p_return_status := FND_API.G_RET_STS_ERROR;

3092: if not l_done then
3093: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3094: FND_MESSAGE.SET_NAME('AK','AK_UNEXPECTED_EOF_ERROR');
3095: FND_MSG_PUB.Add;
3096: p_return_status := FND_API.G_RET_STS_ERROR;
3097: end if;
3098: end if;
3099: p_return_status := FND_API.G_RET_STS_SUCCESS;
3100: p_lines_read := l_lines_read;

Line 3099: p_return_status := FND_API.G_RET_STS_SUCCESS;

3095: FND_MSG_PUB.Add;
3096: p_return_status := FND_API.G_RET_STS_ERROR;
3097: end if;
3098: end if;
3099: p_return_status := FND_API.G_RET_STS_SUCCESS;
3100: p_lines_read := l_lines_read;
3101: p_eof_flag := 'Y';
3102: p_index := l_index;
3103: WHEN INVALID_CURSOR THEN

Line 3111: p_return_status := FND_API.G_RET_STS_ERROR;

3107: FND_MESSAGE.SET_NAME('AK','AK_UNEXPECTED_EOF_ERROR');
3108: FND_MSG_PUB.Add;
3109: end if;
3110: end if;
3111: p_return_status := FND_API.G_RET_STS_ERROR;
3112: p_lines_read := l_lines_read;
3113: p_eof_flag := 'Y';
3114: p_index := l_index;
3115: WHEN OTHERS THEN

Line 3116: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3112: p_lines_read := l_lines_read;
3113: p_eof_flag := 'Y';
3114: p_index := l_index;
3115: WHEN OTHERS THEN
3116: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3117: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3118: SUBSTR (SQLERRM, 1, 240) );
3119: p_eof_flag := 'Y';
3120: p_lines_read := l_lines_read;

Line 3165: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,

3161: -- LAST_UPDATE_LOGIN who column.
3162: --=======================================================
3163: procedure SET_WHO (
3164: p_return_status OUT NOCOPY VARCHAR2,
3165: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3166: p_created_by OUT NOCOPY NUMBER,
3167: p_creation_date OUT NOCOPY DATE,
3168: p_last_updated_by OUT NOCOPY NUMBER,
3169: p_last_update_date OUT NOCOPY DATE,

Line 3179: if (p_loader_timestamp <> FND_API.G_MISS_DATE) then

3175:
3176: if AK_UPLOAD_GRP.G_UPLOAD_DATE is null then
3177: AK_UPLOAD_GRP.G_UPLOAD_DATE := AK_UPLOAD_GRP.G_GEN_DATE;
3178: end if;
3179: if (p_loader_timestamp <> FND_API.G_MISS_DATE) then
3180: l_file_version := AK_ON_OBJECTS_PUB.G_UPLOAD_FILE_VERSION;
3181: if ( l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER1 or
3182: l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER2 or
3183: l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER3 or

Line 3200: raise FND_API.G_EXC_ERROR;

3196: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3197: FND_MESSAGE.SET_NAME('AK','AK_MISSING_GEN_DATE');
3198: FND_MSG_PUB.Add;
3199: end if;
3200: raise FND_API.G_EXC_ERROR;
3201: end if;
3202: p_created_by := 1;
3203: p_creation_date := AK_UPLOAD_GRP.G_UPLOAD_DATE;
3204: p_last_updated_by := 1;

Line 3226: p_return_status := FND_API.G_RET_STS_SUCCESS;

3222: p_last_update_login := to_number(
3223: nvl(fnd_profile.value('LOGIN_ID'),0));
3224: end if;
3225:
3226: p_return_status := FND_API.G_RET_STS_SUCCESS;
3227:
3228: EXCEPTION
3229: WHEN FND_API.G_EXC_ERROR THEN
3230: p_return_status := FND_API.G_RET_STS_ERROR;

Line 3229: WHEN FND_API.G_EXC_ERROR THEN

3225:
3226: p_return_status := FND_API.G_RET_STS_SUCCESS;
3227:
3228: EXCEPTION
3229: WHEN FND_API.G_EXC_ERROR THEN
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: WHEN OTHERS THEN
3232: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3233: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3230: p_return_status := FND_API.G_RET_STS_ERROR;

3226: p_return_status := FND_API.G_RET_STS_SUCCESS;
3227:
3228: EXCEPTION
3229: WHEN FND_API.G_EXC_ERROR THEN
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: WHEN OTHERS THEN
3232: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3233: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3234: SUBSTR (SQLERRM, 1, 240) );

Line 3232: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3228: EXCEPTION
3229: WHEN FND_API.G_EXC_ERROR THEN
3230: p_return_status := FND_API.G_RET_STS_ERROR;
3231: WHEN OTHERS THEN
3232: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3233: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3234: SUBSTR (SQLERRM, 1, 240) );
3235: END SET_WHO;
3236:

Line 3286: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,

3282: -- p_db_id - LAST_UPDATED_BY of db row
3283: -- p_db_lud - LAST_UPDATE_DATE of db row
3284: -- p_custom_mode - CUSTOM_MODE FNDLOAD parameter value
3285: function IS_UPDATEABLE (
3286: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3287: p_created_by IN OUT NOCOPY NUMBER,
3288: p_creation_date IN OUT NOCOPY DATE,
3289: p_last_updated_by IN OUT NOCOPY NUMBER,
3290: p_db_last_updated_by IN NUMBER,

Line 3437: p_return_status := FND_API.G_RET_STS_SUCCESS;

3433: --
3434: -- return without doing anything if buffer is empty
3435: --
3436: if (p_buffer_tbl.count = 0) then
3437: p_return_status := FND_API.G_RET_STS_SUCCESS;
3438: return;
3439: end if;
3440:
3441: --

Line 3450: raise FND_API.G_EXC_ERROR;

3446: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3447: FND_MESSAGE.SET_NAME('AK','AK_INVALID_WRITE_MODE');
3448: FND_MSG_PUB.Add;
3449: end if;
3450: raise FND_API.G_EXC_ERROR;
3451: end if;
3452:
3453: -- If it's append mode, start appending to the end of the global table
3454: --

Line 3505: p_return_status := FND_API.G_RET_STS_SUCCESS;

3501: end if;
3502:
3503: END LOOP;
3504:
3505: p_return_status := FND_API.G_RET_STS_SUCCESS;
3506:
3507: EXCEPTION
3508: WHEN FND_API.G_EXC_ERROR THEN
3509: p_return_status := FND_API.G_RET_STS_ERROR;

Line 3508: WHEN FND_API.G_EXC_ERROR THEN

3504:
3505: p_return_status := FND_API.G_RET_STS_SUCCESS;
3506:
3507: EXCEPTION
3508: WHEN FND_API.G_EXC_ERROR THEN
3509: p_return_status := FND_API.G_RET_STS_ERROR;
3510: WHEN OTHERS THEN
3511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3512: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3509: p_return_status := FND_API.G_RET_STS_ERROR;

3505: p_return_status := FND_API.G_RET_STS_SUCCESS;
3506:
3507: EXCEPTION
3508: WHEN FND_API.G_EXC_ERROR THEN
3509: p_return_status := FND_API.G_RET_STS_ERROR;
3510: WHEN OTHERS THEN
3511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3512: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3513: SUBSTR (SQLERRM, 1, 240) );

Line 3511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3507: EXCEPTION
3508: WHEN FND_API.G_EXC_ERROR THEN
3509: p_return_status := FND_API.G_RET_STS_ERROR;
3510: WHEN OTHERS THEN
3511: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3512: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3513: SUBSTR (SQLERRM, 1, 240) );
3514: end WRITE_FILE;
3515:

Line 3562: p_return_status := FND_API.G_RET_STS_SUCCESS;

3558: --
3559: -- return without doing anything if buffer is empty
3560: --
3561: if (p_buffer_tbl.count = 0) then
3562: p_return_status := FND_API.G_RET_STS_SUCCESS;
3563: --G_LOG_BUFFER_TBL.DELETE;
3564: return;
3565: end if;
3566:

Line 3576: raise FND_API.G_EXC_ERROR;

3572: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3573: FND_MESSAGE.SET_NAME('AK','AK_INVALID_WRITE_MODE');
3574: FND_MSG_PUB.Add;
3575: end if;
3576: raise FND_API.G_EXC_ERROR;
3577: end if;
3578:
3579: -- If it's append mode, start appending to the end of the global table
3580: --

Line 3620: p_return_status := FND_API.G_RET_STS_SUCCESS;

3616: l_buf_written := l_buf_written + l_char_to_write;
3617: END LOOP;
3618: end if;
3619: END LOOP;
3620: p_return_status := FND_API.G_RET_STS_SUCCESS;
3621:
3622: EXCEPTION
3623: WHEN STORAGE_ERROR THEN
3624: p_return_status := FND_API.G_RET_STS_ERROR;

Line 3624: p_return_status := FND_API.G_RET_STS_ERROR;

3620: p_return_status := FND_API.G_RET_STS_SUCCESS;
3621:
3622: EXCEPTION
3623: WHEN STORAGE_ERROR THEN
3624: p_return_status := FND_API.G_RET_STS_ERROR;
3625: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3626: SUBSTR (SQLERRM, 1, 240) );
3627: WHEN OTHERS THEN
3628: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3628: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3624: p_return_status := FND_API.G_RET_STS_ERROR;
3625: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3626: SUBSTR (SQLERRM, 1, 240) );
3627: WHEN OTHERS THEN
3628: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3629: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3630: SUBSTR (SQLERRM, 1, 240) );
3631: end WRITE_LOG_FILE;
3632:

Line 3719: IF NOT FND_API.Compatible_API_Call (

3715: l_api_version_number CONSTANT number := 1.0;
3716: l_api_name CONSTANT varchar2(30) := 'Valid_Application_ID';
3717: l_dummy number;
3718: begin
3719: IF NOT FND_API.Compatible_API_Call (
3720: l_api_version_number, p_api_version_number, l_api_name,
3721: G_PKG_NAME) then
3722: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3723: return FALSE;

Line 3722: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3718: begin
3719: IF NOT FND_API.Compatible_API_Call (
3720: l_api_version_number, p_api_version_number, l_api_name,
3721: G_PKG_NAME) then
3722: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3723: return FALSE;
3724: END IF;
3725:
3726: open l_check_appl_id_csr;

Line 3730: p_return_status := FND_API.G_RET_STS_SUCCESS;

3726: open l_check_appl_id_csr;
3727: fetch l_check_appl_id_csr into l_dummy;
3728: if (l_check_appl_id_csr%notfound) then
3729: close l_check_appl_id_csr;
3730: p_return_status := FND_API.G_RET_STS_SUCCESS;
3731: return FALSE;
3732: else
3733: close l_check_appl_id_csr;
3734: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3734: p_return_status := FND_API.G_RET_STS_SUCCESS;

3730: p_return_status := FND_API.G_RET_STS_SUCCESS;
3731: return FALSE;
3732: else
3733: close l_check_appl_id_csr;
3734: p_return_status := FND_API.G_RET_STS_SUCCESS;
3735: return TRUE;
3736: end if;
3737:
3738: EXCEPTION

Line 3739: WHEN FND_API.G_EXC_ERROR THEN

3735: return TRUE;
3736: end if;
3737:
3738: EXCEPTION
3739: WHEN FND_API.G_EXC_ERROR THEN
3740: p_return_status := FND_API.G_RET_STS_ERROR;
3741: return FALSE;
3742: WHEN OTHERS THEN
3743: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3740: p_return_status := FND_API.G_RET_STS_ERROR;

3736: end if;
3737:
3738: EXCEPTION
3739: WHEN FND_API.G_EXC_ERROR THEN
3740: p_return_status := FND_API.G_RET_STS_ERROR;
3741: return FALSE;
3742: WHEN OTHERS THEN
3743: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3744: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3743: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3739: WHEN FND_API.G_EXC_ERROR THEN
3740: p_return_status := FND_API.G_RET_STS_ERROR;
3741: return FALSE;
3742: WHEN OTHERS THEN
3743: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3744: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3745: SUBSTR (SQLERRM, 1, 240) );
3746: return FALSE;
3747: end VALID_APPLICATION_ID;

Line 3791: IF NOT FND_API.Compatible_API_Call (

3787: l_api_version_number CONSTANT number := 1.0;
3788: l_api_name CONSTANT varchar2(30) := 'Valid_Application_ID';
3789: l_dummy number;
3790: begin
3791: IF NOT FND_API.Compatible_API_Call (
3792: l_api_version_number, p_api_version_number, l_api_name,
3793: G_PKG_NAME) then
3794: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3795: return FALSE;

Line 3794: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3790: begin
3791: IF NOT FND_API.Compatible_API_Call (
3792: l_api_version_number, p_api_version_number, l_api_name,
3793: G_PKG_NAME) then
3794: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3795: return FALSE;
3796: END IF;
3797:
3798: open l_checklookup_csr (p_lookup_type, p_lookup_code);

Line 3802: p_return_status := FND_API.G_RET_STS_SUCCESS;

3798: open l_checklookup_csr (p_lookup_type, p_lookup_code);
3799: fetch l_checklookup_csr into l_dummy;
3800: if (l_checklookup_csr%notfound) then
3801: close l_checklookup_csr;
3802: p_return_status := FND_API.G_RET_STS_SUCCESS;
3803: return FALSE;
3804: else
3805: close l_checklookup_csr;
3806: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3806: p_return_status := FND_API.G_RET_STS_SUCCESS;

3802: p_return_status := FND_API.G_RET_STS_SUCCESS;
3803: return FALSE;
3804: else
3805: close l_checklookup_csr;
3806: p_return_status := FND_API.G_RET_STS_SUCCESS;
3807: return TRUE;
3808: end if;
3809:
3810: EXCEPTION

Line 3811: WHEN FND_API.G_EXC_ERROR THEN

3807: return TRUE;
3808: end if;
3809:
3810: EXCEPTION
3811: WHEN FND_API.G_EXC_ERROR THEN
3812: p_return_status := FND_API.G_RET_STS_ERROR;
3813: return FALSE;
3814: WHEN OTHERS THEN
3815: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3812: p_return_status := FND_API.G_RET_STS_ERROR;

3808: end if;
3809:
3810: EXCEPTION
3811: WHEN FND_API.G_EXC_ERROR THEN
3812: p_return_status := FND_API.G_RET_STS_ERROR;
3813: return FALSE;
3814: WHEN OTHERS THEN
3815: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3816: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3815: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3811: WHEN FND_API.G_EXC_ERROR THEN
3812: p_return_status := FND_API.G_RET_STS_ERROR;
3813: return FALSE;
3814: WHEN OTHERS THEN
3815: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3816: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3817: SUBSTR (SQLERRM, 1, 240) );
3818: return FALSE;
3819: end VALID_LOOKUP_CODE;