29: l_completion_status VARCHAR2(30);
30: l_proc_name VARCHAR2(40);
31: l_debug_msg VARCHAR2(32767);
32: l_debug_mode VARCHAR2(1);
33: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
34: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
35: l_module_name VARCHAR2(40);
36: l_program_id NUMBER ;
37: l_program_login_id NUMBER ;
30: l_proc_name VARCHAR2(40);
31: l_debug_msg VARCHAR2(32767);
32: l_debug_mode VARCHAR2(1);
33: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
34: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
35: l_module_name VARCHAR2(40);
36: l_program_id NUMBER ;
37: l_program_login_id NUMBER ;
38: l_program_application_id NUMBER ;
42: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
43: l_module_name := FND_PROFILE.value('AFLOG_MODULE');
44: l_proc_name := 'maintain_opi_dbi_logs';
45:
46: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
47: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
48: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
49: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
50:
43: l_module_name := FND_PROFILE.value('AFLOG_MODULE');
44: l_proc_name := 'maintain_opi_dbi_logs';
45:
46: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
47: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
48: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
49: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
50:
51: IF (p_load_type = 'INIT') THEN /* running initial load */
44: l_proc_name := 'maintain_opi_dbi_logs';
45:
46: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
47: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
48: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
49: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
50:
51: IF (p_load_type = 'INIT') THEN /* running initial load */
52:
45:
46: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
47: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
48: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
49: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
50:
51: IF (p_load_type = 'INIT') THEN /* running initial load */
52:
53: IF l_debug_mode = 'Y' AND upper(l_module_name) like 'BIS%' THEN
550: l_max_trx_id NUMBER;
551: l_global_start_date DATE;
552: l_stmt_no NUMBER :=0;
553: l_proc_name VARCHAR2(40);
554: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
555: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
556: l_debug_msg VARCHAR2(32767);
557: l_debug_mode VARCHAR2(1);
558: l_module_name VARCHAR2(40);
551: l_global_start_date DATE;
552: l_stmt_no NUMBER :=0;
553: l_proc_name VARCHAR2(40);
554: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
555: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
556: l_debug_msg VARCHAR2(32767);
557: l_debug_mode VARCHAR2(1);
558: l_module_name VARCHAR2(40);
559:
566: l_module_name := FND_PROFILE.value('AFLOG_MODULE');
567: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
568: l_proc_name := 'create_first_mmt_bounds';
569:
570: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
571: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
572: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
573: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
574:
567: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
568: l_proc_name := 'create_first_mmt_bounds';
569:
570: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
571: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
572: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
573: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
574:
575: l_stmt_no :=10;
568: l_proc_name := 'create_first_mmt_bounds';
569:
570: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
571: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
572: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
573: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
574:
575: l_stmt_no :=10;
576: select BIS_COMMON_PARAMETERS.GET_GLOBAL_START_DATE into l_global_start_date from DUAL;
569:
570: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
571: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
572: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
573: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
574:
575: l_stmt_no :=10;
576: select BIS_COMMON_PARAMETERS.GET_GLOBAL_START_DATE into l_global_start_date from DUAL;
577:
866: IS
867: l_stmt_no NUMBER :=0;
868: l_max_trx_id NUMBER;
869: l_proc_name VARCHAR2(40);
870: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
871: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
872: l_debug_msg VARCHAR2(32767);
873: l_debug_mode VARCHAR2(1);
874: l_module_name VARCHAR2(40);
867: l_stmt_no NUMBER :=0;
868: l_max_trx_id NUMBER;
869: l_proc_name VARCHAR2(40);
870: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
871: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
872: l_debug_msg VARCHAR2(32767);
873: l_debug_mode VARCHAR2(1);
874: l_module_name VARCHAR2(40);
875:
894: l_module_name := FND_PROFILE.value('AFLOG_MODULE');
895: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
896: l_proc_name := 'set_mmt_new_bounds';
897:
898: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
899: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
900: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
901: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
902:
895: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
896: l_proc_name := 'set_mmt_new_bounds';
897:
898: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
899: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
900: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
901: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
902:
903: /* copy from bound as max of existing to bound for the new organizations and insert records */
896: l_proc_name := 'set_mmt_new_bounds';
897:
898: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
899: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
900: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
901: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
902:
903: /* copy from bound as max of existing to bound for the new organizations and insert records */
904: /* this code inserts all new organizations from MMT without checking the existence of a
897:
898: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
899: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
900: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
901: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
902:
903: /* copy from bound as max of existing to bound for the new organizations and insert records */
904: /* this code inserts all new organizations from MMT without checking the existence of a
905: transaction for them after global_start_date */
1042: END set_mmt_new_bounds;
1043:
1044: PROCEDURE setup_inv_wta_bounds(p_load_type IN VARCHAR2)
1045: IS
1046: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
1047: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
1048: l_stmt_no NUMBER :=0;
1049: l_proc_name VARCHAR2(40);
1050: l_global_start_date DATE;
1043:
1044: PROCEDURE setup_inv_wta_bounds(p_load_type IN VARCHAR2)
1045: IS
1046: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
1047: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
1048: l_stmt_no NUMBER :=0;
1049: l_proc_name VARCHAR2(40);
1050: l_global_start_date DATE;
1051: l_debug_msg VARCHAR2(32767);
1061: l_module_name := FND_PROFILE.value('AFLOG_MODULE');
1062: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
1063: l_proc_name := 'setup_inv_wta_bounds';
1064:
1065: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1066: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1067: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1068: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1069:
1062: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
1063: l_proc_name := 'setup_inv_wta_bounds';
1064:
1065: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1066: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1067: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1068: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1069:
1070:
1063: l_proc_name := 'setup_inv_wta_bounds';
1064:
1065: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1066: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1067: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1068: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1069:
1070:
1071: l_stmt_no := 10;
1064:
1065: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1066: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1067: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1068: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1069:
1070:
1071: l_stmt_no := 10;
1072: select BIS_COMMON_PARAMETERS.GET_GLOBAL_START_DATE into l_global_start_date from DUAL;
1187: PROCEDURE set_sysdate_bounds(p_load_type IN VARCHAR2,
1188: p_etl_type IN VARCHAR2,
1189: p_driving_table_code IN VARCHAR2)
1190: IS
1191: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
1192: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
1193: l_stmt_no NUMBER :=0;
1194: l_proc_name VARCHAR2(40);
1195: l_global_start_date DATE;
1188: p_etl_type IN VARCHAR2,
1189: p_driving_table_code IN VARCHAR2)
1190: IS
1191: l_user_id NUMBER := NVL(fnd_global.USER_ID, -1);
1192: l_login_id NUMBER := NVL(fnd_global.LOGIN_ID, -1);
1193: l_stmt_no NUMBER :=0;
1194: l_proc_name VARCHAR2(40);
1195: l_global_start_date DATE;
1196: l_debug_msg VARCHAR2(32767);
1207: l_module_name := FND_PROFILE.value('AFLOG_MODULE');
1208: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
1209: l_proc_name := 'set_sysdate_bounds';
1210:
1211: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1212: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1213: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1214: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1215:
1208: l_debug_mode := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
1209: l_proc_name := 'set_sysdate_bounds';
1210:
1211: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1212: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1213: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1214: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1215:
1216: l_stmt_no :=10;
1209: l_proc_name := 'set_sysdate_bounds';
1210:
1211: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1212: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1213: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1214: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1215:
1216: l_stmt_no :=10;
1217: select BIS_COMMON_PARAMETERS.GET_GLOBAL_START_DATE into l_global_start_date from DUAL;
1210:
1211: l_program_id := NVL(fnd_global.CONC_PROGRAM_ID,-1);
1212: l_program_login_id := NVL(fnd_global.CONC_LOGIN_ID,-1);
1213: l_program_application_id := NVL(fnd_global.PROG_APPL_ID,-1);
1214: l_request_id := NVL(fnd_global.CONC_REQUEST_ID,-1);
1215:
1216: l_stmt_no :=10;
1217: select BIS_COMMON_PARAMETERS.GET_GLOBAL_START_DATE into l_global_start_date from DUAL;
1218: