1: PACKAGE BODY INV_EBI_UTIL AS
2: /* $Header: INVEIUTLB.pls 120.13.12010000.5 2009/04/06 11:50:41 prepatel ship $ */
3:
4: /************************************************************************************
5: -- API name : is_pim_installed
366: WHEN OTHERS THEN
367:
368: x_return_status := FND_API.g_ret_sts_unexp_error;
369: IF (x_msg_data IS NOT NULL) THEN
370: x_msg_data := x_msg_data||' ->INV_EBI_UTIL.transform_uda ';
371: ELSE
372: x_msg_data := SQLERRM||'INV_EBI_UTIL.transform_uda ';
373: END IF;
374: END transform_uda;
368: x_return_status := FND_API.g_ret_sts_unexp_error;
369: IF (x_msg_data IS NOT NULL) THEN
370: x_msg_data := x_msg_data||' ->INV_EBI_UTIL.transform_uda ';
371: ELSE
372: x_msg_data := SQLERRM||'INV_EBI_UTIL.transform_uda ';
373: END IF;
374: END transform_uda;
375:
376: /************************************************************************************
459: EXCEPTION
460: WHEN OTHERS THEN
461: x_return_status := FND_API.g_ret_sts_unexp_error;
462: IF (x_msg_data IS NOT NULL) THEN
463: x_msg_data := x_msg_data||' ->INV_EBI_UTIL.transform_attr_rowdata_uda ';
464: ELSE
465: x_msg_data := SQLERRM||'INV_EBI_UTIL.transform_attr_rowdata_uda ';
466: END IF;
467: END transform_attr_rowdata_uda;
461: x_return_status := FND_API.g_ret_sts_unexp_error;
462: IF (x_msg_data IS NOT NULL) THEN
463: x_msg_data := x_msg_data||' ->INV_EBI_UTIL.transform_attr_rowdata_uda ';
464: ELSE
465: x_msg_data := SQLERRM||'INV_EBI_UTIL.transform_attr_rowdata_uda ';
466: END IF;
467: END transform_attr_rowdata_uda;
468:
469:
496: l_timeout NUMBER;
497: BEGIN
498: IF p_name_value_tbl IS NOT NULL AND p_name_value_tbl.COUNT>0
499: THEN
500: l_user := INV_EBI_UTIL.get_config_param_value(p_name_value_tbl,'USER');
501: l_resp := INV_EBI_UTIL.get_config_param_value(p_name_value_tbl,'RESPONSIBILITY');
502: END IF;
503:
504: BEGIN
497: BEGIN
498: IF p_name_value_tbl IS NOT NULL AND p_name_value_tbl.COUNT>0
499: THEN
500: l_user := INV_EBI_UTIL.get_config_param_value(p_name_value_tbl,'USER');
501: l_resp := INV_EBI_UTIL.get_config_param_value(p_name_value_tbl,'RESPONSIBILITY');
502: END IF;
503:
504: BEGIN
505: SELECT usr.user_id,
571: -- -----------------------------------------------------------------
572: PROCEDURE debug_line(
573: p_text VARCHAR2) IS
574: BEGIN
575: IF (INV_EBI_UTIL.g_debug) THEN
576: FND_FILE.PUT_LINE(FND_FILE.LOG,to_char(sysdate,'DD/MON/YYYY HH24:MI:SS')||': '||p_text);
577: END IF;
578: END debug_line;
579: -- ------------------------------------------------------------------
601: PROCEDURE setup(
602: p_filename VARCHAR2 Default NULL) IS
603: l_path varchar2(200) := FND_PROFILE.value('INV_EBI_DEBUG_DIRECTORY');
604: BEGIN
605: INV_EBI_UTIL.g_debug := debug_status;
606:
607: IF (INV_EBI_UTIL.g_debug) THEN
608:
609: INV_EBI_UTIL.put_names(nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.log',nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.out',l_path);
603: l_path varchar2(200) := FND_PROFILE.value('INV_EBI_DEBUG_DIRECTORY');
604: BEGIN
605: INV_EBI_UTIL.g_debug := debug_status;
606:
607: IF (INV_EBI_UTIL.g_debug) THEN
608:
609: INV_EBI_UTIL.put_names(nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.log',nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.out',l_path);
610: INV_EBI_UTIL.debug_line('At the start of the Debug process is ');
611: END IF;
605: INV_EBI_UTIL.g_debug := debug_status;
606:
607: IF (INV_EBI_UTIL.g_debug) THEN
608:
609: INV_EBI_UTIL.put_names(nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.log',nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.out',l_path);
610: INV_EBI_UTIL.debug_line('At the start of the Debug process is ');
611: END IF;
612: END setup;
613: -- ------------------------------------------------------------------
606:
607: IF (INV_EBI_UTIL.g_debug) THEN
608:
609: INV_EBI_UTIL.put_names(nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.log',nvl(p_filename,'EBS'||to_char(sysdate,'DDMMYYYYHH24MISS'))||'.out',l_path);
610: INV_EBI_UTIL.debug_line('At the start of the Debug process is ');
611: END IF;
612: END setup;
613: -- ------------------------------------------------------------------
614: -- Name: wrapup
616: -- -----------------------------------------------------------------
617:
618: PROCEDURE wrapup IS
619: BEGIN
620: IF (INV_EBI_UTIL.g_debug) THEN
621: INV_EBI_UTIL.debug_line('At the end of Debug Process');
622: FND_FILE.close;
623: END IF;
624: END wrapup;
617:
618: PROCEDURE wrapup IS
619: BEGIN
620: IF (INV_EBI_UTIL.g_debug) THEN
621: INV_EBI_UTIL.debug_line('At the end of Debug Process');
622: FND_FILE.close;
623: END IF;
624: END wrapup;
625: END INV_EBI_UTIL;
621: INV_EBI_UTIL.debug_line('At the end of Debug Process');
622: FND_FILE.close;
623: END IF;
624: END wrapup;
625: END INV_EBI_UTIL;