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');
265: FND_MSG_PUB.Add;
266: end if;
267: raise FND_API.G_EXC_ERROR;
268: end if;
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;
286: --else
287: -- /***********************************************/
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
293: FND_MESSAGE.SET_NAME('AK','AK_APPL_SHORT_NAME_INVALID');
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;
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
293: FND_MESSAGE.SET_NAME('AK','AK_APPL_SHORT_NAME_INVALID');
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;
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;
2031: p_return_status := FND_API.G_RET_STS_ERROR;
2032: WHEN OTHERS THEN
2180: -- the file, there is nothing to be processed in this file
2181: --
2182: if (l_buffer is null and l_eof_flag = 'Y' and l_tbl_index = G_UPL_TABLE_NUM) then
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;
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;
2211: raise FND_API.G_EXC_ERROR;
2212: end if;
2222: -- Language and codeset, and extract_by_object are required.
2223: --
2224: if (l_language is null) or (l_extract_by_obj is null) then
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
2240: elsif (l_token = 'DEFINE') then
2241: l_state := 10;
2242: else
2243: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2244: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2245: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2246: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2247: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN, LANGUAGE, CODESET, ' ||
2248: 'EXTRACT_BY_OBJECT, EXTRACT_BY_APPLICATION');
2241: l_state := 10;
2242: else
2243: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2244: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2245: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2246: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2247: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN, LANGUAGE, CODESET, ' ||
2248: 'EXTRACT_BY_OBJECT, EXTRACT_BY_APPLICATION');
2249: FND_MSG_PUB.Add;
2242: else
2243: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2244: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2245: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2246: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2247: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN, LANGUAGE, CODESET, ' ||
2248: 'EXTRACT_BY_OBJECT, EXTRACT_BY_APPLICATION');
2249: FND_MSG_PUB.Add;
2250: end if;
2243: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2244: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2245: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2246: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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;
2254: if (l_token = '=') then
2255: l_state := 2;
2256: else
2257: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2258: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2259: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2260: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2261: FND_MESSAGE.SET_TOKEN('EXPECTED','=');
2262: FND_MSG_PUB.Add;
2255: l_state := 2;
2256: else
2257: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2258: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2259: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2260: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2261: FND_MESSAGE.SET_TOKEN('EXPECTED','=');
2262: FND_MSG_PUB.Add;
2263: end if;
2256: else
2257: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2258: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2259: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2260: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2261: FND_MESSAGE.SET_TOKEN('EXPECTED','=');
2262: FND_MSG_PUB.Add;
2263: end if;
2264: --dbms_output.put_line('Expecting =');
2257: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2258: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2259: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2260: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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;
2276: AK_ON_OBJECTS_PVT.G_SECURITY,
2277: AK_ON_OBJECTS_PVT.G_QUERYOBJ,
2278: AK_ON_OBJECTS_PVT.G_AMPARAM_REGISTRY) ) then
2279: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
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;
2277: AK_ON_OBJECTS_PVT.G_QUERYOBJ,
2278: AK_ON_OBJECTS_PVT.G_AMPARAM_REGISTRY) ) then
2279: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
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
2304: l_file_version <> AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER12 and
2305: l_file_version <> AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER14 and
2306: l_file_version <> AK_ON_OBJECTS_PUB.G_OLD_FILE_FORMAT_VER15) then
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
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');
2316: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2317: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2318: FND_MESSAGE.SET_TOKEN('EXPECTED',l_column);
2319: FND_MSG_PUB.Add;
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');
2316: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2317: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2318: FND_MESSAGE.SET_TOKEN('EXPECTED',l_column);
2319: FND_MSG_PUB.Add;
2320: end if;
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');
2316: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2317: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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');
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');
2316: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2317: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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;
2326: if (l_token = 'BEGIN') then
2327: l_state := 5;
2328: else
2329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2330: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2331: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2332: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2333: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN');
2334: FND_MSG_PUB.Add;
2327: l_state := 5;
2328: else
2329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2330: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2331: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2332: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2333: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN');
2334: FND_MSG_PUB.Add;
2335: end if;
2328: else
2329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2330: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2331: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2332: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2333: FND_MESSAGE.SET_TOKEN('EXPECTED','BEGIN');
2334: FND_MSG_PUB.Add;
2335: end if;
2336: -- dbms_output.put_line('Expecting BEGIN');
2329: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2330: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2331: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2332: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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;
2672: else
2673: -- dbms_output.put_line('Expecting ATTRIBUTE, OBJECT, REGION, FLOW,
2674: -- EXCLUDED_ITEMS or RESP_SECURITY_ATTRIBUTES');
2675: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2676: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2677: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2678: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2679: FND_MESSAGE.SET_TOKEN('EXPECTED','ATTRIBUTE, OBJECT, REGION,
2680: FLOW, EXCLUDED_ITEMS, RESP_SECURITY_ATTRIBUTES OR QUERY_OBJECT');
2673: -- dbms_output.put_line('Expecting ATTRIBUTE, OBJECT, REGION, FLOW,
2674: -- EXCLUDED_ITEMS or RESP_SECURITY_ATTRIBUTES');
2675: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2676: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2677: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2678: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2679: FND_MESSAGE.SET_TOKEN('EXPECTED','ATTRIBUTE, OBJECT, REGION,
2680: FLOW, EXCLUDED_ITEMS, RESP_SECURITY_ATTRIBUTES OR QUERY_OBJECT');
2681: FND_MSG_PUB.Add;
2674: -- EXCLUDED_ITEMS or RESP_SECURITY_ATTRIBUTES');
2675: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2676: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2677: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2678: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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;
2675: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2676: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2677: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2678: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
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;
2694: if (l_token = 'END') then
2695: l_state := 12;
2696: elsif (l_token = 'BEGIN') then
2697: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2698: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2699: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
2700: FND_MESSAGE.SET_TOKEN('TOKEN',l_token);
2701: FND_MESSAGE.SET_TOKEN('EXPECTED', 'END ' || l_object_name);
2702: FND_MSG_PUB.Add;
2695: l_state := 12;
2696: elsif (l_token = 'BEGIN') then
2697: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2698: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2699: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
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;
2696: elsif (l_token = 'BEGIN') then
2697: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2698: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2699: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
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;
2697: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2698: FND_MESSAGE.SET_NAME('AK','AK_PARSE_ERROR');
2699: FND_MESSAGE.SET_TOKEN('LINENUM', to_char(l_line_num));
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;
2751: --
2752: -- Write a '# lines processed message' to the message stack
2753: --
2754: -- dbms_output.put_line(to_char(l_line_num) || ' lines processed.');
2755: -- FND_MESSAGE.SET_NAME('AK','AK_LINES_PROCESSED');
2756: -- FND_MESSAGE.SET_TOKEN('NUMLINES', to_char(l_line_num));
2757: -- FND_MSG_PUB.Add;
2758:
2759: -- ************* Starts second pass *****************
2752: -- Write a '# lines processed message' to the message stack
2753: --
2754: -- dbms_output.put_line(to_char(l_line_num) || ' lines processed.');
2755: -- FND_MESSAGE.SET_NAME('AK','AK_LINES_PROCESSED');
2756: -- FND_MESSAGE.SET_TOKEN('NUMLINES', to_char(l_line_num));
2757: -- FND_MSG_PUB.Add;
2758:
2759: -- ************* Starts second pass *****************
2760:
2762: --
2763: -- Write message informing user whether this is the first pass or the
2764: -- second pass at reading the input file
2765: --
2766: FND_MESSAGE.SET_NAME('AK','AK_UPLOAD_PASS2' || to_char(l_index));
2767: FND_MSG_PUB.Add;
2768:
2769: AK_ATTRIBUTE_PVT.UPLOAD_ATTRIBUTE_SECOND (
2770: p_validation_level => p_validation_level,
3090: EXCEPTION
3091: WHEN NO_DATA_FOUND THEN
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;
3103: WHEN INVALID_CURSOR THEN
3104: --dbms_output.put_line('Invalid cursor');
3105: if not l_done then
3106: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) then
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;
3193: if (AK_UPLOAD_GRP.G_UPLOAD_DATE is null and AK_UPLOAD_GRP.G_COMPARE_UPDATE = FALSE) then
3194: AK_UPLOAD_GRP.G_UPLOAD_DATE := p_loader_timestamp;
3195: elsif (AK_UPLOAD_GRP.G_UPLOAD_DATE is null and AK_UPLOAD_GRP.G_COMPARE_UPDATE = TRUE) then
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;
3443: --
3444: if (p_write_mode <> AK_ON_OBJECTS_PUB.G_APPEND) and
3445: (p_write_mode <> AK_ON_OBJECTS_PUB.G_OVERWRITE) then
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;
3569: --
3570: if (p_write_mode <> AK_ON_OBJECTS_PUB.G_APPEND) and
3571: (p_write_mode <> AK_ON_OBJECTS_PUB.G_OVERWRITE) then
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;
3663:
3664: EXCEPTION
3665: WHEN insert_err THEN
3666: -- dbms_output.put_line('Exception insert_err ak_loader_temp');
3667: FND_MESSAGE.SET_NAME('AK','AK_LOADER_TEMP_EXCEPTION');
3668: FND_MSG_PUB.Add;
3669: WHEN OTHERS THEN
3670: FND_MESSAGE.SET_NAME('AK','AK_LOADER_TEMP_ERROR');
3671: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3666: -- dbms_output.put_line('Exception insert_err ak_loader_temp');
3667: FND_MESSAGE.SET_NAME('AK','AK_LOADER_TEMP_EXCEPTION');
3668: FND_MSG_PUB.Add;
3669: WHEN OTHERS THEN
3670: FND_MESSAGE.SET_NAME('AK','AK_LOADER_TEMP_ERROR');
3671: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
3672: SUBSTR (SQLERRM, 1, 240) );
3673: FND_MSG_PUB.Add;
3674: -- err_num := SQLCODE;