APPS.AK_ON_OBJECTS_PVT dependencies on FND_API

Line 125: p_return_status := FND_API.G_RET_STS_SUCCESS;

121: --
122: -- Return if from table is empty
123: --
124: if (p_from_table.count = 0) then
125: p_return_status := FND_API.G_RET_STS_SUCCESS;
126: return;
127: end if;
128:
129: l_to_index := nvl(p_to_table.LAST, 0) + 1;

Line 138: p_return_status := FND_API.G_RET_STS_SUCCESS;

134: l_to_index := l_to_index + 1;
135: end if;
136: end loop;
137:
138: p_return_status := FND_API.G_RET_STS_SUCCESS;
139:
140: EXCEPTION
141: WHEN FND_API.G_EXC_ERROR THEN
142: p_return_status := FND_API.G_RET_STS_ERROR;

Line 141: WHEN FND_API.G_EXC_ERROR THEN

137:
138: p_return_status := FND_API.G_RET_STS_SUCCESS;
139:
140: EXCEPTION
141: WHEN FND_API.G_EXC_ERROR THEN
142: p_return_status := FND_API.G_RET_STS_ERROR;
143: WHEN OTHERS THEN
144: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
145: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 142: p_return_status := FND_API.G_RET_STS_ERROR;

138: p_return_status := FND_API.G_RET_STS_SUCCESS;
139:
140: EXCEPTION
141: WHEN FND_API.G_EXC_ERROR THEN
142: p_return_status := FND_API.G_RET_STS_ERROR;
143: WHEN OTHERS THEN
144: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
145: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
146: SUBSTR (SQLERRM, 1, 240) );

Line 144: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

140: EXCEPTION
141: WHEN FND_API.G_EXC_ERROR THEN
142: p_return_status := FND_API.G_RET_STS_ERROR;
143: WHEN OTHERS THEN
144: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
145: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
146: SUBSTR (SQLERRM, 1, 240) );
147: end APPEND_BUFFER_TABLES;
148:

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

205: -- p_application_id are not given, the p_application_id_out
206: -- will be null.
207: --==============================================
208: procedure DOWNLOAD_HEADER (
209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
210: p_api_version_number IN NUMBER,
211: p_return_status OUT NOCOPY VARCHAR2,
212: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
213: p_application_id IN NUMBER := FND_API.G_MISS_NUM,

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

208: procedure DOWNLOAD_HEADER (
209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
210: p_api_version_number IN NUMBER,
211: p_return_status OUT NOCOPY VARCHAR2,
212: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
213: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
214: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
215: p_table_size IN NUMBER,
216: p_download_by_object IN VARCHAR2,

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

209: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
210: p_api_version_number IN NUMBER,
211: p_return_status OUT NOCOPY VARCHAR2,
212: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
213: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
214: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
215: p_table_size IN NUMBER,
216: p_download_by_object IN VARCHAR2,
217: p_nls_language_out OUT NOCOPY VARCHAR2,

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

210: p_api_version_number IN NUMBER,
211: p_return_status OUT NOCOPY VARCHAR2,
212: p_nls_language IN VARCHAR2 := FND_API.G_MISS_CHAR,
213: p_application_id IN NUMBER := FND_API.G_MISS_NUM,
214: p_application_short_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
215: p_table_size IN NUMBER,
216: p_download_by_object IN VARCHAR2,
217: p_nls_language_out OUT NOCOPY VARCHAR2,
218: p_application_id_out OUT NOCOPY NUMBER

Line 237: IF NOT FND_API.Compatible_API_Call (

233: begin
234: --
235: -- Check verion number
236: --
237: IF NOT FND_API.Compatible_API_Call (
238: l_api_version_number, p_api_version_number, l_api_name,
239: G_PKG_NAME) then
240: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
241: return;

Line 240: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

236: --
237: IF NOT FND_API.Compatible_API_Call (
238: l_api_version_number, p_api_version_number, l_api_name,
239: G_PKG_NAME) then
240: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
241: return;
242: END IF;
243:
244: --

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

246: -- a list of attributes/regions/objects/flows to be extracted from
247: -- the database must be provided
248: --
249:
250: if ((p_application_short_name = FND_API.G_MISS_CHAR) or
251: (p_application_short_name is null)) and
252: ((p_application_id = FND_API.G_MISS_NUM) or
253: (p_application_id is null)) and
254: (p_table_size = 0) then

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

248: --
249:
250: if ((p_application_short_name = FND_API.G_MISS_CHAR) or
251: (p_application_short_name is null)) and
252: ((p_application_id = FND_API.G_MISS_NUM) or
253: (p_application_id is null)) and
254: (p_table_size = 0) then
255: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
256: FND_MESSAGE.SET_NAME('AK','AK_NO_SELECTION');

Line 259: raise FND_API.G_EXC_ERROR;

255: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
256: FND_MESSAGE.SET_NAME('AK','AK_NO_SELECTION');
257: FND_MSG_PUB.Add;
258: end if;
259: raise FND_API.G_EXC_ERROR;
260: end if;
261:
262: --
263: -- - Load l_application_id

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

265: -- given, find the application ID from the application short name
266: --
267: l_application_id := p_application_id;
268:
269: if (p_application_short_name <> FND_API.G_MISS_CHAR) then
270:
271: -- /** Since we pass appl short name only from Java wrapper, this
272: -- meesage is not necessary **/
273: --if (p_application_id <> FND_API.G_MISS_NUM) then

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

269: if (p_application_short_name <> FND_API.G_MISS_CHAR) then
270:
271: -- /** Since we pass appl short name only from Java wrapper, this
272: -- meesage is not necessary **/
273: --if (p_application_id <> FND_API.G_MISS_NUM) then
274: --if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
275: -- FND_MESSAGE.SET_NAME('AK','AK_APPL_SHORT_NAME_IGNORED');
276: -- FND_MSG_PUB.Add;
277: --end if;

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

276: -- FND_MSG_PUB.Add;
277: --end if;
278: --else
279: -- /***********************************************/
280: if (p_application_id = FND_API.G_MISS_NUM) then
281: open l_get_appl_id_csr(p_application_short_name);
282: fetch l_get_appl_id_csr into l_application_id;
283: if (l_get_appl_id_csr%notfound) then
284: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 290: raise FND_API.G_EXC_ERROR;

286: FND_MESSAGE.SET_TOKEN('APPL_SHORT_NAME', p_application_short_name);
287: FND_MSG_PUB.Add;
288: end if;
289: close l_get_appl_id_csr;
290: raise FND_API.G_EXC_ERROR;
291: end if;
292: close l_get_appl_id_csr;
293: end if;
294: end if;

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

295:
296: --
297: -- If no LANGUAGE CODE is given, use the default language code
298: --
299: if ((p_nls_language = FND_API.G_MISS_CHAR) or
300: (p_nls_language is null)) then
301:
302: select userenv('LANG') into l_nls_language
303: from dual;

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

2000: p_return_status => l_return_status,
2001: p_buffer_tbl => l_header_tbl,
2002: p_write_mode => AK_ON_OBJECTS_PUB.G_OVERWRITE
2003: );
2004: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2005: (l_return_status = FND_API.G_RET_STS_ERROR) then
2006: --dbms_output.put_line(G_PKG_NAME || ': first write_File failed');
2007: RAISE FND_API.G_EXC_ERROR;
2008: end if;

Line 2005: (l_return_status = FND_API.G_RET_STS_ERROR) then

2001: p_buffer_tbl => l_header_tbl,
2002: p_write_mode => AK_ON_OBJECTS_PUB.G_OVERWRITE
2003: );
2004: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2005: (l_return_status = FND_API.G_RET_STS_ERROR) then
2006: --dbms_output.put_line(G_PKG_NAME || ': first write_File failed');
2007: RAISE FND_API.G_EXC_ERROR;
2008: end if;
2009:

Line 2007: RAISE FND_API.G_EXC_ERROR;

2003: );
2004: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2005: (l_return_status = FND_API.G_RET_STS_ERROR) then
2006: --dbms_output.put_line(G_PKG_NAME || ': first write_File failed');
2007: RAISE FND_API.G_EXC_ERROR;
2008: end if;
2009:
2010: --
2011: -- Load output parameters and set return status to success

Line 2015: p_return_status := FND_API.G_RET_STS_SUCCESS;

2011: -- Load output parameters and set return status to success
2012: --
2013: p_nls_language_out := l_nls_language;
2014: p_application_id_out := l_application_id;
2015: p_return_status := FND_API.G_RET_STS_SUCCESS;
2016:
2017: EXCEPTION
2018: WHEN FND_API.G_EXC_ERROR THEN
2019: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 2018: WHEN FND_API.G_EXC_ERROR THEN

2014: p_application_id_out := l_application_id;
2015: p_return_status := FND_API.G_RET_STS_SUCCESS;
2016:
2017: EXCEPTION
2018: WHEN FND_API.G_EXC_ERROR THEN
2019: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2020: FND_MESSAGE.SET_NAME('AK','AK_HEADER_DOWNLOAD_ERROR');
2021: FND_MSG_PUB.Add;
2022: end if;

Line 2023: p_return_status := FND_API.G_RET_STS_ERROR;

2019: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2020: FND_MESSAGE.SET_NAME('AK','AK_HEADER_DOWNLOAD_ERROR');
2021: FND_MSG_PUB.Add;
2022: end if;
2023: p_return_status := FND_API.G_RET_STS_ERROR;
2024: WHEN OTHERS THEN
2025: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2026: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2027: SUBSTR (SQLERRM, 1, 240) );

Line 2025: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2021: FND_MSG_PUB.Add;
2022: end if;
2023: p_return_status := FND_API.G_RET_STS_ERROR;
2024: WHEN OTHERS THEN
2025: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2026: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2027: SUBSTR (SQLERRM, 1, 240) );
2028: end DOWNLOAD_HEADER;
2029:

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

2049: -- * Success
2050: -- Parameters
2051: --==============================================
2052: procedure UPLOAD (
2053: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2054: p_api_version_number IN NUMBER,
2055: p_init_msg_tbl IN BOOLEAN := FALSE,
2056: p_msg_count OUT NOCOPY NUMBER,
2057: p_msg_data OUT NOCOPY VARCHAR2,

Line 2086: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

2082: l_timestamp DATE := sysdate;
2083: l_token AK_ON_OBJECTS_PUB.Buffer_Type;
2084: l_tbl_index NUMBER;
2085: l_file_version NUMBER;
2086: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2087: l_not_compatible_version BOOLEAN := TRUE;
2088: i NUMBER;
2089: begin
2090: IF NOT FND_API.Compatible_API_Call (

Line 2090: IF NOT FND_API.Compatible_API_Call (

2086: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
2087: l_not_compatible_version BOOLEAN := TRUE;
2088: i NUMBER;
2089: begin
2090: IF NOT FND_API.Compatible_API_Call (
2091: l_api_version_number, p_api_version_number, l_api_name,
2092: G_PKG_NAME) then
2093: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2094: return;

Line 2093: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2089: begin
2090: IF NOT FND_API.Compatible_API_Call (
2091: l_api_version_number, p_api_version_number, l_api_name,
2092: G_PKG_NAME) then
2093: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2094: return;
2095: END IF;
2096:
2097: -- Initialize the message table if requested.

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

2141: p_eof_flag => l_eof_flag,
2142: p_upl_loader_cur => l_upl_loader_cur
2143: );
2144:
2145: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2146: (l_return_status = FND_API.G_RET_STS_ERROR) then
2147: RAISE FND_API.G_EXC_ERROR;
2148: end if;
2149: l_line_num := l_line_num + l_lines_read;

Line 2146: (l_return_status = FND_API.G_RET_STS_ERROR) then

2142: p_upl_loader_cur => l_upl_loader_cur
2143: );
2144:
2145: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2146: (l_return_status = FND_API.G_RET_STS_ERROR) then
2147: RAISE FND_API.G_EXC_ERROR;
2148: end if;
2149: l_line_num := l_line_num + l_lines_read;
2150:

Line 2147: RAISE FND_API.G_EXC_ERROR;

2143: );
2144:
2145: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2146: (l_return_status = FND_API.G_RET_STS_ERROR) then
2147: RAISE FND_API.G_EXC_ERROR;
2148: end if;
2149: l_line_num := l_line_num + l_lines_read;
2150:
2151: --

Line 2179: RAISE FND_API.G_EXC_ERROR;

2175: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2176: FND_MESSAGE.SET_NAME('AK','AK_EMPTY_FILE');
2177: FND_MSG_PUB.Add;
2178: end if;
2179: RAISE FND_API.G_EXC_ERROR;
2180: end if;
2181:
2182: --
2183: -- Parse the buffer read to obtain header information such as

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

2193: p_in_buf => l_buffer,
2194: p_token => l_token
2195: );
2196:
2197: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2198: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2199: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2200: FND_MESSAGE.SET_NAME('AK','AK_GET_TOKEN_ERROR');
2201: FND_MSG_PUB.Add;

Line 2198: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2194: p_token => l_token
2195: );
2196:
2197: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2198: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2199: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2200: FND_MESSAGE.SET_NAME('AK','AK_GET_TOKEN_ERROR');
2201: FND_MSG_PUB.Add;
2202: end if;

Line 2203: raise FND_API.G_EXC_ERROR;

2199: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2200: FND_MESSAGE.SET_NAME('AK','AK_GET_TOKEN_ERROR');
2201: FND_MSG_PUB.Add;
2202: end if;
2203: raise FND_API.G_EXC_ERROR;
2204: end if;
2205: --dbms_output.put_line(' State:' || l_state || 'Token:' || l_token);
2206:
2207: --

Line 2221: raise FND_API.G_EXC_ERROR;

2217: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2218: FND_MESSAGE.SET_NAME('AK','AK_HEADER_INFO_MISSING');
2219: FND_MSG_PUB.Add;
2220: end if;
2221: raise FND_API.G_EXC_ERROR;
2222: else
2223: -- dbms_output.put_line('l_language is ' || l_language);
2224: -- dbms_output.put_line('l_extract_by_obj is ' || l_extract_by_obj);
2225: l_state := 3;

Line 2243: raise FND_API.G_EXC_ERROR;

2239: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN, LANGUAGE, CODESET, ' ||
2240: 'EXTRACT_BY_OBJECT, EXTRACT_BY_APPLICATION');
2241: FND_MSG_PUB.Add;
2242: end if;
2243: raise FND_API.G_EXC_ERROR;
2244: end if; -- endif of (l_token = 'BEGIN')
2245: elsif (l_state = 1) then
2246: if (l_token = '=') then
2247: l_state := 2;

Line 2257: raise FND_API.G_EXC_ERROR;

2253: FND_MESSAGE.SET_TOKEN('EXPECTED','=');
2254: FND_MSG_PUB.Add;
2255: end if;
2256: --dbms_output.put_line('Expecting =');
2257: raise FND_API.G_EXC_ERROR;
2258: end if;
2259: elsif (l_state = 2) then
2260: if (l_column = 'LANGUAGE') then
2261: l_language := UPPER(l_token);

Line 2276: raise FND_API.G_EXC_ERROR;

2272: FND_MESSAGE.SET_NAME('AK','AK_INVALID_COLUMN_VALUE');
2273: FND_MESSAGE.SET_TOKEN('COLUMN','EXTRACT_BY_OBJECT');
2274: FND_MSG_PUB.Add;
2275: end if;
2276: raise FND_API.G_EXC_ERROR;
2277: else
2278: l_extract_by_obj := UPPER(l_token);
2279: AK_UPLOAD_GRP.G_EXTRACT_OBJ := l_extract_by_obj;
2280: end if;

Line 2303: raise FND_API.G_EXC_ERROR;

2299: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2300: FND_MESSAGE.SET_NAME('AK','AK_WRONG_FILE_VERSION');
2301: FND_MSG_PUB.Add;
2302: end if;
2303: raise FND_API.G_EXC_ERROR;
2304: end if; -- end if l_file_version
2305: else
2306: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2307: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR_VALUE');

Line 2314: raise FND_API.G_EXC_ERROR;

2310: FND_MESSAGE.SET_TOKEN('EXPECTED',l_column);
2311: FND_MSG_PUB.Add;
2312: end if;
2313: -- dbms_output.put_line('Expecting ' || l_column || ' value');
2314: raise FND_API.G_EXC_ERROR;
2315: end if;
2316: l_state := 0;
2317: elsif (l_state = 4) then
2318: if (l_token = 'BEGIN') then

Line 2329: raise FND_API.G_EXC_ERROR;

2325: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN');
2326: FND_MSG_PUB.Add;
2327: end if;
2328: -- dbms_output.put_line('Expecting BEGIN');
2329: raise FND_API.G_EXC_ERROR;
2330: end if;
2331: elsif (l_state = 3) or (l_state = 5) then
2332: if (l_token = 'ATTRIBUTE') then
2333: -- call ak_attribute_pvt.upload --

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

2359: );
2360: l_buffer := l_buffer2;
2361: l_line_num := l_line_num2;
2362:
2363: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2364: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2365: raise FND_API.G_EXC_ERROR;
2366: else
2367: -- commit the changes from uploading attribute

Line 2364: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2360: l_buffer := l_buffer2;
2361: l_line_num := l_line_num2;
2362:
2363: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2364: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2365: raise FND_API.G_EXC_ERROR;
2366: else
2367: -- commit the changes from uploading attribute
2368: commit;

Line 2365: raise FND_API.G_EXC_ERROR;

2361: l_line_num := l_line_num2;
2362:
2363: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2364: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2365: raise FND_API.G_EXC_ERROR;
2366: else
2367: -- commit the changes from uploading attribute
2368: commit;
2369: end if;

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

2399: );
2400: l_buffer := l_buffer2;
2401: l_line_num := l_line_num2;
2402: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2403: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2404: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2405: raise FND_API.G_EXC_ERROR;
2406: else
2407: -- commit the changes from uploading object

Line 2404: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2400: l_buffer := l_buffer2;
2401: l_line_num := l_line_num2;
2402: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2403: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2404: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2405: raise FND_API.G_EXC_ERROR;
2406: else
2407: -- commit the changes from uploading object
2408: commit;

Line 2405: raise FND_API.G_EXC_ERROR;

2401: l_line_num := l_line_num2;
2402: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2403: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2404: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2405: raise FND_API.G_EXC_ERROR;
2406: else
2407: -- commit the changes from uploading object
2408: commit;
2409: end if;

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

2427: );
2428: l_buffer := l_buffer2;
2429: l_line_num := l_line_num2;
2430: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2431: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2432: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2433: raise FND_API.G_EXC_ERROR;
2434: else
2435: -- commit the changes from uploading region

Line 2432: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2428: l_buffer := l_buffer2;
2429: l_line_num := l_line_num2;
2430: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2431: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2432: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2433: raise FND_API.G_EXC_ERROR;
2434: else
2435: -- commit the changes from uploading region
2436: commit;

Line 2433: raise FND_API.G_EXC_ERROR;

2429: l_line_num := l_line_num2;
2430: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2431: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2432: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2433: raise FND_API.G_EXC_ERROR;
2434: else
2435: -- commit the changes from uploading region
2436: commit;
2437: end if;

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

2451: p_pass => l_index
2452: );
2453: l_buffer := l_buffer2;
2454: l_line_num := l_line_num2;
2455: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2456: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2457: raise FND_API.G_EXC_ERROR;
2458: else
2459: -- commit the changes from uploading customization

Line 2456: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2452: );
2453: l_buffer := l_buffer2;
2454: l_line_num := l_line_num2;
2455: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2456: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2457: raise FND_API.G_EXC_ERROR;
2458: else
2459: -- commit the changes from uploading customization
2460: commit;

Line 2457: raise FND_API.G_EXC_ERROR;

2453: l_buffer := l_buffer2;
2454: l_line_num := l_line_num2;
2455: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2456: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2457: raise FND_API.G_EXC_ERROR;
2458: else
2459: -- commit the changes from uploading customization
2460: commit;
2461: end if;

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

2480: l_buffer := l_buffer2;
2481: l_line_num := l_line_num2;
2482: -- dbms_output.put_line('Returning from flow upload: '||
2483: -- to_char(sysdate, 'MON-DD HH24:MI:SS')||' status: '||l_return_status);
2484: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2485: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2486: raise FND_API.G_EXC_ERROR;
2487: else
2488: -- commit the changes from uploading flow

Line 2485: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2481: l_line_num := l_line_num2;
2482: -- dbms_output.put_line('Returning from flow upload: '||
2483: -- to_char(sysdate, 'MON-DD HH24:MI:SS')||' status: '||l_return_status);
2484: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2485: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2486: raise FND_API.G_EXC_ERROR;
2487: else
2488: -- commit the changes from uploading flow
2489: commit;

Line 2486: raise FND_API.G_EXC_ERROR;

2482: -- dbms_output.put_line('Returning from flow upload: '||
2483: -- to_char(sysdate, 'MON-DD HH24:MI:SS')||' status: '||l_return_status);
2484: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2485: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2486: raise FND_API.G_EXC_ERROR;
2487: else
2488: -- commit the changes from uploading flow
2489: commit;
2490: end if;

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

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

Line 2514: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

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

Line 2515: raise FND_API.G_EXC_ERROR;

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

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

2537: );
2538: l_buffer := l_buffer2;
2539: l_line_num := l_line_num2;
2540: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2541: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2542: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2543: raise FND_API.G_EXC_ERROR;
2544: else
2545: -- commit the changes from uploading query object

Line 2542: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2538: l_buffer := l_buffer2;
2539: l_line_num := l_line_num2;
2540: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2541: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2542: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2543: raise FND_API.G_EXC_ERROR;
2544: else
2545: -- commit the changes from uploading query object
2546: commit;

Line 2543: raise FND_API.G_EXC_ERROR;

2539: l_line_num := l_line_num2;
2540: -- dbms_output.put_line('l_buffer returned: ' || l_buffer);
2541: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2542: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2543: raise FND_API.G_EXC_ERROR;
2544: else
2545: -- commit the changes from uploading query object
2546: commit;
2547: end if;

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

2565: );
2566: l_buffer := l_buffer2;
2567: l_line_num := l_line_num2;
2568: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2569: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2570: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2571: raise FND_API.G_EXC_ERROR;
2572: else
2573: -- commit the changes from uploading amparam_registry

Line 2570: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then

2566: l_buffer := l_buffer2;
2567: l_line_num := l_line_num2;
2568: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2569: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2570: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2571: raise FND_API.G_EXC_ERROR;
2572: else
2573: -- commit the changes from uploading amparam_registry
2574: commit;

Line 2571: raise FND_API.G_EXC_ERROR;

2567: l_line_num := l_line_num2;
2568: --dbms_output.put_line('Return from Upload Object to UPLOAD, return status = '||l_return_status);
2569: if (l_return_status = FND_API.G_RET_STS_ERROR) or
2570: (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
2571: raise FND_API.G_EXC_ERROR;
2572: else
2573: -- commit the changes from uploading amparam_registry
2574: commit;
2575: end if;

Line 2588: raise FND_API.G_EXC_ERROR;

2584: FND_MESSAGE.SET_TOKEN('EXPECTED','ATTRIBUTE, OBJECT, REGION,
2585: FLOW, EXCLUDED_ITEMS, RESP_SECURITY_ATTRIBUTES OR QUERY_OBJECT');
2586: FND_MSG_PUB.Add;
2587: end if;
2588: raise FND_API.G_EXC_ERROR;
2589: end if;
2590: l_state := 4;
2591: -- l_buffer := ''; /* clears buffer so a different line will be read */
2592: elsif (l_state = 10) then

Line 2609: raise FND_API.G_EXC_ERROR;

2605: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2606: FND_MESSAGE.SET_TOKEN('EXPECTED', 'END ' || l_object_name);
2607: FND_MSG_PUB.Add;
2608: end if;
2609: raise FND_API.G_EXC_ERROR;
2610: end if;
2611: elsif (l_state = 12) then
2612: if (l_token = l_object_name) then
2613: l_state := 0;

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

2634: p_lines_read => l_lines_read,
2635: p_eof_flag => l_eof_flag,
2636: p_upl_loader_cur => l_upl_loader_cur
2637: );
2638: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2639: (l_return_status = FND_API.G_RET_STS_ERROR) then
2640: RAISE FND_API.G_EXC_ERROR;
2641: end if;
2642: l_line_num := l_line_num + l_lines_read;

Line 2639: (l_return_status = FND_API.G_RET_STS_ERROR) then

2635: p_eof_flag => l_eof_flag,
2636: p_upl_loader_cur => l_upl_loader_cur
2637: );
2638: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2639: (l_return_status = FND_API.G_RET_STS_ERROR) then
2640: RAISE FND_API.G_EXC_ERROR;
2641: end if;
2642: l_line_num := l_line_num + l_lines_read;
2643: --

Line 2640: RAISE FND_API.G_EXC_ERROR;

2636: p_upl_loader_cur => l_upl_loader_cur
2637: );
2638: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2639: (l_return_status = FND_API.G_RET_STS_ERROR) then
2640: RAISE FND_API.G_EXC_ERROR;
2641: end if;
2642: l_line_num := l_line_num + l_lines_read;
2643: --
2644: -- trim leading spaces and discard comment lines

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

2677: p_loader_timestamp => l_timestamp,
2678: p_pass => l_index
2679: );
2680: -- If API call returns with an error status, upload aborts
2681: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2682: (l_return_status = FND_API.G_RET_STS_ERROR) then
2683: RAISE FND_API.G_EXC_ERROR;
2684: end if; -- /* if l_return_status */
2685:

Line 2682: (l_return_status = FND_API.G_RET_STS_ERROR) then

2678: p_pass => l_index
2679: );
2680: -- If API call returns with an error status, upload aborts
2681: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2682: (l_return_status = FND_API.G_RET_STS_ERROR) then
2683: RAISE FND_API.G_EXC_ERROR;
2684: end if; -- /* if l_return_status */
2685:
2686: AK_OBJECT2_PVT.UPLOAD_OBJECT_SECOND (

Line 2683: RAISE FND_API.G_EXC_ERROR;

2679: );
2680: -- If API call returns with an error status, upload aborts
2681: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2682: (l_return_status = FND_API.G_RET_STS_ERROR) then
2683: RAISE FND_API.G_EXC_ERROR;
2684: end if; -- /* if l_return_status */
2685:
2686: AK_OBJECT2_PVT.UPLOAD_OBJECT_SECOND (
2687: p_validation_level => p_validation_level,

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

2689: p_loader_timestamp => l_timestamp,
2690: p_pass => l_index
2691: );
2692: -- If API call returns with an error status, upload aborts
2693: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2694: (l_return_status = FND_API.G_RET_STS_ERROR) then
2695: RAISE FND_API.G_EXC_ERROR;
2696: end if; -- /* if l_return_status */
2697:

Line 2694: (l_return_status = FND_API.G_RET_STS_ERROR) then

2690: p_pass => l_index
2691: );
2692: -- If API call returns with an error status, upload aborts
2693: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2694: (l_return_status = FND_API.G_RET_STS_ERROR) then
2695: RAISE FND_API.G_EXC_ERROR;
2696: end if; -- /* if l_return_status */
2697:
2698: AK_REGION2_PVT.UPLOAD_REGION_SECOND (

Line 2695: RAISE FND_API.G_EXC_ERROR;

2691: );
2692: -- If API call returns with an error status, upload aborts
2693: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2694: (l_return_status = FND_API.G_RET_STS_ERROR) then
2695: RAISE FND_API.G_EXC_ERROR;
2696: end if; -- /* if l_return_status */
2697:
2698: AK_REGION2_PVT.UPLOAD_REGION_SECOND (
2699: p_validation_level => p_validation_level,

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

2701: p_loader_timestamp => l_timestamp,
2702: p_pass => l_index
2703: );
2704: -- If API call returns with an error status, upload aborts
2705: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2706: (l_return_status = FND_API.G_RET_STS_ERROR) then
2707: RAISE FND_API.G_EXC_ERROR;
2708: end if; -- /* if l_return_status */
2709:

Line 2706: (l_return_status = FND_API.G_RET_STS_ERROR) then

2702: p_pass => l_index
2703: );
2704: -- If API call returns with an error status, upload aborts
2705: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2706: (l_return_status = FND_API.G_RET_STS_ERROR) then
2707: RAISE FND_API.G_EXC_ERROR;
2708: end if; -- /* if l_return_status */
2709:
2710: AK_CUSTOM2_PVT.UPLOAD_CUSTOM_SECOND (

Line 2707: RAISE FND_API.G_EXC_ERROR;

2703: );
2704: -- If API call returns with an error status, upload aborts
2705: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2706: (l_return_status = FND_API.G_RET_STS_ERROR) then
2707: RAISE FND_API.G_EXC_ERROR;
2708: end if; -- /* if l_return_status */
2709:
2710: AK_CUSTOM2_PVT.UPLOAD_CUSTOM_SECOND (
2711: p_validation_level => p_validation_level,

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

2713: p_loader_timestamp => l_timestamp,
2714: p_pass => l_index
2715: );
2716: -- If API call returns with an error status, upload aborts
2717: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2718: (l_return_status = FND_API.G_RET_STS_ERROR) then
2719: RAISE FND_API.G_EXC_ERROR;
2720: end if; -- /* if l_return_status */
2721:

Line 2718: (l_return_status = FND_API.G_RET_STS_ERROR) then

2714: p_pass => l_index
2715: );
2716: -- If API call returns with an error status, upload aborts
2717: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2718: (l_return_status = FND_API.G_RET_STS_ERROR) then
2719: RAISE FND_API.G_EXC_ERROR;
2720: end if; -- /* if l_return_status */
2721:
2722: AK_FLOW2_PVT.UPLOAD_FLOW_SECOND (

Line 2719: RAISE FND_API.G_EXC_ERROR;

2715: );
2716: -- If API call returns with an error status, upload aborts
2717: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2718: (l_return_status = FND_API.G_RET_STS_ERROR) then
2719: RAISE FND_API.G_EXC_ERROR;
2720: end if; -- /* if l_return_status */
2721:
2722: AK_FLOW2_PVT.UPLOAD_FLOW_SECOND (
2723: p_validation_level => p_validation_level,

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

2725: p_loader_timestamp => l_timestamp,
2726: p_pass => l_index
2727: );
2728: -- If API call returns with an error status, upload aborts
2729: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2730: (l_return_status = FND_API.G_RET_STS_ERROR) then
2731: RAISE FND_API.G_EXC_ERROR;
2732: end if; -- /* if l_return_status */
2733:

Line 2730: (l_return_status = FND_API.G_RET_STS_ERROR) then

2726: p_pass => l_index
2727: );
2728: -- If API call returns with an error status, upload aborts
2729: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2730: (l_return_status = FND_API.G_RET_STS_ERROR) then
2731: RAISE FND_API.G_EXC_ERROR;
2732: end if; -- /* if l_return_status */
2733:
2734: -- ******* FUTURE ENHANCEMENT ********

Line 2731: RAISE FND_API.G_EXC_ERROR;

2727: );
2728: -- If API call returns with an error status, upload aborts
2729: if (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) or
2730: (l_return_status = FND_API.G_RET_STS_ERROR) then
2731: RAISE FND_API.G_EXC_ERROR;
2732: end if; -- /* if l_return_status */
2733:
2734: -- ******* FUTURE ENHANCEMENT ********
2735:

Line 2743: p_return_status := FND_API.G_RET_STS_SUCCESS;

2739: -- by are both 1, call ak_object_pvt.delete with cascade = 'Y'.
2740: -- Then for each attribute referenced by any object attributes to be
2741: -- deleted, call ak_attribute_pvt.delete with cascade = 'N'.
2742:
2743: p_return_status := FND_API.G_RET_STS_SUCCESS;
2744:
2745: FND_MSG_PUB.Count_And_Get (
2746: p_count => p_msg_count,
2747: p_data => p_msg_data);

Line 2750: WHEN FND_API.G_EXC_ERROR THEN

2746: p_count => p_msg_count,
2747: p_data => p_msg_data);
2748:
2749: EXCEPTION
2750: WHEN FND_API.G_EXC_ERROR THEN
2751: p_return_status := FND_API.G_RET_STS_ERROR;
2752: FND_MSG_PUB.Count_And_Get (
2753: p_count => p_msg_count,
2754: p_data => p_msg_data);

Line 2751: p_return_status := FND_API.G_RET_STS_ERROR;

2747: p_data => p_msg_data);
2748:
2749: EXCEPTION
2750: WHEN FND_API.G_EXC_ERROR THEN
2751: p_return_status := FND_API.G_RET_STS_ERROR;
2752: FND_MSG_PUB.Count_And_Get (
2753: p_count => p_msg_count,
2754: p_data => p_msg_data);
2755: WHEN OTHERS THEN

Line 2756: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2752: FND_MSG_PUB.Count_And_Get (
2753: p_count => p_msg_count,
2754: p_data => p_msg_data);
2755: WHEN OTHERS THEN
2756: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2757: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2758: SUBSTR (SQLERRM, 1, 240) );
2759: FND_MSG_PUB.Count_And_Get (
2760: p_count => p_msg_count,

Line 2810: raise FND_API.G_EXC_ERROR;

2806:
2807: if (p_in_buf is null) then
2808: p_token := null;
2809: --dbms_output.put_line('No more token');
2810: raise FND_API.G_EXC_ERROR;
2811: end if;
2812:
2813: l_start_pos := 1;
2814: l_curr_pos := 1;

Line 2865: p_return_status := FND_API.G_RET_STS_SUCCESS;

2861: if (l_end_pos > 0) then
2862: p_token := REPLACE_ESCAPED_CHARS(
2863: SUBSTR(p_in_buf, l_start_pos, l_end_pos - l_start_pos) );
2864: p_in_buf := SUBSTR(p_in_buf, l_end_pos + 1, length(p_in_buf)- l_end_pos+1);
2865: p_return_status := FND_API.G_RET_STS_SUCCESS;
2866: else
2867: --
2868: -- error: missing end quote
2869: --

Line 2872: raise FND_API.G_EXC_ERROR;

2868: -- error: missing end quote
2869: --
2870: p_token := null;
2871: -- dbms_output.put_line('Error - Missing end quote');
2872: raise FND_API.G_EXC_ERROR;
2873: end if;
2874:
2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN

Line 2876: WHEN FND_API.G_EXC_ERROR THEN

2872: raise FND_API.G_EXC_ERROR;
2873: end if;
2874:
2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: p_return_status := FND_API.G_RET_STS_ERROR;
2878: WHEN OTHERS THEN
2879: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2880: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 2877: p_return_status := FND_API.G_RET_STS_ERROR;

2873: end if;
2874:
2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: p_return_status := FND_API.G_RET_STS_ERROR;
2878: WHEN OTHERS THEN
2879: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2880: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2881: SUBSTR (SQLERRM, 1, 240) );

Line 2879: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2875: EXCEPTION
2876: WHEN FND_API.G_EXC_ERROR THEN
2877: p_return_status := FND_API.G_RET_STS_ERROR;
2878: WHEN OTHERS THEN
2879: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2880: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
2881: SUBSTR (SQLERRM, 1, 240) );
2882: end GET_TOKEN;
2883:

Line 2993: p_return_status := FND_API.G_RET_STS_SUCCESS;

2989: --
2990: p_lines_read := l_lines_read;
2991: p_eof_flag := 'N';
2992: p_index := l_index;
2993: p_return_status := FND_API.G_RET_STS_SUCCESS;
2994:
2995: EXCEPTION
2996: WHEN NO_DATA_FOUND THEN
2997: if not l_done then

Line 3001: p_return_status := FND_API.G_RET_STS_ERROR;

2997: if not l_done then
2998: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
2999: FND_MESSAGE.SET_NAME('AK','AK_UNEXPECTED_EOF_ERROR');
3000: FND_MSG_PUB.Add;
3001: p_return_status := FND_API.G_RET_STS_ERROR;
3002: end if;
3003: end if;
3004: p_return_status := FND_API.G_RET_STS_SUCCESS;
3005: p_lines_read := l_lines_read;

Line 3004: p_return_status := FND_API.G_RET_STS_SUCCESS;

3000: FND_MSG_PUB.Add;
3001: p_return_status := FND_API.G_RET_STS_ERROR;
3002: end if;
3003: end if;
3004: p_return_status := FND_API.G_RET_STS_SUCCESS;
3005: p_lines_read := l_lines_read;
3006: p_eof_flag := 'Y';
3007: p_index := l_index;
3008: WHEN INVALID_CURSOR THEN

Line 3016: p_return_status := FND_API.G_RET_STS_ERROR;

3012: FND_MESSAGE.SET_NAME('AK','AK_UNEXPECTED_EOF_ERROR');
3013: FND_MSG_PUB.Add;
3014: end if;
3015: end if;
3016: p_return_status := FND_API.G_RET_STS_ERROR;
3017: p_lines_read := l_lines_read;
3018: p_eof_flag := 'Y';
3019: p_index := l_index;
3020: WHEN OTHERS THEN

Line 3021: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3017: p_lines_read := l_lines_read;
3018: p_eof_flag := 'Y';
3019: p_index := l_index;
3020: WHEN OTHERS THEN
3021: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3022: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3023: SUBSTR (SQLERRM, 1, 240) );
3024: p_eof_flag := 'Y';
3025: p_lines_read := l_lines_read;

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

3066: -- LAST_UPDATE_LOGIN who column.
3067: --=======================================================
3068: procedure SET_WHO (
3069: p_return_status OUT NOCOPY VARCHAR2,
3070: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3071: p_created_by OUT NOCOPY NUMBER,
3072: p_creation_date OUT NOCOPY DATE,
3073: p_last_updated_by OUT NOCOPY NUMBER,
3074: p_last_update_date OUT NOCOPY DATE,

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

3080:
3081: if AK_UPLOAD_GRP.G_UPLOAD_DATE is null then
3082: AK_UPLOAD_GRP.G_UPLOAD_DATE := AK_UPLOAD_GRP.G_GEN_DATE;
3083: end if;
3084: if (p_loader_timestamp <> FND_API.G_MISS_DATE) then
3085: l_file_version := AK_ON_OBJECTS_PUB.G_UPLOAD_FILE_VERSION;
3086: if ( l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER1 or
3087: l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER2 or
3088: l_file_version = AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER3 or

Line 3105: raise FND_API.G_EXC_ERROR;

3101: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3102: FND_MESSAGE.SET_NAME('AK','AK_MISSING_GEN_DATE');
3103: FND_MSG_PUB.Add;
3104: end if;
3105: raise FND_API.G_EXC_ERROR;
3106: end if;
3107: p_created_by := 1;
3108: p_creation_date := AK_UPLOAD_GRP.G_UPLOAD_DATE;
3109: p_last_updated_by := 1;

Line 3131: p_return_status := FND_API.G_RET_STS_SUCCESS;

3127: p_last_update_login := to_number(
3128: nvl(fnd_profile.value('LOGIN_ID'),0));
3129: end if;
3130:
3131: p_return_status := FND_API.G_RET_STS_SUCCESS;
3132:
3133: EXCEPTION
3134: WHEN FND_API.G_EXC_ERROR THEN
3135: p_return_status := FND_API.G_RET_STS_ERROR;

Line 3134: WHEN FND_API.G_EXC_ERROR THEN

3130:
3131: p_return_status := FND_API.G_RET_STS_SUCCESS;
3132:
3133: EXCEPTION
3134: WHEN FND_API.G_EXC_ERROR THEN
3135: p_return_status := FND_API.G_RET_STS_ERROR;
3136: WHEN OTHERS THEN
3137: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3138: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3135: p_return_status := FND_API.G_RET_STS_ERROR;

3131: p_return_status := FND_API.G_RET_STS_SUCCESS;
3132:
3133: EXCEPTION
3134: WHEN FND_API.G_EXC_ERROR THEN
3135: p_return_status := FND_API.G_RET_STS_ERROR;
3136: WHEN OTHERS THEN
3137: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3138: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3139: SUBSTR (SQLERRM, 1, 240) );

Line 3137: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3133: EXCEPTION
3134: WHEN FND_API.G_EXC_ERROR THEN
3135: p_return_status := FND_API.G_RET_STS_ERROR;
3136: WHEN OTHERS THEN
3137: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3138: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3139: SUBSTR (SQLERRM, 1, 240) );
3140: END SET_WHO;
3141:

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

3187: -- p_db_id - LAST_UPDATED_BY of db row
3188: -- p_db_lud - LAST_UPDATE_DATE of db row
3189: -- p_custom_mode - CUSTOM_MODE FNDLOAD parameter value
3190: function IS_UPDATEABLE (
3191: p_loader_timestamp IN DATE := FND_API.G_MISS_DATE,
3192: p_created_by IN OUT NOCOPY NUMBER,
3193: p_creation_date IN OUT NOCOPY DATE,
3194: p_last_updated_by IN OUT NOCOPY NUMBER,
3195: p_db_last_updated_by IN NUMBER,

Line 3342: p_return_status := FND_API.G_RET_STS_SUCCESS;

3338: --
3339: -- return without doing anything if buffer is empty
3340: --
3341: if (p_buffer_tbl.count = 0) then
3342: p_return_status := FND_API.G_RET_STS_SUCCESS;
3343: return;
3344: end if;
3345:
3346: --

Line 3355: raise FND_API.G_EXC_ERROR;

3351: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3352: FND_MESSAGE.SET_NAME('AK','AK_INVALID_WRITE_MODE');
3353: FND_MSG_PUB.Add;
3354: end if;
3355: raise FND_API.G_EXC_ERROR;
3356: end if;
3357:
3358: -- If it's append mode, start appending to the end of the global table
3359: --

Line 3410: p_return_status := FND_API.G_RET_STS_SUCCESS;

3406: end if;
3407:
3408: END LOOP;
3409:
3410: p_return_status := FND_API.G_RET_STS_SUCCESS;
3411:
3412: EXCEPTION
3413: WHEN FND_API.G_EXC_ERROR THEN
3414: p_return_status := FND_API.G_RET_STS_ERROR;

Line 3413: WHEN FND_API.G_EXC_ERROR THEN

3409:
3410: p_return_status := FND_API.G_RET_STS_SUCCESS;
3411:
3412: EXCEPTION
3413: WHEN FND_API.G_EXC_ERROR THEN
3414: p_return_status := FND_API.G_RET_STS_ERROR;
3415: WHEN OTHERS THEN
3416: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3417: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3414: p_return_status := FND_API.G_RET_STS_ERROR;

3410: p_return_status := FND_API.G_RET_STS_SUCCESS;
3411:
3412: EXCEPTION
3413: WHEN FND_API.G_EXC_ERROR THEN
3414: p_return_status := FND_API.G_RET_STS_ERROR;
3415: WHEN OTHERS THEN
3416: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3417: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3418: SUBSTR (SQLERRM, 1, 240) );

Line 3416: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3412: EXCEPTION
3413: WHEN FND_API.G_EXC_ERROR THEN
3414: p_return_status := FND_API.G_RET_STS_ERROR;
3415: WHEN OTHERS THEN
3416: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3417: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3418: SUBSTR (SQLERRM, 1, 240) );
3419: end WRITE_FILE;
3420:

Line 3467: p_return_status := FND_API.G_RET_STS_SUCCESS;

3463: --
3464: -- return without doing anything if buffer is empty
3465: --
3466: if (p_buffer_tbl.count = 0) then
3467: p_return_status := FND_API.G_RET_STS_SUCCESS;
3468: --G_LOG_BUFFER_TBL.DELETE;
3469: return;
3470: end if;
3471:

Line 3481: raise FND_API.G_EXC_ERROR;

3477: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
3478: FND_MESSAGE.SET_NAME('AK','AK_INVALID_WRITE_MODE');
3479: FND_MSG_PUB.Add;
3480: end if;
3481: raise FND_API.G_EXC_ERROR;
3482: end if;
3483:
3484: -- If it's append mode, start appending to the end of the global table
3485: --

Line 3525: p_return_status := FND_API.G_RET_STS_SUCCESS;

3521: l_buf_written := l_buf_written + l_char_to_write;
3522: END LOOP;
3523: end if;
3524: END LOOP;
3525: p_return_status := FND_API.G_RET_STS_SUCCESS;
3526:
3527: EXCEPTION
3528: WHEN STORAGE_ERROR THEN
3529: p_return_status := FND_API.G_RET_STS_ERROR;

Line 3529: p_return_status := FND_API.G_RET_STS_ERROR;

3525: p_return_status := FND_API.G_RET_STS_SUCCESS;
3526:
3527: EXCEPTION
3528: WHEN STORAGE_ERROR THEN
3529: p_return_status := FND_API.G_RET_STS_ERROR;
3530: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3531: SUBSTR (SQLERRM, 1, 240) );
3532: WHEN OTHERS THEN
3533: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3533: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3529: p_return_status := FND_API.G_RET_STS_ERROR;
3530: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3531: SUBSTR (SQLERRM, 1, 240) );
3532: WHEN OTHERS THEN
3533: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3534: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3535: SUBSTR (SQLERRM, 1, 240) );
3536: end WRITE_LOG_FILE;
3537:

Line 3624: IF NOT FND_API.Compatible_API_Call (

3620: l_api_version_number CONSTANT number := 1.0;
3621: l_api_name CONSTANT varchar2(30) := 'Valid_Application_ID';
3622: l_dummy number;
3623: begin
3624: IF NOT FND_API.Compatible_API_Call (
3625: l_api_version_number, p_api_version_number, l_api_name,
3626: G_PKG_NAME) then
3627: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3628: return FALSE;

Line 3627: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3623: begin
3624: IF NOT FND_API.Compatible_API_Call (
3625: l_api_version_number, p_api_version_number, l_api_name,
3626: G_PKG_NAME) then
3627: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3628: return FALSE;
3629: END IF;
3630:
3631: open l_check_appl_id_csr;

Line 3635: p_return_status := FND_API.G_RET_STS_SUCCESS;

3631: open l_check_appl_id_csr;
3632: fetch l_check_appl_id_csr into l_dummy;
3633: if (l_check_appl_id_csr%notfound) then
3634: close l_check_appl_id_csr;
3635: p_return_status := FND_API.G_RET_STS_SUCCESS;
3636: return FALSE;
3637: else
3638: close l_check_appl_id_csr;
3639: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3639: p_return_status := FND_API.G_RET_STS_SUCCESS;

3635: p_return_status := FND_API.G_RET_STS_SUCCESS;
3636: return FALSE;
3637: else
3638: close l_check_appl_id_csr;
3639: p_return_status := FND_API.G_RET_STS_SUCCESS;
3640: return TRUE;
3641: end if;
3642:
3643: EXCEPTION

Line 3644: WHEN FND_API.G_EXC_ERROR THEN

3640: return TRUE;
3641: end if;
3642:
3643: EXCEPTION
3644: WHEN FND_API.G_EXC_ERROR THEN
3645: p_return_status := FND_API.G_RET_STS_ERROR;
3646: return FALSE;
3647: WHEN OTHERS THEN
3648: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3645: p_return_status := FND_API.G_RET_STS_ERROR;

3641: end if;
3642:
3643: EXCEPTION
3644: WHEN FND_API.G_EXC_ERROR THEN
3645: p_return_status := FND_API.G_RET_STS_ERROR;
3646: return FALSE;
3647: WHEN OTHERS THEN
3648: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3649: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3648: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3644: WHEN FND_API.G_EXC_ERROR THEN
3645: p_return_status := FND_API.G_RET_STS_ERROR;
3646: return FALSE;
3647: WHEN OTHERS THEN
3648: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3649: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3650: SUBSTR (SQLERRM, 1, 240) );
3651: return FALSE;
3652: end VALID_APPLICATION_ID;

Line 3696: IF NOT FND_API.Compatible_API_Call (

3692: l_api_version_number CONSTANT number := 1.0;
3693: l_api_name CONSTANT varchar2(30) := 'Valid_Application_ID';
3694: l_dummy number;
3695: begin
3696: IF NOT FND_API.Compatible_API_Call (
3697: l_api_version_number, p_api_version_number, l_api_name,
3698: G_PKG_NAME) then
3699: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3700: return FALSE;

Line 3699: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3695: begin
3696: IF NOT FND_API.Compatible_API_Call (
3697: l_api_version_number, p_api_version_number, l_api_name,
3698: G_PKG_NAME) then
3699: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3700: return FALSE;
3701: END IF;
3702:
3703: open l_checklookup_csr (p_lookup_type, p_lookup_code);

Line 3707: p_return_status := FND_API.G_RET_STS_SUCCESS;

3703: open l_checklookup_csr (p_lookup_type, p_lookup_code);
3704: fetch l_checklookup_csr into l_dummy;
3705: if (l_checklookup_csr%notfound) then
3706: close l_checklookup_csr;
3707: p_return_status := FND_API.G_RET_STS_SUCCESS;
3708: return FALSE;
3709: else
3710: close l_checklookup_csr;
3711: p_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3711: p_return_status := FND_API.G_RET_STS_SUCCESS;

3707: p_return_status := FND_API.G_RET_STS_SUCCESS;
3708: return FALSE;
3709: else
3710: close l_checklookup_csr;
3711: p_return_status := FND_API.G_RET_STS_SUCCESS;
3712: return TRUE;
3713: end if;
3714:
3715: EXCEPTION

Line 3716: WHEN FND_API.G_EXC_ERROR THEN

3712: return TRUE;
3713: end if;
3714:
3715: EXCEPTION
3716: WHEN FND_API.G_EXC_ERROR THEN
3717: p_return_status := FND_API.G_RET_STS_ERROR;
3718: return FALSE;
3719: WHEN OTHERS THEN
3720: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3717: p_return_status := FND_API.G_RET_STS_ERROR;

3713: end if;
3714:
3715: EXCEPTION
3716: WHEN FND_API.G_EXC_ERROR THEN
3717: p_return_status := FND_API.G_RET_STS_ERROR;
3718: return FALSE;
3719: WHEN OTHERS THEN
3720: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3721: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,

Line 3720: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3716: WHEN FND_API.G_EXC_ERROR THEN
3717: p_return_status := FND_API.G_RET_STS_ERROR;
3718: return FALSE;
3719: WHEN OTHERS THEN
3720: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3721: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
3722: SUBSTR (SQLERRM, 1, 240) );
3723: return FALSE;
3724: end VALID_LOOKUP_CODE;