107: G_RTRIM_IFACE_DATA := p_rtrim_data;
108:
109: EXCEPTION
110: WHEN OTHERS THEN
111: FND_FILE.PUT_LINE(FND_FILE.LOG,'Initialize_Request Error :'||substr(sqlerrm,1,200));
112: OE_BULK_MSG_PUB.Add_Exc_Msg
113: ( G_PKG_NAME
114: , 'Initialize_Request'
115: );
168: IF l_debug_level > 0 THEN
169: SELECT hsecs INTO l_end_time from v$timer;
170: END IF;
171:
172: FND_FILE.PUT_LINE(FND_FILE.LOG,'Time spent in Load Hold Sources is (sec) '
173: ||((l_end_time-l_start_time)/100));
174:
175: EXCEPTION
176: WHEN OTHERS THEN
173: ||((l_end_time-l_start_time)/100));
174:
175: EXCEPTION
176: WHEN OTHERS THEN
177: FND_FILE.PUT_LINE(FND_FILE.LOG,'Initialize_Batch Error :'||substr(sqlerrm,1,200));
178: OE_BULK_MSG_PUB.Add_Exc_Msg
179: ( G_PKG_NAME
180: , 'Initialize_Batch'
181: );
673: -----------------------------------------------------------
674: -- Log Output file
675: -----------------------------------------------------------
676:
677: fnd_file.put_line(FND_FILE.OUTPUT, '');
678: fnd_file.put_line(FND_FILE.OUTPUT, 'BULK Order Import Concurrent Program');
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
674: -- Log Output file
675: -----------------------------------------------------------
676:
677: fnd_file.put_line(FND_FILE.OUTPUT, '');
678: fnd_file.put_line(FND_FILE.OUTPUT, 'BULK Order Import Concurrent Program');
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
675: -----------------------------------------------------------
676:
677: fnd_file.put_line(FND_FILE.OUTPUT, '');
678: fnd_file.put_line(FND_FILE.OUTPUT, 'BULK Order Import Concurrent Program');
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
676:
677: fnd_file.put_line(FND_FILE.OUTPUT, '');
678: fnd_file.put_line(FND_FILE.OUTPUT, 'BULK Order Import Concurrent Program');
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
677: fnd_file.put_line(FND_FILE.OUTPUT, '');
678: fnd_file.put_line(FND_FILE.OUTPUT, 'BULK Order Import Concurrent Program');
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
678: fnd_file.put_line(FND_FILE.OUTPUT, 'BULK Order Import Concurrent Program');
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
679: fnd_file.put_line(FND_FILE.OUTPUT, '');
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
680: fnd_file.put_line(FND_FILE.OUTPUT, 'Concurrent Program Parameters');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
681: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Only: '|| p_validate_only);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
689: fnd_file.put_line(FND_FILE.OUTPUT,'Process Configurations '||P_PROCESS_CONFIGURATIONS);
682: fnd_file.put_line(FND_FILE.OUTPUT, 'Validate Desc Flex: '|| p_validate_desc_flex);
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
689: fnd_file.put_line(FND_FILE.OUTPUT,'Process Configurations '||P_PROCESS_CONFIGURATIONS);
690: fnd_file.put_line(FND_FILE.OUTPUT, ' Process Tax ' || p_process_tax );
683: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Source: '|| p_order_source_id);
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
689: fnd_file.put_line(FND_FILE.OUTPUT,'Process Configurations '||P_PROCESS_CONFIGURATIONS);
690: fnd_file.put_line(FND_FILE.OUTPUT, ' Process Tax ' || p_process_tax );
691:
684: fnd_file.put_line(FND_FILE.OUTPUT, 'Order Ref: '|| p_orig_sys_document_ref);
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
689: fnd_file.put_line(FND_FILE.OUTPUT,'Process Configurations '||P_PROCESS_CONFIGURATIONS);
690: fnd_file.put_line(FND_FILE.OUTPUT, ' Process Tax ' || p_process_tax );
691:
692:
685: fnd_file.put_line(FND_FILE.OUTPUT, 'Number of Instances: '|| p_num_instances);
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
689: fnd_file.put_line(FND_FILE.OUTPUT,'Process Configurations '||P_PROCESS_CONFIGURATIONS);
690: fnd_file.put_line(FND_FILE.OUTPUT, ' Process Tax ' || p_process_tax );
691:
692:
693: -----------------------------------------------------------
686: fnd_file.put_line(FND_FILE.OUTPUT, 'Defaulting Mode: '|| p_defaulting_mode);
687: fnd_file.put_line(FND_FILE.OUTPUT, 'Process Recs With No Org: '|| p_process_recs_with_no_org );
688: fnd_file.put_line(FND_FILE.OUTPUT, '');
689: fnd_file.put_line(FND_FILE.OUTPUT,'Process Configurations '||P_PROCESS_CONFIGURATIONS);
690: fnd_file.put_line(FND_FILE.OUTPUT, ' Process Tax ' || p_process_tax );
691:
692:
693: -----------------------------------------------------------
694: -- Setting Debug Mode and File
693: -----------------------------------------------------------
694: -- Setting Debug Mode and File
695: -----------------------------------------------------------
696:
697: FND_FILE.Put_Line(FND_FILE.OUTPUT,'Debug Level: '||nvl(p_debug_level,0));
698:
699: IF nvl(p_debug_level, 0) > 0 THEN
700: FND_PROFILE.PUT('ONT_DEBUG_LEVEL',p_debug_level);
701: --moved this stmt in if loop for bug 3747791
710:
711: --Bug# 12333065 FND_PROFILE.Get('CONC_REQUEST_ID', l_request_id);
712: l_request_id := FND_GLOBAL.CONC_REQUEST_ID; --Bug# 12333065
713:
714: fnd_file.put_line(FND_FILE.OUTPUT, 'Request Id: '|| to_char(l_request_id));
715:
716:
717: If p_operating_unit IS NOT NULL Then
718: MO_GLOBAL.set_policy_context('S',p_operating_unit);
722: If p_debug_level > 0 Then
723: oe_debug_pub.add('Default Org Id '||l_default_org_id);
724: End If;
725:
726: fnd_file.put_line(FND_FILE.OUTPUT, 'Org Id: '|| to_char(p_operating_unit));
727: fnd_file.put_line(FND_FILE.OUTPUT, '');
728:
729: l_req_data := fnd_conc_global.request_data;
730: if (l_req_data is not null) then
723: oe_debug_pub.add('Default Org Id '||l_default_org_id);
724: End If;
725:
726: fnd_file.put_line(FND_FILE.OUTPUT, 'Org Id: '|| to_char(p_operating_unit));
727: fnd_file.put_line(FND_FILE.OUTPUT, '');
728:
729: l_req_data := fnd_conc_global.request_data;
730: if (l_req_data is not null) then
731: l_req_data_counter := to_number(l_req_data);
747: WHERE organization_id = ca_enabled_rec.org_id ;
748:
749: FND_MESSAGE.SET_NAME('ONT','ONT_BULK_NOT_SUPP_ACCEPTANCE');
750: FND_MESSAGE.SET_TOKEN('OU','''' || l_oper_unit_name || '''');
751: fnd_file.put_line(FND_FILE.OUTPUT, FND_MESSAGE.GET);
752:
753: EXCEPTION
754: WHEN OTHERS THEN
755: NULL ;
938: END IF;
939:
940: EXCEPTION
941: WHEN NO_DATA_FOUND THEN
942: fnd_file.put_line(FND_FILE.OUTPUT,'No more orders to process');
943: fnd_file.put_line(FND_FILE.OUTPUT,'Not spawning any child processes');
944: RETURN;
945:
946: WHEN OTHERS THEN
939:
940: EXCEPTION
941: WHEN NO_DATA_FOUND THEN
942: fnd_file.put_line(FND_FILE.OUTPUT,'No more orders to process');
943: fnd_file.put_line(FND_FILE.OUTPUT,'Not spawning any child processes');
944: RETURN;
945:
946: WHEN OTHERS THEN
947: fnd_file.put_line(FND_FILE.OUTPUT,'SOME OTHER ERROR IN SQL STATEMENT');
943: fnd_file.put_line(FND_FILE.OUTPUT,'Not spawning any child processes');
944: RETURN;
945:
946: WHEN OTHERS THEN
947: fnd_file.put_line(FND_FILE.OUTPUT,'SOME OTHER ERROR IN SQL STATEMENT');
948: RETURN;
949: END;
950:
951:
974: , p_validate_desc_flex, p_defaulting_mode , p_debug_level
975: , 0,
976: p_batch_size,p_rtrim_data,p_process_recs_with_no_org,p_process_tax,
977: p_process_configurations, p_dummy, p_validate_configurations, p_schedule_configurations);
978: fnd_file.put_line(FND_FILE.OUTPUT, 'Child Request ID: '||l_new_request_id);
979: IF (l_new_request_id = 0) THEN
980: fnd_file.put_line(FND_FILE.OUTPUT,'Error in submitting child request');
981: errbuf := FND_MESSAGE.GET;
982: retcode := 2;
976: p_batch_size,p_rtrim_data,p_process_recs_with_no_org,p_process_tax,
977: p_process_configurations, p_dummy, p_validate_configurations, p_schedule_configurations);
978: fnd_file.put_line(FND_FILE.OUTPUT, 'Child Request ID: '||l_new_request_id);
979: IF (l_new_request_id = 0) THEN
980: fnd_file.put_line(FND_FILE.OUTPUT,'Error in submitting child request');
981: errbuf := FND_MESSAGE.GET;
982: retcode := 2;
983: RETURN;
984: END IF;
987:
988: END LOOP;
989:
990: v_end := DBMS_UTILITY.GET_TIME;
991: FND_FILE.PUT_LINE(FND_FILE.LOG,'Time for submit REQUESTs :'||to_char((v_end-v_start)/100));
992:
993: -----------------------------------------------------------
994: -- BULK Populate Orders Table - l_order_rec
995: -----------------------------------------------------------
1010: , l_order_rec.org_id
1011: ;
1012: CLOSE c_lines_per_order;
1013: v_end := DBMS_UTILITY.GET_TIME;
1014: FND_FILE.PUT_LINE(FND_FILE.LOG,'TIME FOR BULK COLLECT:'||TO_CHAR ( ( V_END-V_START ) /100 ) ) ;
1015: Elsif p_process_recs_with_no_org = 'Y' Then
1016: v_start := DBMS_UTILITY.GET_TIME;
1017: If p_debug_level > 0 Then
1018: oe_debug_pub.add('here1');
1027: , l_order_rec.org_id
1028: ;
1029: CLOSE c_lines_per_order_2;
1030: v_end := DBMS_UTILITY.GET_TIME;
1031: FND_FILE.PUT_LINE(FND_FILE.LOG,'TIME FOR BULK COLLECT:'||TO_CHAR ( ( V_END-V_START ) /100 ) ) ;
1032: End If;
1033: -----------------------------------------------------------
1034: -- Assign request_id (instance) AND batch_id to the orders
1035: -----------------------------------------------------------
1054:
1055: IF l_num_lines > p_batch_size THEN
1056:
1057:
1058: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_order_rec.order_source_id(l_index))
1059: ||'/'||l_order_rec.orig_sys_document_ref(l_index));
1060: fnd_file.put_line(FND_FILE.OUTPUT,'This order cannot be processed in this batch.'||
1061: ' Order Size is > '||to_char(p_batch_size));
1062:
1056:
1057:
1058: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_order_rec.order_source_id(l_index))
1059: ||'/'||l_order_rec.orig_sys_document_ref(l_index));
1060: fnd_file.put_line(FND_FILE.OUTPUT,'This order cannot be processed in this batch.'||
1061: ' Order Size is > '||to_char(p_batch_size));
1062:
1063:
1064: -- Assign parent import program's request id. Without this, infinite
1153: l_index := l_index + 1;
1154:
1155: END LOOP; -- End of loop over Orders table - l_order_rec
1156: v_end := DBMS_UTILITY.GET_TIME;
1157: FND_FILE.PUT_LINE(FND_FILE.LOG,'Time to ASSIGN IDs :'||to_char((v_end-v_start)/100));
1158:
1159:
1160: --------------------------------------------------------------
1161: -- BULK UPDATE Request_ID and Batch_ID on headers iface table
1242:
1243: END LOOP;
1244:
1245: v_end := DBMS_UTILITY.GET_TIME;
1246: FND_FILE.PUT_LINE(FND_FILE.LOG,'Time to BULK UPDATE:'||to_char((v_end-v_start)/100));
1247:
1248: COMMIT;
1249:
1250: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
1355: -----------------------------------------------------------
1356: --IF OE_SYS_PARAMETERS.VALUE('ENABLE_FULFILLMENT_ACCEPTANCE',G_ORG_ID) = 'Y'
1357: --THEN
1358: -- FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_ACCEPTANCE');
1359: -- fnd_file.put_line(FND_FILE.OUTPUT, FND_MESSAGE.GET);
1360: -- retcode := 2;
1361: -- RETURN;
1362: -- END IF;
1363:
1412:
1413: G_ERROR_ORDERS := l_error_orders + l_batch_orders;
1414:
1415: l_count_batch_failure := l_count_batch_failure + 1;
1416: fnd_file.put_line(FND_FILE.LOG,'Batch id: '|| to_char(l_batch_id)||
1417: ' Status : Unexpected Error (all orders failed to import)'
1418: );
1419:
1420: ELSE
1426: p_batch_id => l_batch_id,
1427: p_validate_only => p_validate_only,
1428: x_return_status => l_return_status
1429: );
1430: fnd_file.put_line(FND_FILE.LOG,'Batch ID: '|| to_char(l_batch_id)||
1431: ' Status : Processed (orders could have failures due to validation errors)'
1432: );
1433: END IF;
1434:
1449: IF p_debug_level > 0 THEN
1450: SELECT hsecs INTO l_end_total_time from v$timer;
1451: END IF;
1452:
1453: FND_FILE.PUT_LINE(FND_FILE.LOG,'Total time is (sec) '
1454: ||((l_end_total_time-l_start_total_time)/100));
1455:
1456: fnd_file.put_line(FND_FILE.OUTPUT,'No. of batches found: ' ||
1457: l_count_batch);
1452:
1453: FND_FILE.PUT_LINE(FND_FILE.LOG,'Total time is (sec) '
1454: ||((l_end_total_time-l_start_total_time)/100));
1455:
1456: fnd_file.put_line(FND_FILE.OUTPUT,'No. of batches found: ' ||
1457: l_count_batch);
1458: fnd_file.put_line(FND_FILE.OUTPUT,'');
1459:
1460:
1454: ||((l_end_total_time-l_start_total_time)/100));
1455:
1456: fnd_file.put_line(FND_FILE.OUTPUT,'No. of batches found: ' ||
1457: l_count_batch);
1458: fnd_file.put_line(FND_FILE.OUTPUT,'');
1459:
1460:
1461: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Processed across All Batches :'||
1462: to_char(G_BOOKED_ORDERS + G_ENTERED_ORDERS + G_ERROR_ORDERS));
1457: l_count_batch);
1458: fnd_file.put_line(FND_FILE.OUTPUT,'');
1459:
1460:
1461: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Processed across All Batches :'||
1462: to_char(G_BOOKED_ORDERS + G_ENTERED_ORDERS + G_ERROR_ORDERS));
1463: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Booked Orders: '||
1464: to_char(G_BOOKED_ORDERS));
1465: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Entered Orders: ' ||
1459:
1460:
1461: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Processed across All Batches :'||
1462: to_char(G_BOOKED_ORDERS + G_ENTERED_ORDERS + G_ERROR_ORDERS));
1463: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Booked Orders: '||
1464: to_char(G_BOOKED_ORDERS));
1465: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Entered Orders: ' ||
1466: to_char(G_ENTERED_ORDERS));
1467: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Failed: ' ||
1461: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Processed across All Batches :'||
1462: to_char(G_BOOKED_ORDERS + G_ENTERED_ORDERS + G_ERROR_ORDERS));
1463: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Booked Orders: '||
1464: to_char(G_BOOKED_ORDERS));
1465: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Entered Orders: ' ||
1466: to_char(G_ENTERED_ORDERS));
1467: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Failed: ' ||
1468: to_char(G_ERROR_ORDERS));
1469:
1463: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Booked Orders: '||
1464: to_char(G_BOOKED_ORDERS));
1465: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Entered Orders: ' ||
1466: to_char(G_ENTERED_ORDERS));
1467: fnd_file.put_line(FND_FILE.OUTPUT,'No. of Orders Failed: ' ||
1468: to_char(G_ERROR_ORDERS));
1469:
1470: -- ER 9060917
1471: IF NVL (Fnd_Profile.Value('ONT_HVOP_DROP_INVALID_LINES'), 'N')='Y' then
1468: to_char(G_ERROR_ORDERS));
1469:
1470: -- ER 9060917
1471: IF NVL (Fnd_Profile.Value('ONT_HVOP_DROP_INVALID_LINES'), 'N')='Y' then
1472: fnd_file.put_line(FND_FILE.OUTPUT,'');
1473: fnd_file.put_line(FND_FILE.OUTPUT,'Following orders are processed partially as profile OM: Allow HVOP to drop invalid lines is set');
1474:
1475: OPEN l_partial_orders;
1476: LOOP
1469:
1470: -- ER 9060917
1471: IF NVL (Fnd_Profile.Value('ONT_HVOP_DROP_INVALID_LINES'), 'N')='Y' then
1472: fnd_file.put_line(FND_FILE.OUTPUT,'');
1473: fnd_file.put_line(FND_FILE.OUTPUT,'Following orders are processed partially as profile OM: Allow HVOP to drop invalid lines is set');
1474:
1475: OPEN l_partial_orders;
1476: LOOP
1477: FETCH l_partial_orders
1477: FETCH l_partial_orders
1478: INTO l_orig_sys_document_ref;
1479: EXIT when l_partial_orders%NOTFOUND;
1480:
1481: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_orig_sys_document_ref));
1482:
1483: END LOOP;
1484: CLOSE l_partial_orders;
1485: END IF;
1487: -----------------------------------------------------------
1488: -- Messages
1489: -----------------------------------------------------------
1490:
1491: fnd_file.put_line(FND_FILE.OUTPUT,'');
1492: fnd_file.put_line(FND_FILE.OUTPUT,'Source/Order/Seq/Line Message');
1493: OPEN l_msg_cursor;
1494: LOOP
1495: FETCH l_msg_cursor
1488: -- Messages
1489: -----------------------------------------------------------
1490:
1491: fnd_file.put_line(FND_FILE.OUTPUT,'');
1492: fnd_file.put_line(FND_FILE.OUTPUT,'Source/Order/Seq/Line Message');
1493: OPEN l_msg_cursor;
1494: LOOP
1495: FETCH l_msg_cursor
1496: INTO l_order_source_id
1499: , l_orig_sys_line_ref
1500: , l_message_text;
1501: EXIT WHEN l_msg_cursor%NOTFOUND;
1502:
1503: fnd_file.put_line(FND_FILE.OUTPUT,to_char(l_order_source_id)
1504: ||'/'||l_orig_sys_document_ref
1505: ||'/'||l_change_sequence
1506: ||'/'||l_orig_sys_line_ref
1507: ||' '||l_message_text);
1504: ||'/'||l_orig_sys_document_ref
1505: ||'/'||l_change_sequence
1506: ||'/'||l_orig_sys_line_ref
1507: ||' '||l_message_text);
1508: fnd_file.put_line(FND_FILE.OUTPUT,'');
1509: END LOOP;
1510:
1511: END IF; -- End if for l_num_instances
1512:
1512:
1513: -----------------------------------------------------------
1514: -- End of Order_Import_Conc_Pgm
1515: -----------------------------------------------------------
1516: fnd_file.put_line(FND_FILE.OUTPUT, 'End of BULK Order Import Concurrent Program');
1517:
1518: EXCEPTION
1519: WHEN OTHERS THEN
1520: retcode := 2;
1517:
1518: EXCEPTION
1519: WHEN OTHERS THEN
1520: retcode := 2;
1521: fnd_file.put_line(FND_FILE.OUTPUT,'Unexpected error '||substr(sqlerrm,1,200));
1522: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches imported: '||
1523: l_count_batch_success);
1524: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches failed: ' ||
1525: l_count_batch_failure);
1518: EXCEPTION
1519: WHEN OTHERS THEN
1520: retcode := 2;
1521: fnd_file.put_line(FND_FILE.OUTPUT,'Unexpected error '||substr(sqlerrm,1,200));
1522: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches imported: '||
1523: l_count_batch_success);
1524: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches failed: ' ||
1525: l_count_batch_failure);
1526: fnd_file.put_line(FND_FILE.OUTPUT,'');
1520: retcode := 2;
1521: fnd_file.put_line(FND_FILE.OUTPUT,'Unexpected error '||substr(sqlerrm,1,200));
1522: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches imported: '||
1523: l_count_batch_success);
1524: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches failed: ' ||
1525: l_count_batch_failure);
1526: fnd_file.put_line(FND_FILE.OUTPUT,'');
1527: END ORDER_IMPORT_CONC_PGM;
1528:
1522: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches imported: '||
1523: l_count_batch_success);
1524: fnd_file.put_line(FND_FILE.OUTPUT,'no. of batches failed: ' ||
1525: l_count_batch_failure);
1526: fnd_file.put_line(FND_FILE.OUTPUT,'');
1527: END ORDER_IMPORT_CONC_PGM;
1528:
1529:
1530: END OE_BULK_ORDER_IMPORT_PVT;