DBA Data[Home] [Help]

APPS.WSH_USA_INV_PVT dependencies on WSH_PICK_LIST

Line 39: p_org_info_tbl IN WSH_PICK_LIST.Org_Params_Rec_Tbl,

35: x_return_status - Return Status (Success/Unexpected Error)
36: */
37: PROCEDURE Unassign_Backordered_Details (
38: p_backorder_rec_tbl IN Back_Det_Rec_Tbl,
39: p_org_info_tbl IN WSH_PICK_LIST.Org_Params_Rec_Tbl,
40: x_return_status OUT NOCOPY VARCHAR2
41: ) IS
42:
43:

Line 137: IF WSH_PICK_LIST.G_BATCH_ID IS NOT NULL AND p_backorder_rec_tbl(i).delivery_id IS NOT NULL THEN --{

133:
134: SAVEPOINT unassign_backorder_details;
135:
136: -- For Pick Release cases where Delivery exists
137: IF WSH_PICK_LIST.G_BATCH_ID IS NOT NULL AND p_backorder_rec_tbl(i).delivery_id IS NOT NULL THEN --{
138:
139: l_delivery_id_mod := MOD(p_backorder_rec_tbl(i).delivery_id,WSH_UTIL_CORE.C_INDEX_LIMIT) ; --Bug 9406326
140:
141: -- If the Delivery will be unassigned, then add to the list

Line 144: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(l_delivery_id_mod)) THEN --{ --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod

140:
141: -- If the Delivery will be unassigned, then add to the list
142: -- This is used to unassign empty containers from the Delivery at the end of Pick Release process
143: IF p_backorder_rec_tbl(i).planned_flag = 'N'
144: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(l_delivery_id_mod)) THEN --{ --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
145: IF l_debug_on THEN
146: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning delivery to WSH_PICK_LIST.g_unassigned_delivery_ids');
147: END IF;
148: WSH_PICK_LIST.g_unassigned_delivery_ids(l_delivery_id_mod) := p_backorder_rec_tbl(i).delivery_id; --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod

Line 146: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning delivery to WSH_PICK_LIST.g_unassigned_delivery_ids');

142: -- This is used to unassign empty containers from the Delivery at the end of Pick Release process
143: IF p_backorder_rec_tbl(i).planned_flag = 'N'
144: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(l_delivery_id_mod)) THEN --{ --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
145: IF l_debug_on THEN
146: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning delivery to WSH_PICK_LIST.g_unassigned_delivery_ids');
147: END IF;
148: WSH_PICK_LIST.g_unassigned_delivery_ids(l_delivery_id_mod) := p_backorder_rec_tbl(i).delivery_id; --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
149: END IF; --}
150:

Line 148: WSH_PICK_LIST.g_unassigned_delivery_ids(l_delivery_id_mod) := p_backorder_rec_tbl(i).delivery_id; --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod

144: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(l_delivery_id_mod)) THEN --{ --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
145: IF l_debug_on THEN
146: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning delivery to WSH_PICK_LIST.g_unassigned_delivery_ids');
147: END IF;
148: WSH_PICK_LIST.g_unassigned_delivery_ids(l_delivery_id_mod) := p_backorder_rec_tbl(i).delivery_id; --Bug 9406326 replaced p_backorder_rec_tbl(i).delivery_id with l_delivery_id_mod
149: END IF; --}
150:
151: -- Storing Pre-existing Assigned Deliveries to call Adjust_Planned_Flag API in Pick Release process
152: -- These deliveries will not have either a batch_id or the same Pick Release batch_id

Line 155: IF WSH_PICK_LIST.G_BATCH_ID <> NVL(p_backorder_rec_tbl(i).del_batch_id, -99) THEN --{

151: -- Storing Pre-existing Assigned Deliveries to call Adjust_Planned_Flag API in Pick Release process
152: -- These deliveries will not have either a batch_id or the same Pick Release batch_id
153: -- This is required since some deliveries will no longer have any details from the Pick Release batch
154: -- and they might have to be Planned. Hence this is stored in this table
155: IF WSH_PICK_LIST.G_BATCH_ID <> NVL(p_backorder_rec_tbl(i).del_batch_id, -99) THEN --{
156: IF WSH_PICK_LIST.g_assigned_del_tbl.count = 0 THEN --{
157: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
158: ELSE
159: l_found_assigned_del := FALSE;

Line 156: IF WSH_PICK_LIST.g_assigned_del_tbl.count = 0 THEN --{

152: -- These deliveries will not have either a batch_id or the same Pick Release batch_id
153: -- This is required since some deliveries will no longer have any details from the Pick Release batch
154: -- and they might have to be Planned. Hence this is stored in this table
155: IF WSH_PICK_LIST.G_BATCH_ID <> NVL(p_backorder_rec_tbl(i).del_batch_id, -99) THEN --{
156: IF WSH_PICK_LIST.g_assigned_del_tbl.count = 0 THEN --{
157: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
158: ELSE
159: l_found_assigned_del := FALSE;
160: FOR j in WSH_PICK_LIST.g_assigned_del_tbl.FIRST .. WSH_PICK_LIST.g_assigned_del_tbl.LAST LOOP

Line 157: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;

153: -- This is required since some deliveries will no longer have any details from the Pick Release batch
154: -- and they might have to be Planned. Hence this is stored in this table
155: IF WSH_PICK_LIST.G_BATCH_ID <> NVL(p_backorder_rec_tbl(i).del_batch_id, -99) THEN --{
156: IF WSH_PICK_LIST.g_assigned_del_tbl.count = 0 THEN --{
157: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
158: ELSE
159: l_found_assigned_del := FALSE;
160: FOR j in WSH_PICK_LIST.g_assigned_del_tbl.FIRST .. WSH_PICK_LIST.g_assigned_del_tbl.LAST LOOP
161: IF WSH_PICK_LIST.g_assigned_del_tbl(j) = p_backorder_rec_tbl(i).delivery_id THEN

Line 160: FOR j in WSH_PICK_LIST.g_assigned_del_tbl.FIRST .. WSH_PICK_LIST.g_assigned_del_tbl.LAST LOOP

156: IF WSH_PICK_LIST.g_assigned_del_tbl.count = 0 THEN --{
157: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
158: ELSE
159: l_found_assigned_del := FALSE;
160: FOR j in WSH_PICK_LIST.g_assigned_del_tbl.FIRST .. WSH_PICK_LIST.g_assigned_del_tbl.LAST LOOP
161: IF WSH_PICK_LIST.g_assigned_del_tbl(j) = p_backorder_rec_tbl(i).delivery_id THEN
162: l_found_assigned_del := TRUE;
163: EXIT;
164: END IF;

Line 161: IF WSH_PICK_LIST.g_assigned_del_tbl(j) = p_backorder_rec_tbl(i).delivery_id THEN

157: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
158: ELSE
159: l_found_assigned_del := FALSE;
160: FOR j in WSH_PICK_LIST.g_assigned_del_tbl.FIRST .. WSH_PICK_LIST.g_assigned_del_tbl.LAST LOOP
161: IF WSH_PICK_LIST.g_assigned_del_tbl(j) = p_backorder_rec_tbl(i).delivery_id THEN
162: l_found_assigned_del := TRUE;
163: EXIT;
164: END IF;
165: END LOOP;

Line 167: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;

163: EXIT;
164: END IF;
165: END LOOP;
166: IF NOT l_found_assigned_del THEN
167: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
168: END IF;
169: END IF; --}
170: END IF; --}
171:

Line 649: l_org_info_tbl WSH_PICK_LIST.Org_Params_Rec_Tbl;

645: l_oeline_pref_grade VARCHAR2(150) := NULL;
646: l_line_direction VARCHAR2(10);
647:
648: l_backorder_rec_tbl Back_Det_Rec_Tbl;
649: l_org_info_tbl WSH_PICK_LIST.Org_Params_Rec_Tbl;
650:
651: BEGIN
652:
653: --

Line 712: batch_id = WSH_PICK_LIST.G_BATCH_ID,

708: preferred_grade = l_oeline_pref_grade,
709: serial_number = NULL,
710: -- Batch_id is required for additional processing in Release_Batch API and hence this is retained for Pick Release
711: -- Pick Release sets batch_id as Null for backordered details at the end of Pick Release process
712: batch_id = WSH_PICK_LIST.G_BATCH_ID,
713: lpn_id = NULL,
714: last_update_date = SYSDATE,
715: last_updated_by = l_user_id,
716: last_update_login = l_login_id,

Line 804: -- Unassignment API is later called from WSH_PICK_LIST.Release_Batch API

800: IF l_debug_on THEN
801: WSH_DEBUG_SV.log(l_module_name,'Updated wsh_delivery_details for backordered_delivery_detail ' ,p_delivery_detail_id);
802: END IF;
803: -- If Pick Release is run in Parallel Mode, then Unassigning is Deferred
804: -- Unassignment API is later called from WSH_PICK_LIST.Release_Batch API
805: -- For backordering in other cases or Non-Parallel Pick Release, unassign api is called immediately
806: IF WSH_PICK_LIST.G_PICK_REL_PARALLEL IS NULL OR (NOT WSH_PICK_LIST.G_PICK_REL_PARALLEL) THEN --{
807: -- Assigning all values to Backorder Table of Record
808: l_backorder_rec_tbl(1).delivery_detail_id := p_delivery_detail_id;

Line 806: IF WSH_PICK_LIST.G_PICK_REL_PARALLEL IS NULL OR (NOT WSH_PICK_LIST.G_PICK_REL_PARALLEL) THEN --{

802: END IF;
803: -- If Pick Release is run in Parallel Mode, then Unassigning is Deferred
804: -- Unassignment API is later called from WSH_PICK_LIST.Release_Batch API
805: -- For backordering in other cases or Non-Parallel Pick Release, unassign api is called immediately
806: IF WSH_PICK_LIST.G_PICK_REL_PARALLEL IS NULL OR (NOT WSH_PICK_LIST.G_PICK_REL_PARALLEL) THEN --{
807: -- Assigning all values to Backorder Table of Record
808: l_backorder_rec_tbl(1).delivery_detail_id := p_delivery_detail_id;
809: l_backorder_rec_tbl(1).delivery_id := l_delivery_id;
810: l_backorder_rec_tbl(1).container_id := l_container_id;

Line 4987: WSH_PICK_LIST.G_BACKORDERED := TRUE;

4983: -- if action_flag = 'R'
4984: --bug# 6689448 (replenishment project): end
4985: ELSIF (p_changed_attributes(l_Counter).action_flag = 'B' ) THEN
4986: -- Setting Backorder Flag as TRUE so that request ends with Warning
4987: WSH_PICK_LIST.G_BACKORDERED := TRUE;
4988: --BUG#:1549665 hwahdani log exception if running from conc. request
4989: -- and action is backorder
4990: l_request_id := fnd_global.conc_request_id;
4991: -- 1729516

Line 4994: WSH_PICK_LIST.G_BATCH_ID IS NOT NULL ) THEN

4990: l_request_id := fnd_global.conc_request_id;
4991: -- 1729516
4992: IF ( l_request_id <> -1 OR
4993: p_changed_attributes(l_Counter).cycle_count_quantity = FND_API.G_MISS_NUM OR
4994: WSH_PICK_LIST.G_BATCH_ID IS NOT NULL ) THEN
4995: --
4996: -- Debug Statements
4997: --
4998: IF l_debug_on THEN

Line 5281: p_batch_id => WSH_PICK_LIST.G_BATCH_ID

5277: p_message => l_msg ,
5278: p_error_message => l_exception_error_message,
5279: p_request_id => l_request_id,
5280: -- 1729516
5281: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
5282: );
5283: IF l_debug_on THEN
5284: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5285: END IF;

Line 5355: p_batch_id => WSH_PICK_LIST.G_BATCH_ID

5351: p_quantity => l_quantity,--Bug:1646466
5352: p_unit_of_measure => l_unit_of_measure, --Bug:1646466
5353: p_request_id => l_request_id,
5354: -- 1729516
5355: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
5356: );
5357: IF l_debug_on THEN
5358: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5359: END IF;

Line 5433: p_batch_id => WSH_PICK_LIST.G_BATCH_ID

5429: p_quantity => l_quantity,--Bug:1646466
5430: p_unit_of_measure => l_unit_of_measure, --Bug:1646466
5431: p_request_id => l_request_id,
5432: -- 1729516
5433: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
5434: );
5435: IF l_debug_on THEN
5436: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
5437: END IF;

Line 6839: batch_id = DECODE(batch_id, NULL, WSH_PICK_LIST.G_BATCH_ID, batch_id),

6835: DECODE(p_changed_attributes(l_counter).ordered_quantity_uom2,
6836: FND_API.G_MISS_CHAR, requested_quantity_uom2,
6837: p_changed_attributes(l_counter).ordered_quantity_uom2),
6838: requested_quantity_uom2),
6839: batch_id = DECODE(batch_id, NULL, WSH_PICK_LIST.G_BATCH_ID, batch_id),
6840: last_update_date = SYSDATE,
6841: last_updated_by = l_user_id,
6842: last_update_login = l_login_id,
6843: ----Bug#5104847:transaction_id updated only when l_transaction_id is not FND_API.G_MISS_NUM (default value).

Line 7011: and NVL(WSH_PICK_LIST.G_AUTO_PICK_CONFIRM, 'N') <> 'Y' THEN

7007: IF l_update_rel_status = 'Y'
7008: and old_delivery_detail_rec.pickable_flag = 'Y'
7009: and p_changed_attributes(l_counter).released_status = 'Y'
7010: and l_delivery_id is not NULL
7011: and NVL(WSH_PICK_LIST.G_AUTO_PICK_CONFIRM, 'N') <> 'Y' THEN
7012: l_delivery_already_included := false;
7013:
7014: IF l_adjust_planned_del_tab.count > 0 THEN
7015: FOR i in l_adjust_planned_del_tab.FIRST .. l_adjust_planned_del_tab.LAST LOOP