90: l_dtt_file_name VARCHAR2(50);
91:
92: BEGIN
93:
94: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
95:
96: IF (g_debug_on) THEN
97: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_FileName);
98: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_LoadId);
93:
94: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
95:
96: IF (g_debug_on) THEN
97: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_FileName);
98: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_LoadId);
99: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Type ', p_FileType);
100: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load Type ', p_LoadType);
101: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Request ID', p_RequestId);
94: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
95:
96: IF (g_debug_on) THEN
97: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_FileName);
98: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_LoadId);
99: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Type ', p_FileType);
100: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load Type ', p_LoadType);
101: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Request ID', p_RequestId);
102: END IF;
95:
96: IF (g_debug_on) THEN
97: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_FileName);
98: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_LoadId);
99: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Type ', p_FileType);
100: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load Type ', p_LoadType);
101: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Request ID', p_RequestId);
102: END IF;
103:
96: IF (g_debug_on) THEN
97: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_FileName);
98: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_LoadId);
99: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Type ', p_FileType);
100: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load Type ', p_LoadType);
101: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Request ID', p_RequestId);
102: END IF;
103:
104: IF (p_LoadType NOT IN ('LTL_ASSOC', 'DTT_DWNLD')) THEN
97: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_FileName);
98: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_LoadId);
99: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Type ', p_FileType);
100: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load Type ', p_LoadType);
101: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Request ID', p_RequestId);
102: END IF;
103:
104: IF (p_LoadType NOT IN ('LTL_ASSOC', 'DTT_DWNLD')) THEN
105: IF p_FileName IS NULL THEN
103:
104: IF (p_LoadType NOT IN ('LTL_ASSOC', 'DTT_DWNLD')) THEN
105: IF p_FileName IS NULL THEN
106: IF (g_debug_on) THEN
107: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'No filename supplied', WSH_DEBUG_SV.c_proc_level);
108: END IF;
109: FTE_UTIL_PKG.Exit_Debug(l_module_name);
110: RETURN 1;
111: END IF;
105: IF p_FileName IS NULL THEN
106: IF (g_debug_on) THEN
107: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'No filename supplied', WSH_DEBUG_SV.c_proc_level);
108: END IF;
109: FTE_UTIL_PKG.Exit_Debug(l_module_name);
110: RETURN 1;
111: END IF;
112: END IF;
113:
121: v_FileLocator := BFILENAME('UPLOAD_DIR', p_FileName);
122: v_FileExists := DBMS_LOB.FILEEXISTS(v_FileLocator);
123: IF v_FileExists <> 1 THEN
124: IF (g_debug_on) THEN
125: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Not Found', WSH_DEBUG_SV.c_proc_level);
126: END IF;
127: FTE_UTIL_PKG.Exit_Debug(l_module_name);
128: RETURN 1;
129: END IF;
123: IF v_FileExists <> 1 THEN
124: IF (g_debug_on) THEN
125: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Not Found', WSH_DEBUG_SV.c_proc_level);
126: END IF;
127: FTE_UTIL_PKG.Exit_Debug(l_module_name);
128: RETURN 1;
129: END IF;
130: END IF;
131:
147: --+
148:
149: IF (length(l_dtt_file_name) <> 8) THEN
150: IF (g_debug_on) THEN
151: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'DTT filename supplied is invalid - invalid length',
152: WSH_DEBUG_SV.c_proc_level);
153: END IF;
154: FTE_UTIL_PKG.Exit_Debug(l_module_name);
155: RETURN 3;
150: IF (g_debug_on) THEN
151: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'DTT filename supplied is invalid - invalid length',
152: WSH_DEBUG_SV.c_proc_level);
153: END IF;
154: FTE_UTIL_PKG.Exit_Debug(l_module_name);
155: RETURN 3;
156: END IF;
157:
158: l_dtt_file_check := null;
165: --+
166: -- Upload File is invalid
167: --+
168: IF (g_debug_on) THEN
169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'DTT filename supplied is invalid - not associated with a template',
170: WSH_DEBUG_SV.c_proc_level);
171: END IF;
172: FTE_UTIL_PKG.Exit_Debug(l_module_name);
173: RETURN 2;
168: IF (g_debug_on) THEN
169: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'DTT filename supplied is invalid - not associated with a template',
170: WSH_DEBUG_SV.c_proc_level);
171: END IF;
172: FTE_UTIL_PKG.Exit_Debug(l_module_name);
173: RETURN 2;
174: END IF;
175: END IF;
176: --+
194: VALUES (p_LoadId, p_LoadType, p_FileType, p_FileName,
195: 0, p_RequestId, EMPTY_BLOB(), FND_GLOBAL.USER_ID,
196: v_LastUpdateDate, FND_GLOBAL.USER_ID, v_LastUpdateDate, FND_GLOBAL.USER_ID);
197:
198: FTE_UTIL_PKG.Exit_Debug(l_module_name);
199: RETURN 0;
200: END;
201: EXCEPTION
202: WHEN OTHERS THEN
203: IF (c_check_dtt_file%ISOPEN) THEN
204: CLOSE c_check_dtt_file;
205: END IF;
206:
207: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
208: p_msg => sqlerrm,
209: p_category => 'O');
210: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
211: RETURN 4;
206:
207: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
208: p_msg => sqlerrm,
209: p_category => 'O');
210: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
211: RETURN 4;
212: END SUBMIT_DATA;
213:
214: -----------------------------------------------------------------------------
247: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.ADD_ROW';
248: l_count NUMBER;
249:
250: BEGIN
251: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
252:
253: IF (g_debug_on) THEN
254: FOR i in 1..p_tokens.COUNT LOOP
255: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_tokens i', p_tokens(i));
251: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
252:
253: IF (g_debug_on) THEN
254: FOR i in 1..p_tokens.COUNT LOOP
255: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_tokens i', p_tokens(i));
256: END LOOP;
257: IF (p_col) THEN
258: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_col', 'TRUE');
259: ELSE
254: FOR i in 1..p_tokens.COUNT LOOP
255: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_tokens i', p_tokens(i));
256: END LOOP;
257: IF (p_col) THEN
258: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_col', 'TRUE');
259: ELSE
260: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_col', 'FALSE');
261: END IF;
262: END IF;
256: END LOOP;
257: IF (p_col) THEN
258: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_col', 'TRUE');
259: ELSE
260: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_col', 'FALSE');
261: END IF;
262: END IF;
263:
264: IF (p_block_data IS NULL) THEN
289:
290: IF (g_debug_on) THEN
291: FOR i in 1..g_block_header_index.COUNT LOOP
292: IF (p_block_data.COUNT > 0) THEN
293: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, g_block_header_index(i), p_block_data(l_count)(g_block_header_index(i)));
294: ELSE
295: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, g_block_header_index(i));
296: END IF;
297: END LOOP;
291: FOR i in 1..g_block_header_index.COUNT LOOP
292: IF (p_block_data.COUNT > 0) THEN
293: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, g_block_header_index(i), p_block_data(l_count)(g_block_header_index(i)));
294: ELSE
295: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, g_block_header_index(i));
296: END IF;
297: END LOOP;
298: END IF;
299:
296: END IF;
297: END LOOP;
298: END IF;
299:
300: FTE_UTIL_PKG.Exit_Debug(l_module_name);
301: RETURN -1;
302:
303: EXCEPTION
304: WHEN OTHERS THEN
301: RETURN -1;
302:
303: EXCEPTION
304: WHEN OTHERS THEN
305: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
306: p_msg => sqlerrm,
307: p_category => 'O');
308: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
309: RETURN 1;
304: WHEN OTHERS THEN
305: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
306: p_msg => sqlerrm,
307: p_category => 'O');
308: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
309: RETURN 1;
310: END ADD_ROW;
311:
312: -----------------------------------------------------------------------------
356: x_status NUMBER := -1;
357:
358: BEGIN
359:
360: FTE_UTIL_PKG.INIT_DEBUG(p_user_debug);
361: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
362:
363: IF (g_debug_on) THEN
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
357:
358: BEGIN
359:
360: FTE_UTIL_PKG.INIT_DEBUG(p_user_debug);
361: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
362:
363: IF (g_debug_on) THEN
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
360: FTE_UTIL_PKG.INIT_DEBUG(p_user_debug);
361: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
362:
363: IF (g_debug_on) THEN
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
361: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
362:
363: IF (g_debug_on) THEN
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
362:
363: IF (g_debug_on) THEN
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
363: IF (g_debug_on) THEN
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
364: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name ', p_src_filename);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
372: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name ', p_tariff_name);
365: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID ', p_load_id);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
372: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name ', p_tariff_name);
373: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'User Debug ', p_user_debug);
366: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Currency ', p_currency);
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
372: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name ', p_tariff_name);
373: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'User Debug ', p_user_debug);
374: END IF;
367: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'UOM code ', p_uom_code);
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
372: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name ', p_tariff_name);
373: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'User Debug ', p_user_debug);
374: END IF;
375:
368: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Origin Country', p_origin_country);
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
372: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name ', p_tariff_name);
373: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'User Debug ', p_user_debug);
374: END IF;
375:
376: fnd_global.apps_initialize(user_id => p_user_id,
369: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Dest Country ', p_dest_country);
370: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Service code ', p_service_code);
371: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Action code ', p_action_code);
372: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Tariff Name ', p_tariff_name);
373: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'User Debug ', p_user_debug);
374: END IF;
375:
376: fnd_global.apps_initialize(user_id => p_user_id,
377: resp_id => p_resp_id,
407: x_error_msg := fnd_message.get;
408: COMMIT;
409:
410: IF (g_debug_on) THEN
411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_error_msg ', x_error_msg);
412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_request_id', x_request_id);
413: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_user_id ', p_user_id);
414: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_id ',p_resp_id);
415: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_appl_id', p_resp_appl_id);
408: COMMIT;
409:
410: IF (g_debug_on) THEN
411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_error_msg ', x_error_msg);
412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_request_id', x_request_id);
413: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_user_id ', p_user_id);
414: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_id ',p_resp_id);
415: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_appl_id', p_resp_appl_id);
416: END IF;
409:
410: IF (g_debug_on) THEN
411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_error_msg ', x_error_msg);
412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_request_id', x_request_id);
413: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_user_id ', p_user_id);
414: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_id ',p_resp_id);
415: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_appl_id', p_resp_appl_id);
416: END IF;
417:
410: IF (g_debug_on) THEN
411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_error_msg ', x_error_msg);
412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_request_id', x_request_id);
413: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_user_id ', p_user_id);
414: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_id ',p_resp_id);
415: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_appl_id', p_resp_appl_id);
416: END IF;
417:
418: FTE_UTIL_PKG.Exit_Debug(l_module_name);
411: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_error_msg ', x_error_msg);
412: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'x_request_id', x_request_id);
413: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_user_id ', p_user_id);
414: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_id ',p_resp_id);
415: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_appl_id', p_resp_appl_id);
416: END IF;
417:
418: FTE_UTIL_PKG.Exit_Debug(l_module_name);
419: EXCEPTION
414: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_id ',p_resp_id);
415: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'p_resp_appl_id', p_resp_appl_id);
416: END IF;
417:
418: FTE_UTIL_PKG.Exit_Debug(l_module_name);
419: EXCEPTION
420: WHEN OTHERS THEN
421: x_error_msg := sqlerrm;
422: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
418: FTE_UTIL_PKG.Exit_Debug(l_module_name);
419: EXCEPTION
420: WHEN OTHERS THEN
421: x_error_msg := sqlerrm;
422: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
423: p_msg => x_error_msg,
424: p_category => 'O');
425: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
426: END LOAD_FILE;
421: x_error_msg := sqlerrm;
422: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
423: p_msg => x_error_msg,
424: p_category => 'O');
425: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
426: END LOAD_FILE;
427:
428: ------------------------------------------------------------------------------------
429: -- Procedure: PROCESS_BLOCK
449: x_error_msg OUT NOCOPY VARCHAR2) IS
450:
451: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.PROCESS_BLOCK';
452: BEGIN
453: FTE_UTIL_PKG.ENTER_DEBUG(l_module_name);
454:
455: x_status := -1;
456:
457: IF (p_block_type IN ('RATE_CHART', 'RATE_LINE', 'RATE_BREAK','RATING_ATTRIBUTE',
492: x_status => x_status,
493: x_error_msg => x_error_msg);
494: ELSE
495: x_status := 2;
496: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_TYPE_UNKNOWN',
497: P_Tokens => STRINGARRAY('TYPE'),
498: P_values => STRINGARRAY(p_block_type));
499: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
500: p_msg => x_error_msg,
495: x_status := 2;
496: x_error_msg := FTE_UTIL_PKG.GET_MSG(P_Name => 'FTE_TYPE_UNKNOWN',
497: P_Tokens => STRINGARRAY('TYPE'),
498: P_values => STRINGARRAY(p_block_type));
499: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
500: p_msg => x_error_msg,
501: p_category => 'D',
502: p_line_number => p_line_number);
503: END IF;
501: p_category => 'D',
502: p_line_number => p_line_number);
503: END IF;
504:
505: FTE_UTIL_PKG.Exit_Debug(l_module_name);
506:
507: EXCEPTION
508: WHEN OTHERS THEN
509: x_status := 2;
507: EXCEPTION
508: WHEN OTHERS THEN
509: x_status := 2;
510: x_error_msg := sqlerrm;
511: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
512: p_msg => x_error_msg,
513: p_category => 'O',
514: p_line_number => p_line_number-1);
515: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
511: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
512: p_msg => x_error_msg,
513: p_category => 'O',
514: p_line_number => p_line_number-1);
515: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
516:
517: END PROCESS_BLOCK;
518:
519: ---------------------------------------------------------------------------------------------------
550: l_block_header block_header_tbl;
551: l_block_data block_data_tbl;
552:
553: BEGIN
554: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
555: x_status := -1;
556:
557: IF (g_debug_on) THEN
558: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_file_name);
554: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
555: x_status := -1;
556:
557: IF (g_debug_on) THEN
558: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_file_name);
559: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_load_id);
560: END IF;
561:
562: l_src_file_dir := Fte_Bulkload_Pkg.Get_Upload_Dir;
555: x_status := -1;
556:
557: IF (g_debug_on) THEN
558: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_file_name);
559: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_load_id);
560: END IF;
561:
562: l_src_file_dir := Fte_Bulkload_Pkg.Get_Upload_Dir;
563: x_chart_file := utl_file.fopen(l_src_file_dir, p_file_name, 'R');
586: IF ((replace(replace(l_line, g_tab, ''), ' ', '')) IS NOT NULL) THEN
587:
588: l_last_line_null := FALSE;
589:
590: l_tokens := FTE_UTIL_PKG.TOKENIZE_STRING(l_line, g_tab);
591:
592: x_status := ADD_ROW(l_tokens, l_block_header, l_block_data, l_column_line);
593:
594: IF (x_status = 1) THEN
592: x_status := ADD_ROW(l_tokens, l_block_header, l_block_data, l_column_line);
593:
594: IF (x_status = 1) THEN
595: -- too few values in p_tokens
596: FTE_UTIL_PKG.Exit_Debug(l_module_name);
597: RETURN;
598: ELSIF (x_status = 2) THEN
599: -- too many values in p_tokens
600: FTE_UTIL_PKG.Exit_Debug(l_module_name);
596: FTE_UTIL_PKG.Exit_Debug(l_module_name);
597: RETURN;
598: ELSIF (x_status = 2) THEN
599: -- too many values in p_tokens
600: FTE_UTIL_PKG.Exit_Debug(l_module_name);
601: RETURN;
602: END IF;
603:
604: IF (l_column_line) THEN -- if column line is this line, next line wont' be a column line
607: ELSE
608:
609: IF (l_column_line) THEN
610: --throw error about no information
611: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BLOCK_NO_LINE',
612: p_tokens => STRINGARRAY('BLOCK'),
613: p_values => STRINGARRAY(l_block_type));
614: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
615: p_msg => x_error_msg,
610: --throw error about no information
611: x_error_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BLOCK_NO_LINE',
612: p_tokens => STRINGARRAY('BLOCK'),
613: p_values => STRINGARRAY(l_block_type));
614: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
615: p_msg => x_error_msg,
616: p_category => 'A');
617:
618: FTE_UTIL_PKG.Exit_Debug(l_module_name);
614: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
615: p_msg => x_error_msg,
616: p_category => 'A');
617:
618: FTE_UTIL_PKG.Exit_Debug(l_module_name);
619: x_status := 1;
620: RETURN;
621: END IF;
622:
625: l_body_block := FALSE;
626: --call packages to process block
627:
628: IF (g_debug_on) THEN
629: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'l_block_type', l_block_type);
630: END IF;
631:
632: PROCESS_BLOCK(p_block_type => l_block_type,
633: p_block_header => l_block_header,
637: x_error_msg => x_error_msg);
638:
639: IF (x_status <> -1) THEN
640: --use line number to report the error
641: FTE_UTIL_PKG.Exit_Debug(l_module_name);
642: RETURN;
643: END IF;
644:
645: l_block_header.DELETE;
652: END IF;
653: END LOOP;
654:
655: IF (g_debug_on) THEN
656: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
657: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
658: END IF;
659:
660: FTE_UTIL_PKG.Exit_Debug(l_module_name);
653: END LOOP;
654:
655: IF (g_debug_on) THEN
656: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
657: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
658: END IF;
659:
660: FTE_UTIL_PKG.Exit_Debug(l_module_name);
661: EXCEPTION
656: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
657: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
658: END IF;
659:
660: FTE_UTIL_PKG.Exit_Debug(l_module_name);
661: EXCEPTION
662: WHEN NO_DATA_FOUND THEN
663: utl_file.fclose(x_chart_file);
664:
662: WHEN NO_DATA_FOUND THEN
663: utl_file.fclose(x_chart_file);
664:
665: IF (NOT l_last_line_null) THEN
666: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'l_block_type', l_block_type);
667: PROCESS_BLOCK(p_block_type => l_block_type,
668: p_block_header => l_block_header,
669: p_block_data => l_block_data,
670: p_line_number => l_processed_lines - l_block_data.COUNT-1,
672: x_error_msg => x_error_msg);
673:
674: IF (x_status <> -1) THEN
675: --use line number to report the error
676: FTE_UTIL_PKG.Exit_Debug(l_module_name);
677: RETURN;
678: END IF;
679:
680: l_block_header.DELETE;
684: END IF;
685: l_processed_lines := l_processed_lines +1;
686:
687: IF (g_debug_on) THEN
688: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
689: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
690: END IF;
691:
692: FTE_UTIL_PKG.Exit_Debug(l_module_name);
685: l_processed_lines := l_processed_lines +1;
686:
687: IF (g_debug_on) THEN
688: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
689: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
690: END IF;
691:
692: FTE_UTIL_PKG.Exit_Debug(l_module_name);
693: WHEN UTL_FILE.INVALID_PATH THEN
688: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
689: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
690: END IF;
691:
692: FTE_UTIL_PKG.Exit_Debug(l_module_name);
693: WHEN UTL_FILE.INVALID_PATH THEN
694: -- x_error_msg := 'File ' || l_src_file_dir || '/' || p_file_name || ' Not Accessible' ||
695: -- fnd_global.newline || 'Please make sure that the directory is accessible to UTL_FILE.';
696:
693: WHEN UTL_FILE.INVALID_PATH THEN
694: -- x_error_msg := 'File ' || l_src_file_dir || '/' || p_file_name || ' Not Accessible' ||
695: -- fnd_global.newline || 'Please make sure that the directory is accessible to UTL_FILE.';
696:
697: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
698: p_msg => 'FTE_FILE_NOT_ACCESSIBLE',
699: p_category => 'E');
700:
701: x_status := 2;
698: p_msg => 'FTE_FILE_NOT_ACCESSIBLE',
699: p_category => 'E');
700:
701: x_status := 2;
702: FTE_UTIL_PKG.Exit_Debug(l_module_name);
703: WHEN UTL_FILE.INVALID_OPERATION THEN
704: -- x_error_msg := 'ERROR: The file does not exist, or file or directory access was denied by the operating system.'
705: -- || fnd_global.newline || 'Please verify file and directory access privileges on the file system.';
706:
703: WHEN UTL_FILE.INVALID_OPERATION THEN
704: -- x_error_msg := 'ERROR: The file does not exist, or file or directory access was denied by the operating system.'
705: -- || fnd_global.newline || 'Please verify file and directory access privileges on the file system.';
706:
707: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
708: p_msg => 'FTE_FILE_NOT_EXIST',
709: p_category => 'E');
710:
711: x_status := 2;
708: p_msg => 'FTE_FILE_NOT_EXIST',
709: p_category => 'E');
710:
711: x_status := 2;
712: FTE_UTIL_PKG.Exit_Debug(l_module_name);
713: WHEN OTHERS THEN
714: x_error_msg := 'Unexpected error while reading file: [Row ' || l_processed_lines || '].'
715: || fnd_global.newline || l_line || fnd_global.newline || sqlerrm;
716:
713: WHEN OTHERS THEN
714: x_error_msg := 'Unexpected error while reading file: [Row ' || l_processed_lines || '].'
715: || fnd_global.newline || l_line || fnd_global.newline || sqlerrm;
716:
717: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, x_error_msg);
718:
719: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
720: p_msg => sqlerrm,
721: p_category => 'O',
715: || fnd_global.newline || l_line || fnd_global.newline || sqlerrm;
716:
717: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, x_error_msg);
718:
719: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
720: p_msg => sqlerrm,
721: p_category => 'O',
722: p_line_number => l_processed_lines);
723: x_status := 2;
720: p_msg => sqlerrm,
721: p_category => 'O',
722: p_line_number => l_processed_lines);
723: x_status := 2;
724: FTE_UTIL_PKG.Exit_Debug(l_module_name);
725: END READ_BLOCK_FROM_DIR;
726:
727: ---------------------------------------------------------------------------------------------------
728: -- Procedure: READ_BLOCK_FROM_TABLE
763: l_block_data block_data_tbl;
764: l_last_block_processed BOOLEAN;
765:
766: BEGIN
767: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
768: x_status := -1;
769:
770: IF (g_debug_on) THEN
771: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_file_name);
767: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
768: x_status := -1;
769:
770: IF (g_debug_on) THEN
771: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_file_name);
772: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_load_id);
773: END IF;
774:
775: SELECT content, file_size INTO l_content, l_size
768: x_status := -1;
769:
770: IF (g_debug_on) THEN
771: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_file_name);
772: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_load_id);
773: END IF;
774:
775: SELECT content, file_size INTO l_content, l_size
776: FROM fte_bulkload_data
790: data_buffer := data_buffer || utl_raw.cast_to_varchar2(temp_buffer);
791: data_buffer := replace(data_buffer, g_carriage_return, ''); --dos2unix conversion
792:
793: --Now tokenize by linefeed
794: l_lines := FTE_UTIL_PKG.TOKENIZE_STRING(data_buffer, g_linefeed);
795:
796: FOR k IN 1..l_lines.COUNT-1 LOOP
797:
798: IF l_section_line THEN
812:
813: -- build the pl/sql table with the block
814: IF ((replace(replace(l_lines(k), g_tab, ''), ' ', '')) IS NOT NULL) THEN
815:
816: l_tokens := FTE_UTIL_PKG.TOKENIZE_STRING(l_lines(k), g_tab);
817:
818: x_status := ADD_ROW(l_tokens, l_block_header, l_block_data, l_column_line);
819:
820: IF (x_status = 1) THEN
818: x_status := ADD_ROW(l_tokens, l_block_header, l_block_data, l_column_line);
819:
820: IF (x_status = 1) THEN
821: -- too few values in p_tokens
822: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_TOO_FEW_COLUMNS');
823: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
824: p_msg => x_error_msg,
825: p_category => 'D',
826: p_line_number => l_processed_lines+1);
819:
820: IF (x_status = 1) THEN
821: -- too few values in p_tokens
822: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_TOO_FEW_COLUMNS');
823: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
824: p_msg => x_error_msg,
825: p_category => 'D',
826: p_line_number => l_processed_lines+1);
827: FTE_UTIL_PKG.Exit_Debug(l_module_name);
823: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
824: p_msg => x_error_msg,
825: p_category => 'D',
826: p_line_number => l_processed_lines+1);
827: FTE_UTIL_PKG.Exit_Debug(l_module_name);
828: RETURN;
829: ELSIF (x_status = 2) THEN
830: -- too many values in p_tokens
831: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_TOO_MANY_COLUMNS');
827: FTE_UTIL_PKG.Exit_Debug(l_module_name);
828: RETURN;
829: ELSIF (x_status = 2) THEN
830: -- too many values in p_tokens
831: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_TOO_MANY_COLUMNS');
832: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
833: p_msg => x_error_msg,
834: p_category => 'D',
835: p_line_number => l_processed_lines+1);
828: RETURN;
829: ELSIF (x_status = 2) THEN
830: -- too many values in p_tokens
831: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_TOO_MANY_COLUMNS');
832: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
833: p_msg => x_error_msg,
834: p_category => 'D',
835: p_line_number => l_processed_lines+1);
836: FTE_UTIL_PKG.Exit_Debug(l_module_name);
832: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
833: p_msg => x_error_msg,
834: p_category => 'D',
835: p_line_number => l_processed_lines+1);
836: FTE_UTIL_PKG.Exit_Debug(l_module_name);
837: RETURN;
838: END IF;
839:
840: IF (l_column_line) THEN -- if column line is this line, next line wont' be a column line
847: l_last_block_processed := TRUE;
848: --call packages to process block
849:
850: IF (g_debug_on) THEN
851: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'l_block_type', l_block_type);
852: END IF;
853: PROCESS_BLOCK(p_block_type => l_block_type,
854: p_block_header => l_block_header,
855: p_block_data => l_block_data,
857: x_status => x_status,
858: x_error_msg => x_error_msg);
859:
860: IF (x_status <> -1) THEN
861: FTE_UTIL_PKG.Exit_Debug(l_module_name);
862: RETURN;
863: END IF;
864:
865: l_block_header.DELETE;
884: IF (NOT l_last_block_processed) THEN
885:
886: IF ((replace(data_buffer, ' ', '')) IS NOT NULL) THEN
887:
888: l_tokens := FTE_UTIL_PKG.TOKENIZE_STRING(data_buffer, g_tab);
889:
890: x_status := ADD_ROW(l_tokens, l_block_header, l_block_data, l_column_line);
891:
892: IF (x_status = 1) THEN
890: x_status := ADD_ROW(l_tokens, l_block_header, l_block_data, l_column_line);
891:
892: IF (x_status = 1) THEN
893: -- too few values in p_tokens
894: FTE_UTIL_PKG.Exit_Debug(l_module_name);
895: RETURN;
896: ELSIF (x_status = 2) THEN
897: -- too many values in p_tokens
898: FTE_UTIL_PKG.Exit_Debug(l_module_name);
894: FTE_UTIL_PKG.Exit_Debug(l_module_name);
895: RETURN;
896: ELSIF (x_status = 2) THEN
897: -- too many values in p_tokens
898: FTE_UTIL_PKG.Exit_Debug(l_module_name);
899: RETURN;
900: END IF;
901:
902: IF (l_column_line) THEN -- if column line is this line, next line wont' be a column line
914: x_status => x_status,
915: x_error_msg => x_error_msg);
916:
917: IF (x_status <> -1) THEN
918: FTE_UTIL_PKG.Exit_Debug(l_module_name);
919: RETURN;
920: END IF;
921:
922: l_block_header.DELETE;
927:
928: END IF;
929:
930: IF (x_status <> -1) THEN
931: FTE_UTIL_PKG.Exit_Debug(l_module_name);
932: RETURN;
933: END IF;
934:
935: IF (g_debug_on) THEN
932: RETURN;
933: END IF;
934:
935: IF (g_debug_on) THEN
936: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
937: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
938: END IF;
939: FTE_UTIL_PKG.Exit_Debug(l_module_name);
940: EXCEPTION
933: END IF;
934:
935: IF (g_debug_on) THEN
936: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
937: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
938: END IF;
939: FTE_UTIL_PKG.Exit_Debug(l_module_name);
940: EXCEPTION
941: WHEN OTHERS THEN
935: IF (g_debug_on) THEN
936: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Finished Reading File.');
937: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Number of lines processed', l_processed_lines);
938: END IF;
939: FTE_UTIL_PKG.Exit_Debug(l_module_name);
940: EXCEPTION
941: WHEN OTHERS THEN
942: x_error_msg := 'Unexpected error while reading file: [Row ' || l_processed_lines || '].'
943: || fnd_global.newline || sqlerrm;
941: WHEN OTHERS THEN
942: x_error_msg := 'Unexpected error while reading file: [Row ' || l_processed_lines || '].'
943: || fnd_global.newline || sqlerrm;
944:
945: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, x_error_msg);
946:
947: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
948: p_msg => sqlerrm,
949: p_category => 'O',
943: || fnd_global.newline || sqlerrm;
944:
945: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, x_error_msg);
946:
947: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
948: p_msg => sqlerrm,
949: p_category => 'O',
950: p_line_number => l_processed_lines);
951: x_status := 2;
948: p_msg => sqlerrm,
949: p_category => 'O',
950: p_line_number => l_processed_lines);
951: x_status := 2;
952: FTE_UTIL_PKG.Exit_Debug(l_module_name);
953: END READ_BLOCK_FROM_TABLE;
954:
955: PROCEDURE PRINT_END_OF_REPORT IS
956:
958: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.PROCESS_DATA';
959:
960: BEGIN
961:
962: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
963: p_msg => ' ',
964: p_category => NULL);
965:
966: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_ROLLBACK'); -- Rolling back the above entities creation due to the error mentioned.
962: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
963: p_msg => ' ',
964: p_category => NULL);
965:
966: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_ROLLBACK'); -- Rolling back the above entities creation due to the error mentioned.
967:
968: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
969: p_msg => ' ',
970: p_category => NULL);
964: p_category => NULL);
965:
966: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_ROLLBACK'); -- Rolling back the above entities creation due to the error mentioned.
967:
968: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
969: p_msg => ' ',
970: p_category => NULL);
971:
972: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
968: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
969: p_msg => ' ',
970: p_category => NULL);
971:
972: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
973: p_msg => l_msg,
974: p_category => NULL);
975:
976: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
972: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
973: p_msg => l_msg,
974: p_category => NULL);
975:
976: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
977: p_msg => '+---------------------------------------------------------------------------+',
978: p_category => NULL);
979:
980: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
976: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
977: p_msg => '+---------------------------------------------------------------------------+',
978: p_category => NULL);
979:
980: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
981: p_msg => ' ',
982: p_category => NULL);
983:
984: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_END_REPORT'); -- *** End of BulkLoader Report ***
980: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
981: p_msg => ' ',
982: p_category => NULL);
983:
984: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_END_REPORT'); -- *** End of BulkLoader Report ***
985:
986: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
987: p_msg => l_msg,
988: p_category => NULL);
982: p_category => NULL);
983:
984: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_END_REPORT'); -- *** End of BulkLoader Report ***
985:
986: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
987: p_msg => l_msg,
988: p_category => NULL);
989:
990: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
986: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
987: p_msg => l_msg,
988: p_category => NULL);
989:
990: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
991: p_msg => ' ',
992: p_category => NULL);
993:
994: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
990: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
991: p_msg => ' ',
992: p_category => NULL);
993:
994: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
995: p_msg => '+---------------------------------------------------------------------------+',
996: p_category => NULL);
997: END PRINT_END_OF_REPORT;
998: -----------------------------------------------------------------------------------
1044:
1045: --+
1046: -- Start the DEBUGGER
1047: --+
1048: FTE_UTIL_PKG.INIT_DEBUG(p_user_debug);
1049:
1050: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1051: RETCODE := 0;
1052:
1046: -- Start the DEBUGGER
1047: --+
1048: FTE_UTIL_PKG.INIT_DEBUG(p_user_debug);
1049:
1050: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1051: RETCODE := 0;
1052:
1053: g_load_id := p_load_id;
1054:
1052:
1053: g_load_id := p_load_id;
1054:
1055: IF (g_debug_on) THEN
1056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_src_filename);
1057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_load_id);
1058: END IF;
1059:
1060: UPLOAD_FILE(p_load_id, l_type, l_blob, l_file_name, l_dir_name, x_status);
1053: g_load_id := p_load_id;
1054:
1055: IF (g_debug_on) THEN
1056: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_src_filename);
1057: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_load_id);
1058: END IF;
1059:
1060: UPLOAD_FILE(p_load_id, l_type, l_blob, l_file_name, l_dir_name, x_status);
1061:
1061:
1062: FND_PROFILE.GET('FTE_BULKLOAD_SOURCE_TYPE', l_source);
1063:
1064: IF (g_debug_on) THEN
1065: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load type', l_type);
1066: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Reading from ', l_source);
1067: END IF;
1068:
1069: --+
1062: FND_PROFILE.GET('FTE_BULKLOAD_SOURCE_TYPE', l_source);
1063:
1064: IF (g_debug_on) THEN
1065: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load type', l_type);
1066: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Reading from ', l_source);
1067: END IF;
1068:
1069: --+
1070: -- Write the header for BulkLoader output file
1069: --+
1070: -- Write the header for BulkLoader output file
1071: --+
1072:
1073: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1074: p_msg => '+---------------------------------------------------------------------------+',
1075: p_category => NULL);
1076: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1077: p_msg => ' ',
1072:
1073: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1074: p_msg => '+---------------------------------------------------------------------------+',
1075: p_category => NULL);
1076: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1077: p_msg => ' ',
1078: p_category => NULL);
1079:
1080: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_START_REPORT'); -- *** Start of BulkLoader Report ***
1076: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1077: p_msg => ' ',
1078: p_category => NULL);
1079:
1080: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_START_REPORT'); -- *** Start of BulkLoader Report ***
1081:
1082: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1083: p_msg => l_msg,
1084: p_category => NULL);
1078: p_category => NULL);
1079:
1080: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_START_REPORT'); -- *** Start of BulkLoader Report ***
1081:
1082: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1083: p_msg => l_msg,
1084: p_category => NULL);
1085:
1086: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1082: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1083: p_msg => l_msg,
1084: p_category => NULL);
1085:
1086: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1087: p_msg => ' ',
1088: p_category => NULL);
1089:
1090: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1086: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1087: p_msg => ' ',
1088: p_category => NULL);
1089:
1090: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1091: p_msg => '+---------------------------------------------------------------------------+',
1092: p_category => NULL);
1093:
1094: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1090: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1091: p_msg => '+---------------------------------------------------------------------------+',
1092: p_category => NULL);
1093:
1094: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1095: p_msg => ' ',
1096: p_category => NULL);
1097:
1098: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_PROCESSING', -- File Processed :
1094: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1095: p_msg => ' ',
1096: p_category => NULL);
1097:
1098: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_PROCESSING', -- File Processed :
1099: p_tokens => STRINGARRAY('NAME'),
1100: p_values => STRINGARRAY(p_src_filename));
1101:
1102: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1098: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_PROCESSING', -- File Processed :
1099: p_tokens => STRINGARRAY('NAME'),
1100: p_values => STRINGARRAY(p_src_filename));
1101:
1102: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1103: p_msg => l_msg,
1104: p_category => NULL);
1105:
1106: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_TYPE', -- Type of Load :
1102: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1103: p_msg => l_msg,
1104: p_category => NULL);
1105:
1106: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_TYPE', -- Type of Load :
1107: p_tokens => STRINGARRAY('TYPE'),
1108: p_values => STRINGARRAY(l_type));
1109:
1110: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1106: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_TYPE', -- Type of Load :
1107: p_tokens => STRINGARRAY('TYPE'),
1108: p_values => STRINGARRAY(l_type));
1109:
1110: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1111: p_msg => l_msg,
1112: p_category => NULL);
1113:
1114: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_LOADID', -- Load ID :
1110: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1111: p_msg => l_msg,
1112: p_category => NULL);
1113:
1114: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_LOADID', -- Load ID :
1115: p_tokens => STRINGARRAY('ID'),
1116: p_values => STRINGARRAY(p_load_id));
1117:
1118: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1114: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_LOADID', -- Load ID :
1115: p_tokens => STRINGARRAY('ID'),
1116: p_values => STRINGARRAY(p_load_id));
1117:
1118: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1119: p_msg => l_msg,
1120: p_category => NULL);
1121:
1122: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_DEBUG', -- Debug Enabled :
1118: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1119: p_msg => l_msg,
1120: p_category => NULL);
1121:
1122: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_DEBUG', -- Debug Enabled :
1123: p_tokens => STRINGARRAY('DEBUG'),
1124: p_values => STRINGARRAY(p_user_debug));
1125:
1126: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1122: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_DEBUG', -- Debug Enabled :
1123: p_tokens => STRINGARRAY('DEBUG'),
1124: p_values => STRINGARRAY(p_user_debug));
1125:
1126: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1127: p_msg => l_msg,
1128: p_category => NULL);
1129:
1130: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1126: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1127: p_msg => l_msg,
1128: p_category => NULL);
1129:
1130: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1131: p_msg => ' ',
1132: p_category => NULL);
1133:
1134: IF (UPPER(l_source) = 'SERVER') THEN
1149: ERRBUF := x_error_msg;
1150:
1151: PRINT_END_OF_REPORT;
1152:
1153: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1154: RETURN;
1155: END IF;
1156:
1157: IF (l_type = 'LANE') THEN
1171: PRINT_END_OF_REPORT;
1172:
1173: RETCODE := 2;
1174: ERRBUF := x_error_msg;
1175: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1176: RETURN;
1177: END IF;
1178:
1179: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1175: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1176: RETURN;
1177: END IF;
1178:
1179: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1180: p_msg => ' ',
1181: p_category => NULL);
1182:
1183: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_COMMIT'); -- Committing the above entities creation. --
1179: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1180: p_msg => ' ',
1181: p_category => NULL);
1182:
1183: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_COMMIT'); -- Committing the above entities creation. --
1184:
1185: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1186: p_msg => l_msg,
1187: p_category => NULL);
1181: p_category => NULL);
1182:
1183: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_COMMIT'); -- Committing the above entities creation. --
1184:
1185: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1186: p_msg => l_msg,
1187: p_category => NULL);
1188:
1189: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1185: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1186: p_msg => l_msg,
1187: p_category => NULL);
1188:
1189: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1190: p_msg => ' ',
1191: p_category => NULL);
1192:
1193: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1189: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1190: p_msg => ' ',
1191: p_category => NULL);
1192:
1193: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1194: p_msg => '+---------------------------------------------------------------------------+',
1195: p_category => NULL);
1196:
1197: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_END_REPORT'); -- *** End of BulkLoader Report ***
1193: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1194: p_msg => '+---------------------------------------------------------------------------+',
1195: p_category => NULL);
1196:
1197: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_END_REPORT'); -- *** End of BulkLoader Report ***
1198:
1199: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1200: p_msg => l_msg,
1201: p_category => NULL);
1195: p_category => NULL);
1196:
1197: l_msg := FTE_UTIL_PKG.GET_MSG(p_name => 'FTE_BULKLOAD_END_REPORT'); -- *** End of BulkLoader Report ***
1198:
1199: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1200: p_msg => l_msg,
1201: p_category => NULL);
1202:
1203: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1199: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1200: p_msg => l_msg,
1201: p_category => NULL);
1202:
1203: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1204: p_msg => '+---------------------------------------------------------------------------+',
1205: p_category => NULL);
1206:
1207: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1203: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1204: p_msg => '+---------------------------------------------------------------------------+',
1205: p_category => NULL);
1206:
1207: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1208:
1209: EXCEPTION
1210: WHEN OTHERS THEN
1211: ROLLBACK;
1211: ROLLBACK;
1212: RETCODE := 2;
1213: ERRBUF := sqlerrm;
1214: x_status := 2;
1215: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1216: p_msg => sqlerrm,
1217: p_category => 'O');
1218: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1219: END PROCESS_DATA;
1214: x_status := 2;
1215: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1216: p_msg => sqlerrm,
1217: p_category => 'O');
1218: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1219: END PROCESS_DATA;
1220:
1221:
1222: --------------------------------------------------------------------------------
1241: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.UPDATE_RID';
1242:
1243: BEGIN
1244: --SETUP DEBUGGING
1245: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1246:
1247: IF (g_debug_on) THEN
1248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Updating FTE_BUILLOAD_DATA', WSH_DEBUG_SV.c_proc_level);
1249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_filename);
1244: --SETUP DEBUGGING
1245: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1246:
1247: IF (g_debug_on) THEN
1248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Updating FTE_BUILLOAD_DATA', WSH_DEBUG_SV.c_proc_level);
1249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_filename);
1250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_loadid);
1251: END IF;
1252:
1245: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1246:
1247: IF (g_debug_on) THEN
1248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Updating FTE_BUILLOAD_DATA', WSH_DEBUG_SV.c_proc_level);
1249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_filename);
1250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_loadid);
1251: END IF;
1252:
1253: IF (p_LoadType <> 'DTT_DWNLD') THEN
1246:
1247: IF (g_debug_on) THEN
1248: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Updating FTE_BUILLOAD_DATA', WSH_DEBUG_SV.c_proc_level);
1249: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_filename);
1250: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_loadid);
1251: END IF;
1252:
1253: IF (p_LoadType <> 'DTT_DWNLD') THEN
1254: UPDATE FTE_BULKLOAD_DATA
1271: load_type = p_LoadType;
1272: END IF;
1273:
1274: commit;
1275: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1276: EXCEPTION
1277: WHEN OTHERS THEN
1278: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1279: p_msg => sqlerrm,
1274: commit;
1275: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1276: EXCEPTION
1277: WHEN OTHERS THEN
1278: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1279: p_msg => sqlerrm,
1280: p_category => 'O');
1281:
1282: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1278: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1279: p_msg => sqlerrm,
1280: p_category => 'O');
1281:
1282: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1283: END UPDATE_RID;
1284:
1285: -------------------------------------------------------------------------------------------
1286: -- Procedure: UPLOAD_FILE
1314: l_module_name CONSTANT VARCHAR2(100) := 'fte.plsql.' || G_PKG_NAME || '.UPLOAD_FILE';
1315:
1316: BEGIN
1317:
1318: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1319:
1320: IF (g_debug_on) THEN
1321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_LoadId);
1322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_FileName);
1317:
1318: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1319:
1320: IF (g_debug_on) THEN
1321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_LoadId);
1322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_FileName);
1323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load type', p_LoadType);
1324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Directory name', p_DirName);
1325: END IF;
1318: FTE_UTIL_PKG.ENTER_Debug(l_module_name);
1319:
1320: IF (g_debug_on) THEN
1321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_LoadId);
1322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_FileName);
1323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load type', p_LoadType);
1324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Directory name', p_DirName);
1325: END IF;
1326:
1319:
1320: IF (g_debug_on) THEN
1321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_LoadId);
1322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_FileName);
1323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load type', p_LoadType);
1324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Directory name', p_DirName);
1325: END IF;
1326:
1327: BEGIN
1320: IF (g_debug_on) THEN
1321: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load ID', p_LoadId);
1322: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'File Name', p_FileName);
1323: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Load type', p_LoadType);
1324: FTE_UTIL_PKG.WRITE_LOGFILE(l_module_name, 'Directory name', p_DirName);
1325: END IF;
1326:
1327: BEGIN
1328: p_DirName := get_upload_dir;
1377: EXCEPTION
1378: WHEN NO_DATA_FOUND THEN
1379: p_ExitStatus := 1;
1380: WHEN OTHERS THEN
1381: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1382: p_msg => sqlerrm,
1383: p_category => 'O');
1384: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1385: END;
1380: WHEN OTHERS THEN
1381: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1382: p_msg => sqlerrm,
1383: p_category => 'O');
1384: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1385: END;
1386:
1387: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1388:
1383: p_category => 'O');
1384: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1385: END;
1386:
1387: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1388:
1389: EXCEPTION
1390: WHEN OTHERS THEN
1391: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1387: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1388:
1389: EXCEPTION
1390: WHEN OTHERS THEN
1391: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1392: p_msg => sqlerrm,
1393: p_category => 'O');
1394: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1395: END UPLOAD_FILE;
1390: WHEN OTHERS THEN
1391: FTE_UTIL_PKG.WRITE_OUTFILE(p_module_name => l_module_name,
1392: p_msg => sqlerrm,
1393: p_category => 'O');
1394: FTE_UTIL_PKG.Exit_Debug(l_module_name);
1395: END UPLOAD_FILE;
1396:
1397: END FTE_BULKLOAD_PKG;