[Home] [Help]
1696: l_num_errors NUMBER :=0;
1697: l_tmp_rr_number VARCHAR2(40);
1698: l_txn_history_rec wsh_inbound_txn_history_pkg.ib_txn_history_rec_type;
1699: l_cache_index NUMBER;
1700: l_action_prms WSH_DELIVERIES_GRP.action_parameters_rectype;
1701: l_delivery_out_rec WSH_DELIVERIES_GRP.Delivery_Action_Out_Rec_Type;
1702: l_defaults_rec WSH_DELIVERIES_GRP.default_parameters_rectype;
1703: l_msg_data VARCHAR2(32767);
1704: l_xc_msg_count NUMBER;
1697: l_tmp_rr_number VARCHAR2(40);
1698: l_txn_history_rec wsh_inbound_txn_history_pkg.ib_txn_history_rec_type;
1699: l_cache_index NUMBER;
1700: l_action_prms WSH_DELIVERIES_GRP.action_parameters_rectype;
1701: l_delivery_out_rec WSH_DELIVERIES_GRP.Delivery_Action_Out_Rec_Type;
1702: l_defaults_rec WSH_DELIVERIES_GRP.default_parameters_rectype;
1703: l_msg_data VARCHAR2(32767);
1704: l_xc_msg_count NUMBER;
1705: l_respIndex NUMBER;
1698: l_txn_history_rec wsh_inbound_txn_history_pkg.ib_txn_history_rec_type;
1699: l_cache_index NUMBER;
1700: l_action_prms WSH_DELIVERIES_GRP.action_parameters_rectype;
1701: l_delivery_out_rec WSH_DELIVERIES_GRP.Delivery_Action_Out_Rec_Type;
1702: l_defaults_rec WSH_DELIVERIES_GRP.default_parameters_rectype;
1703: l_msg_data VARCHAR2(32767);
1704: l_xc_msg_count NUMBER;
1705: l_respIndex NUMBER;
1706: l_numRowsUpdated NUMBER;
2449: --}
2450: END IF;
2451: --
2452: -- Convert l_dlvy_rr_cache_tbl to a new contiguous table (l_dlvy_rr_tbl)
2453: -- call WSH_DELIVERIES_GRP.delivery_action passing l_dlvy_rr_tbl
2454: -- AND action_code = 'GENERATE-ROUTING-RESPONSE'.
2455: -- l_dlvy_rr_tbl.delete;
2456: l_cache_index := l_dlvy_rr_cache_tbl.FIRST ;
2457: WHILE l_cache_index IS NOT NULL
2473: l_action_prms.caller := 'WSH_PUB';
2474: --
2475: IF l_debug_on THEN
2476: --{
2477: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERIES_GRP.DELIVERY_ACTION',WSH_DEBUG_SV.C_PROC_LEVEL);
2478: WSH_DEBUG_SV.log(l_module_name, 'l_dlvy_rr_tbl.COUNT', l_dlvy_rr_tbl.COUNT);
2479: --}
2480: END IF;
2481: --
2480: END IF;
2481: --
2482: IF l_dlvy_rr_tbl.COUNT > 0 THEN
2483: --{
2484: WSH_DELIVERIES_GRP.delivery_action(
2485: p_api_version_number => 1.0,
2486: p_init_msg_list => FND_API.G_FALSE,
2487: p_commit => FND_API.G_FALSE,
2488: p_action_prms => l_action_prms,
2494: x_msg_data => l_msg
2495: );
2496: IF l_debug_on THEN
2497: --{
2498: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status from WSH_DELIVERIES_GRP.DELIVERY_ACTION is ' || l_return_status, WSH_DEBUG_SV.C_PROC_LEVEL);
2499: --}
2500: END IF;
2501:
2502: wsh_util_core.api_post_call(