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 135: IF WSH_PICK_LIST.G_BATCH_ID IS NOT NULL AND p_backorder_rec_tbl(i).delivery_id IS NOT NULL THEN --{

131:
132: SAVEPOINT unassign_backorder_details;
133:
134: -- For Pick Release cases where Delivery exists
135: IF WSH_PICK_LIST.G_BATCH_ID IS NOT NULL AND p_backorder_rec_tbl(i).delivery_id IS NOT NULL THEN --{
136:
137: -- If the Delivery will be unassigned, then add to the list
138: -- This is used to unassign empty containers from the Delivery at the end of Pick Release process
139: IF p_backorder_rec_tbl(i).planned_flag = 'N'

Line 140: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(p_backorder_rec_tbl(i).delivery_id)) THEN --{

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

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

138: -- This is used to unassign empty containers from the Delivery at the end of Pick Release process
139: IF p_backorder_rec_tbl(i).planned_flag = 'N'
140: AND (NOT WSH_PICK_LIST.g_unassigned_delivery_ids.exists(p_backorder_rec_tbl(i).delivery_id)) THEN --{
141: IF l_debug_on THEN
142: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning delivery to WSH_PICK_LIST.g_unassigned_delivery_ids');
143: END IF;
144: WSH_PICK_LIST.g_unassigned_delivery_ids(p_backorder_rec_tbl(i).delivery_id) := p_backorder_rec_tbl(i).delivery_id;
145: END IF; --}
146:

Line 144: WSH_PICK_LIST.g_unassigned_delivery_ids(p_backorder_rec_tbl(i).delivery_id) := p_backorder_rec_tbl(i).delivery_id;

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

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

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

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

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

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

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

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

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

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

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

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

159: EXIT;
160: END IF;
161: END LOOP;
162: IF NOT l_found_assigned_del THEN
163: WSH_PICK_LIST.g_assigned_del_tbl(WSH_PICK_LIST.g_assigned_del_tbl.count+1) := p_backorder_rec_tbl(i).delivery_id;
164: END IF;
165: END IF; --}
166: END IF; --}
167:

Line 642: l_org_info_tbl WSH_PICK_LIST.Org_Params_Rec_Tbl;

638: l_oeline_pref_grade VARCHAR2(150) := NULL;
639: l_line_direction VARCHAR2(10);
640:
641: l_backorder_rec_tbl Back_Det_Rec_Tbl;
642: l_org_info_tbl WSH_PICK_LIST.Org_Params_Rec_Tbl;
643:
644: BEGIN
645:
646: --

Line 700: batch_id = WSH_PICK_LIST.G_BATCH_ID,

696: revision = NULL,
697: serial_number = NULL,
698: -- Batch_id is required for additional processing in Release_Batch API and hence this is retained for Pick Release
699: -- Pick Release sets batch_id as Null for backordered details at the end of Pick Release process
700: batch_id = WSH_PICK_LIST.G_BATCH_ID,
701: lpn_id = NULL,
702: last_update_date = SYSDATE,
703: last_updated_by = l_user_id,
704: last_update_login = l_login_id,

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

787: IF l_debug_on THEN
788: WSH_DEBUG_SV.log(l_module_name,'Updated wsh_delivery_details for backordered_delivery_detail ' ,p_delivery_detail_id);
789: END IF;
790: -- If Pick Release is run in Parallel Mode, then Unassigning is Deferred
791: -- Unassignment API is later called from WSH_PICK_LIST.Release_Batch API
792: -- For backordering in other cases or Non-Parallel Pick Release, unassign api is called immediately
793: IF WSH_PICK_LIST.G_PICK_REL_PARALLEL IS NULL OR (NOT WSH_PICK_LIST.G_PICK_REL_PARALLEL) THEN --{
794: -- Assigning all values to Backorder Table of Record
795: l_backorder_rec_tbl(1).delivery_detail_id := p_delivery_detail_id;

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

789: END IF;
790: -- If Pick Release is run in Parallel Mode, then Unassigning is Deferred
791: -- Unassignment API is later called from WSH_PICK_LIST.Release_Batch API
792: -- For backordering in other cases or Non-Parallel Pick Release, unassign api is called immediately
793: IF WSH_PICK_LIST.G_PICK_REL_PARALLEL IS NULL OR (NOT WSH_PICK_LIST.G_PICK_REL_PARALLEL) THEN --{
794: -- Assigning all values to Backorder Table of Record
795: l_backorder_rec_tbl(1).delivery_detail_id := p_delivery_detail_id;
796: l_backorder_rec_tbl(1).delivery_id := l_delivery_id;
797: l_backorder_rec_tbl(1).container_id := l_container_id;

Line 4451: WSH_PICK_LIST.G_BACKORDERED := TRUE;

4447: -- if action_flag = 'R'
4448: --bug# 6689448 (replenishment project): end
4449: ELSIF (p_changed_attributes(l_Counter).action_flag = 'B' ) THEN
4450: -- Setting Backorder Flag as TRUE so that request ends with Warning
4451: WSH_PICK_LIST.G_BACKORDERED := TRUE;
4452: --BUG#:1549665 hwahdani log exception if running from conc. request
4453: -- and action is backorder
4454: l_request_id := fnd_global.conc_request_id;
4455: -- 1729516

Line 4458: WSH_PICK_LIST.G_BATCH_ID IS NOT NULL ) THEN

4454: l_request_id := fnd_global.conc_request_id;
4455: -- 1729516
4456: IF ( l_request_id <> -1 OR
4457: p_changed_attributes(l_Counter).cycle_count_quantity = FND_API.G_MISS_NUM OR
4458: WSH_PICK_LIST.G_BATCH_ID IS NOT NULL ) THEN
4459: --
4460: -- Debug Statements
4461: --
4462: IF l_debug_on THEN

Line 4745: p_batch_id => WSH_PICK_LIST.G_BATCH_ID

4741: p_message => l_msg ,
4742: p_error_message => l_exception_error_message,
4743: p_request_id => l_request_id,
4744: -- 1729516
4745: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
4746: );
4747: IF l_debug_on THEN
4748: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
4749: END IF;

Line 4809: p_batch_id => WSH_PICK_LIST.G_BATCH_ID

4805: p_quantity => p_changed_attributes(l_Counter).cycle_count_quantity,--Bug:1646466
4806: p_unit_of_measure => old_delivery_detail_rec.requested_quantity_uom,--Bug:1646466
4807: p_request_id => l_request_id,
4808: -- 1729516
4809: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
4810: );
4811: IF l_debug_on THEN
4812: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
4813: END IF;

Line 4877: p_batch_id => WSH_PICK_LIST.G_BATCH_ID

4873: p_quantity => p_changed_attributes(l_Counter).cycle_count_quantity,--Bug:1646466
4874: p_unit_of_measure => old_delivery_detail_rec.requested_quantity_uom,--Bug:1646466
4875: p_request_id => l_request_id,
4876: -- 1729516
4877: p_batch_id => WSH_PICK_LIST.G_BATCH_ID
4878: );
4879: IF l_debug_on THEN
4880: WSH_DEBUG_SV.log(l_module_name,'log_exception l_exception_return_status',l_exception_return_status);
4881: END IF;

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

6168: DECODE(p_changed_attributes(l_counter).ordered_quantity_uom2,
6169: FND_API.G_MISS_CHAR, requested_quantity_uom2,
6170: p_changed_attributes(l_counter).ordered_quantity_uom2),
6171: requested_quantity_uom2),
6172: batch_id = DECODE(batch_id, NULL, WSH_PICK_LIST.G_BATCH_ID, batch_id),
6173: last_update_date = SYSDATE,
6174: last_updated_by = l_user_id,
6175: last_update_login = l_login_id,
6176: ----Bug#5104847:transaction_id updated only when l_transaction_id is not FND_API.G_MISS_NUM (default value).

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

6306: IF l_update_rel_status = 'Y'
6307: and old_delivery_detail_rec.pickable_flag = 'Y'
6308: and p_changed_attributes(l_counter).released_status = 'Y'
6309: and l_delivery_id is not NULL
6310: and NVL(WSH_PICK_LIST.G_AUTO_PICK_CONFIRM, 'N') <> 'Y' THEN
6311: l_delivery_already_included := false;
6312:
6313: IF l_adjust_planned_del_tab.count > 0 THEN
6314: FOR i in l_adjust_planned_del_tab.FIRST .. l_adjust_planned_del_tab.LAST LOOP