eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.WMS_RULE_PVT dependencies on WMS_RULE_PVT

Line 1: PACKAGE BODY wms_rule_pvt AS

1: PACKAGE BODY wms_rule_pvt AS
2: /* $Header: WMSVPPRB.pls 120.109.12020000.14 2013/03/20 20:38:42 sahmahes ship $ */
3: --
4: -- File : WMSVPPRB.pls
5: -- Content : WMS_Rule_PVT package body

Line 5: -- Content : WMS_Rule_PVT package body

1: PACKAGE BODY wms_rule_pvt AS
2: /* $Header: WMSVPPRB.pls 120.109.12020000.14 2013/03/20 20:38:42 sahmahes ship $ */
3: --
4: -- File : WMSVPPRB.pls
5: -- Content : WMS_Rule_PVT package body
6: -- Description : wms rule private API's
7: -- Notes :
8: -- Modified : 02/08/99 mzeckzer created
9: -- 03/29/99 bitang modified

Line 28: -- WMS_RULE_PVT as a ref Cursor. Also modified the open,

24: -- 07/11/02 grao Modified the Rules package generating code to
25: -- conver all global variables in the rules packages to
26: -- local variables and defined Pick and Putaway cursors
27: -- as ref cursor, which is passed from the
28: -- WMS_RULE_PVT as a ref Cursor. Also modified the open,
29: -- fetch and close calls for Pick and Putaway rules
30: -- 10/15/09 Bug 8638386 Pushkar
31: -- Reorganize/extend fix 8665496 - for lot conversion + deviation
32: -- 12/12/11 Added these 5 new variables as part of Bug 13448337 schiluve

Line 50: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_Rule_PVT';

46: --
47:
48: --
49: -- Package global variable that stores the package name
50: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_Rule_PVT';
51: --
52: -- API versions used within this API
53: g_qty_tree_api_version CONSTANT NUMBER := 1.0; -- INV_Quantity_Tree_PVT
54: --

Line 512: ,WMS_Rule_PVT.GetConversionRate(

508: ,sub.reservable_type
509: ,nvl(loc.reservable_type,1) locreservable -- Bug 6719290
510: ,nvl(lot.reservable_type,1) lotreservable -- Bug 6719290
511: ,nvl(loc.pick_uom_code, sub.pick_uom_code) uom_code
512: ,WMS_Rule_PVT.GetConversionRate(
513: nvl(loc.pick_uom_code, sub.pick_uom_code)
514: ,msn.current_organization_id
515: ,msn.inventory_item_id) conversion_rate
516: ,msn.lpn_id lpn_id

Line 568: ,WMS_Rule_PVT.GetConversionRate(

564: ,sub.reservable_type
565: ,nvl(loc.reservable_type,1) locreservable -- Bug 6719290
566: ,nvl(lot.reservable_type,1) lotreservable -- Bug 6719290
567: ,nvl(loc.pick_uom_code, sub.pick_uom_code) uom_code
568: ,WMS_Rule_PVT.GetConversionRate(
569: nvl(loc.pick_uom_code, sub.pick_uom_code)
570: ,msn.current_organization_id
571: ,msn.inventory_item_id) conversion_rate
572: ,msn.lpn_id lpn_id

Line 624: ,WMS_Rule_PVT.GetConversionRate(

620: ,sub.reservable_type
621: ,nvl(loc.reservable_type,1) locreservable -- Bug 6719290
622: ,nvl(lot.reservable_type,1) lotreservable -- Bug 6719290
623: ,nvl(loc.pick_uom_code, sub.pick_uom_code) uom_code
624: ,WMS_Rule_PVT.GetConversionRate(
625: nvl(loc.pick_uom_code, sub.pick_uom_code)
626: ,msn.current_organization_id
627: ,msn.inventory_item_id) conversion_rate
628: ,msn.lpn_id lpn_id

Line 956: , p_cursor IN wms_rule_pvt.cv_pick_type

952: PROCEDURE FetchCursorRows(
953: x_return_status OUT NOCOPY VARCHAR2
954: , x_msg_count OUT NOCOPY NUMBER
955: , x_msg_data OUT NOCOPY VARCHAR2
956: , p_cursor IN wms_rule_pvt.cv_pick_type
957: , p_rule_id IN NUMBER
958: );
959:
960: -- =============================================

Line 1066: IF ( wms_rule_pvt.g_serial_objects_used IS NULL ) THEN

1062: Trace( ' Start IsSerialObjectUsed g_serial_objects_used ' || to_char( g_serial_objects_used));
1063: */
1064:
1065: l_serial_object_used := 0 ;
1066: IF ( wms_rule_pvt.g_serial_objects_used IS NULL ) THEN
1067: --Trace( ' IsSerialObjectUsed -- If condition is true ');
1068: SELECT count( DISTINCT p.object_id)
1069: INTO l_serial_object_used
1070: FROM wms_selection_criteria_txn wsc,

Line 1091: wms_rule_pvt.g_serial_objects_used := l_serial_object_used;

1087: OR (wrb.rule_id = s.rule_id AND s.parameter_id = p.parameter_id) OR (wrb.rule_id = c.rule_id AND c.parameter_id = p.parameter_id) )
1088: AND wrb.organization_id IN (p_organization_id, -1)
1089: AND p.object_id = 26; --- 26 is Serial object
1090:
1091: wms_rule_pvt.g_serial_objects_used := l_serial_object_used;
1092:
1093: --Trace( ' IsSerialObjectUsed -- l_serial_object_used ' || wms_rule_pvt.g_serial_object_used);
1094: ELSE
1095: l_serial_object_used := wms_rule_pvt.g_serial_objects_used;

Line 1093: --Trace( ' IsSerialObjectUsed -- l_serial_object_used ' || wms_rule_pvt.g_serial_object_used);

1089: AND p.object_id = 26; --- 26 is Serial object
1090:
1091: wms_rule_pvt.g_serial_objects_used := l_serial_object_used;
1092:
1093: --Trace( ' IsSerialObjectUsed -- l_serial_object_used ' || wms_rule_pvt.g_serial_object_used);
1094: ELSE
1095: l_serial_object_used := wms_rule_pvt.g_serial_objects_used;
1096: END IF;
1097:

Line 1095: l_serial_object_used := wms_rule_pvt.g_serial_objects_used;

1091: wms_rule_pvt.g_serial_objects_used := l_serial_object_used;
1092:
1093: --Trace( ' IsSerialObjectUsed -- l_serial_object_used ' || wms_rule_pvt.g_serial_object_used);
1094: ELSE
1095: l_serial_object_used := wms_rule_pvt.g_serial_objects_used;
1096: END IF;
1097:
1098: If l_serial_object_used >= 1 THEN
1099: RETURN TRUE;

Line 1583: || ' ,WMS_Rule_PVT.GetConversionRate( '

1579: || ' ,x.lotreservable lotreservable '
1580: || g_line_feed -- Bug 6719290 End
1581: || ' ,NVL(loc.pick_uom_code,sub.pick_uom_code) uom_code'
1582: || g_line_feed
1583: || ' ,WMS_Rule_PVT.GetConversionRate( '
1584: || g_line_feed
1585: || ' NVL(loc.pick_uom_code, sub.pick_uom_code) '
1586: || g_line_feed
1587: || ' ,x.organization_id '

Line 3499: g_input_where || ' and ' || 'Wms_Rule_Pvt.Match_Planning_Group('

3495: g_input_where || ' and ' || g_input_table_alias || '.PP_TRANSACTION_TEMP_ID = ' || 'g_pp_transaction_temp_id' || g_line_feed;
3496:
3497: --Bug9669364
3498: g_input_where :=
3499: g_input_where || ' and ' || 'Wms_Rule_Pvt.Match_Planning_Group('
3500: || 'base.ORGANIZATION_ID,base.locator_id, g_project_id,'
3501: || ' mptdtv.project_id, mptdtv.task_id,g_transaction_type_id,g_inventory_item_id,base.project_id,base.task_id) = 1'-- Added for Bug 10379126
3502: || g_line_feed;
3503:

Line 3570: , p_cursor IN wms_rule_pvt.cv_pick_type

3566: PROCEDURE fetchcursor(
3567: x_return_status OUT NOCOPY VARCHAR2
3568: , x_msg_count OUT NOCOPY NUMBER
3569: , x_msg_data OUT NOCOPY VARCHAR2
3570: , p_cursor IN wms_rule_pvt.cv_pick_type
3571: , p_rule_id IN NUMBER
3572: , x_revision OUT NOCOPY VARCHAR2
3573: , x_lot_number OUT NOCOPY VARCHAR2
3574: , x_lot_expiration_date OUT NOCOPY DATE

Line 3616: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;

3612: --- and if ctr = 3 then subscript = 2, this script is added to the package
3613: --- name.
3614:
3615:
3616: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;
3617: l_list_pkg := 'wms_rule_pick_pkg' || l_ctr ;
3618:
3619: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
3620: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);

Line 3764: , p_cursor IN wms_rule_pvt.cv_put_type

3760: PROCEDURE fetchputaway(
3761: x_return_status OUT NOCOPY VARCHAR2
3762: , x_msg_count OUT NOCOPY NUMBER
3763: , x_msg_data OUT NOCOPY VARCHAR2
3764: , p_cursor IN wms_rule_pvt.cv_put_type
3765: , p_rule_id IN NUMBER
3766: , x_subinventory_code OUT NOCOPY VARCHAR2
3767: , x_locator_id OUT NOCOPY NUMBER
3768: , x_project_id OUT NOCOPY NUMBER

Line 3804: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;

3800: END IF;
3801:
3802: --get package name based on rule id
3803: getpackagename(p_rule_id, l_package_name);
3804: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;
3805: l_list_pkg := 'wms_rule_put_pkg' || l_ctr ;
3806:
3807: IF (l_ctr = 1) THEN
3808: wms_rule_put_pkg1.execute_fetch_rule

Line 3923: p_cursor IN OUT NOCOPY wms_rule_pvt.cv_pick_type

3919: ---
3920: --- For Pick rules
3921:
3922: PROCEDURE pick_open_rule(
3923: p_cursor IN OUT NOCOPY wms_rule_pvt.cv_pick_type
3924: , p_rule_id IN NUMBER
3925: , p_organization_id IN NUMBER
3926: , p_inventory_item_id IN NUMBER
3927: , p_transaction_type_id IN NUMBER

Line 3965: IF wms_rule_pvt.g_rule_list_pick_ctr IS NULL THEN

3961: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3962: END IF;
3963: l_debug := g_debug;
3964:
3965: IF wms_rule_pvt.g_rule_list_pick_ctr IS NULL THEN
3966: wms_rule_pvt.g_rule_list_pick_ctr := wms_rule_gen_pkgs.get_count_no_lock('PICK');
3967: END IF;
3968: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;
3969:

Line 3966: wms_rule_pvt.g_rule_list_pick_ctr := wms_rule_gen_pkgs.get_count_no_lock('PICK');

3962: END IF;
3963: l_debug := g_debug;
3964:
3965: IF wms_rule_pvt.g_rule_list_pick_ctr IS NULL THEN
3966: wms_rule_pvt.g_rule_list_pick_ctr := wms_rule_gen_pkgs.get_count_no_lock('PICK');
3967: END IF;
3968: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;
3969:
3970: l_list_pkg := 'wms_rule_pick_pkg' || l_ctr ;

Line 3968: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;

3964:
3965: IF wms_rule_pvt.g_rule_list_pick_ctr IS NULL THEN
3966: wms_rule_pvt.g_rule_list_pick_ctr := wms_rule_gen_pkgs.get_count_no_lock('PICK');
3967: END IF;
3968: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;
3969:
3970: l_list_pkg := 'wms_rule_pick_pkg' || l_ctr ;
3971: getpackagename(p_rule_id, l_package_name);
3972:

Line 4063: wms_rule_pvt.g_rule_list_pick_ctr := wms_rule_gen_pkgs.get_count_no_lock('PICK');

4059:
4060: EXCEPTION
4061: WHEN INVALID_PKG_STATE THEN
4062: x_result := 0;
4063: wms_rule_pvt.g_rule_list_pick_ctr := wms_rule_gen_pkgs.get_count_no_lock('PICK');
4064:
4065: WMS_ENGINE_PVT.G_SUGG_FAILURE_MESSAGE := 'Invalid Package, Contact your DBA - '|| l_list_pkg || ' / ' || l_package_name;
4066: fnd_message.set_name('WMS', 'WMS_INVALID_PKG');
4067: fnd_message.set_token('LIST_PKG', l_list_pkg);

Line 4085: p_cursor IN OUT NOCOPY wms_rule_pvt.cv_put_type

4081:
4082: ----------------
4083:
4084: PROCEDURE put_open_rule(
4085: p_cursor IN OUT NOCOPY wms_rule_pvt.cv_put_type
4086: , p_rule_id IN NUMBER
4087: , p_organization_id IN NUMBER
4088: , p_inventory_item_id IN NUMBER
4089: , p_transaction_type_id IN NUMBER

Line 4119: if wms_rule_pvt.g_rule_list_put_ctr is null then

4115: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
4116: END IF;
4117: l_debug := g_debug;
4118:
4119: if wms_rule_pvt.g_rule_list_put_ctr is null then
4120: wms_rule_pvt.g_rule_list_put_ctr := wms_rule_gen_pkgs.get_count_no_lock('PUTAWAY');
4121: end if;
4122: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;
4123:

Line 4120: wms_rule_pvt.g_rule_list_put_ctr := wms_rule_gen_pkgs.get_count_no_lock('PUTAWAY');

4116: END IF;
4117: l_debug := g_debug;
4118:
4119: if wms_rule_pvt.g_rule_list_put_ctr is null then
4120: wms_rule_pvt.g_rule_list_put_ctr := wms_rule_gen_pkgs.get_count_no_lock('PUTAWAY');
4121: end if;
4122: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;
4123:
4124: l_list_pkg := 'wms_rule_put_pkg' || l_ctr ;

Line 4122: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;

4118:
4119: if wms_rule_pvt.g_rule_list_put_ctr is null then
4120: wms_rule_pvt.g_rule_list_put_ctr := wms_rule_gen_pkgs.get_count_no_lock('PUTAWAY');
4121: end if;
4122: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;
4123:
4124: l_list_pkg := 'wms_rule_put_pkg' || l_ctr ;
4125: getpackagename(p_rule_id, l_package_name);
4126:

Line 4180: wms_rule_pvt.g_rule_list_put_ctr := wms_rule_gen_pkgs.get_count_no_lock('PUTAWAY');

4176:
4177: EXCEPTION
4178: WHEN INVALID_PKG_STATE THEN
4179: x_result := 0;
4180: wms_rule_pvt.g_rule_list_put_ctr := wms_rule_gen_pkgs.get_count_no_lock('PUTAWAY');
4181:
4182: WMS_ENGINE_PVT.G_SUGG_FAILURE_MESSAGE := 'Invalid Package, Contact your DBA - '|| l_list_pkg || ' / ' || l_package_name;
4183: fnd_message.set_name('WMS', 'WMS_INVALID_PKG');
4184: fnd_message.set_token('LIST_PKG', l_list_pkg);

Line 4210: if wms_rule_pvt.g_rule_list_op_ctr is null then

4206: l_package_name VARCHAR2(128);
4207: l_ctr NUMBER := 0;
4208:
4209: BEGIN
4210: if wms_rule_pvt.g_rule_list_op_ctr is null then
4211: wms_rule_pvt.g_rule_list_op_ctr := wms_rule_gen_pkgs.get_count_no_lock('OPERATION_PLAN');
4212: end if;
4213: l_ctr := wms_rule_pvt.g_rule_list_op_ctr;
4214:

Line 4211: wms_rule_pvt.g_rule_list_op_ctr := wms_rule_gen_pkgs.get_count_no_lock('OPERATION_PLAN');

4207: l_ctr NUMBER := 0;
4208:
4209: BEGIN
4210: if wms_rule_pvt.g_rule_list_op_ctr is null then
4211: wms_rule_pvt.g_rule_list_op_ctr := wms_rule_gen_pkgs.get_count_no_lock('OPERATION_PLAN');
4212: end if;
4213: l_ctr := wms_rule_pvt.g_rule_list_op_ctr;
4214:
4215: l_list_pkg := 'wms_rule_op_pkg' || l_ctr ;

Line 4213: l_ctr := wms_rule_pvt.g_rule_list_op_ctr;

4209: BEGIN
4210: if wms_rule_pvt.g_rule_list_op_ctr is null then
4211: wms_rule_pvt.g_rule_list_op_ctr := wms_rule_gen_pkgs.get_count_no_lock('OPERATION_PLAN');
4212: end if;
4213: l_ctr := wms_rule_pvt.g_rule_list_op_ctr;
4214:
4215: l_list_pkg := 'wms_rule_op_pkg' || l_ctr ;
4216: getpackagename(p_rule_id, l_package_name);
4217:

Line 4232: wms_rule_pvt.g_rule_list_op_ctr := wms_rule_gen_pkgs.get_count_no_lock('OPERATION_PLAN');

4228: EXCEPTION
4229: WHEN INVALID_PKG_STATE THEN
4230: --x_return_status := 0;
4231: x_return_status := -1 ;
4232: wms_rule_pvt.g_rule_list_op_ctr := wms_rule_gen_pkgs.get_count_no_lock('OPERATION_PLAN');
4233: WMS_ENGINE_PVT.G_SUGG_FAILURE_MESSAGE := 'Invalid Package, Contact your DBA - '|| l_list_pkg || ' / ' || l_package_name;
4234: x_return_status := fnd_api.g_ret_sts_unexp_error;
4235: fnd_message.set_name('WMS', 'WMS_INVALID_PKG');
4236: fnd_message.set_token('LIST_PKG', l_list_pkg);

Line 4260: if wms_rule_pvt.g_rule_list_task_ctr is null then

4256: l_ctr NUMBER := 0;
4257:
4258:
4259: BEGIN
4260: if wms_rule_pvt.g_rule_list_task_ctr is null then
4261: wms_rule_pvt.g_rule_list_task_ctr := wms_rule_gen_pkgs.get_count_no_lock('TASK');
4262: end if;
4263: l_ctr := wms_rule_pvt.g_rule_list_task_ctr;
4264:

Line 4261: wms_rule_pvt.g_rule_list_task_ctr := wms_rule_gen_pkgs.get_count_no_lock('TASK');

4257:
4258:
4259: BEGIN
4260: if wms_rule_pvt.g_rule_list_task_ctr is null then
4261: wms_rule_pvt.g_rule_list_task_ctr := wms_rule_gen_pkgs.get_count_no_lock('TASK');
4262: end if;
4263: l_ctr := wms_rule_pvt.g_rule_list_task_ctr;
4264:
4265: l_list_pkg := 'wms_rule_task_pkg' || l_ctr ;

Line 4263: l_ctr := wms_rule_pvt.g_rule_list_task_ctr;

4259: BEGIN
4260: if wms_rule_pvt.g_rule_list_task_ctr is null then
4261: wms_rule_pvt.g_rule_list_task_ctr := wms_rule_gen_pkgs.get_count_no_lock('TASK');
4262: end if;
4263: l_ctr := wms_rule_pvt.g_rule_list_task_ctr;
4264:
4265: l_list_pkg := 'wms_rule_task_pkg' || l_ctr ;
4266: getpackagename(p_rule_id, l_package_name);
4267:

Line 4282: wms_rule_pvt.g_rule_list_task_ctr := wms_rule_gen_pkgs.get_count_no_lock('TASK');

4278: EXCEPTION
4279: WHEN INVALID_PKG_STATE THEN
4280: --x_return_status := 0;
4281: x_return_status := -1 ;
4282: wms_rule_pvt.g_rule_list_task_ctr := wms_rule_gen_pkgs.get_count_no_lock('TASK');
4283: WMS_ENGINE_PVT.G_SUGG_FAILURE_MESSAGE := 'Invalid Package, Contact your DBA - '|| l_list_pkg || ' / ' || l_package_name;
4284: x_return_status := fnd_api.g_ret_sts_unexp_error;
4285: fnd_message.set_name('WMS', 'WMS_INVALID_PKG');
4286: fnd_message.set_token('LIST_PKG', l_list_pkg);

Line 4312: if wms_rule_pvt.g_rule_list_label_ctr is null then

4308: l_ctr NUMBER := 0;
4309:
4310: BEGIN
4311:
4312: if wms_rule_pvt.g_rule_list_label_ctr is null then
4313: wms_rule_pvt.g_rule_list_label_ctr := wms_rule_gen_pkgs.get_count_no_lock('LABEL');
4314: end if;
4315: l_ctr := wms_rule_pvt.g_rule_list_label_ctr;
4316:

Line 4313: wms_rule_pvt.g_rule_list_label_ctr := wms_rule_gen_pkgs.get_count_no_lock('LABEL');

4309:
4310: BEGIN
4311:
4312: if wms_rule_pvt.g_rule_list_label_ctr is null then
4313: wms_rule_pvt.g_rule_list_label_ctr := wms_rule_gen_pkgs.get_count_no_lock('LABEL');
4314: end if;
4315: l_ctr := wms_rule_pvt.g_rule_list_label_ctr;
4316:
4317: l_list_pkg := 'wms_rule_label_pkg' || l_ctr ;

Line 4315: l_ctr := wms_rule_pvt.g_rule_list_label_ctr;

4311:
4312: if wms_rule_pvt.g_rule_list_label_ctr is null then
4313: wms_rule_pvt.g_rule_list_label_ctr := wms_rule_gen_pkgs.get_count_no_lock('LABEL');
4314: end if;
4315: l_ctr := wms_rule_pvt.g_rule_list_label_ctr;
4316:
4317: l_list_pkg := 'wms_rule_label_pkg' || l_ctr ;
4318: getpackagename(p_rule_id, l_package_name);
4319:

Line 4335: wms_rule_pvt.g_rule_list_label_ctr := wms_rule_gen_pkgs.get_count_no_lock('LABEL');

4331: EXCEPTION
4332: WHEN INVALID_PKG_STATE THEN
4333: --x_return_status := 0;
4334: x_return_status := -1 ;
4335: wms_rule_pvt.g_rule_list_label_ctr := wms_rule_gen_pkgs.get_count_no_lock('LABEL');
4336: WMS_ENGINE_PVT.G_SUGG_FAILURE_MESSAGE := 'Invalid Package, Contact your DBA - '|| l_list_pkg || ' / ' || l_package_name;
4337: x_return_status := fnd_api.g_ret_sts_unexp_error;
4338: fnd_message.set_name('WMS', 'WMS_INVALID_PKG');
4339: fnd_message.set_token('LIST_PKG', l_list_pkg);

Line 4350: PROCEDURE close_pick_rule(p_rule_id IN NUMBER, p_cursor IN OUT NOCOPY wms_rule_pvt.cv_pick_type) IS

4346:
4347: --- Procedure to Close Pick rule Cursor --
4348: ---
4349:
4350: PROCEDURE close_pick_rule(p_rule_id IN NUMBER, p_cursor IN OUT NOCOPY wms_rule_pvt.cv_pick_type) IS
4351:
4352: invalid_pkg_state exception;
4353: Pragma Exception_Init(invalid_pkg_state, -6508);
4354: l_msg_data VARCHAR2(240);

Line 4365: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;

4361: l_ctr NUMBER := 0;
4362:
4363: BEGIN
4364:
4365: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;
4366: l_list_pkg := 'wms_rule_pick_pkg' || l_ctr ;
4367: getpackagename(p_rule_id, l_package_name);
4368:
4369: IF (l_ctr = 1) THEN

Line 4391: PROCEDURE close_put_rule(p_rule_id IN NUMBER, p_cursor IN OUT NOCOPY wms_rule_pvt.cv_put_type) IS

4387: END close_pick_rule;
4388:
4389: -- Procedure to close Putaway rule Cursor ---
4390: --
4391: PROCEDURE close_put_rule(p_rule_id IN NUMBER, p_cursor IN OUT NOCOPY wms_rule_pvt.cv_put_type) IS
4392:
4393: invalid_pkg_state exception;
4394: Pragma Exception_Init(invalid_pkg_state, -6508);
4395: l_msg_data VARCHAR2(240);

Line 4402: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;

4398: l_list_pkg VARCHAR2(30);
4399: l_package_name VARCHAR2(128);
4400: l_ctr NUMBER := 0;
4401: BEGIN
4402: l_ctr := wms_rule_pvt.g_rule_list_put_ctr;
4403: l_list_pkg := 'wms_rule_put_pkg' || l_ctr ;
4404: getpackagename(p_rule_id, l_package_name);
4405:
4406: IF (l_ctr = 1) THEN

Line 8634: v_pick_cursor wms_rule_pvt.cv_pick_type;

8630: l_input_lpn_id NUMBER;
8631: -- Initilization of Ref cursors for Pick and putaway rules
8632: -- Added to pass into DoProjectCheck new parameter used in other apply procedure Bug3237702
8633: l_dummy_loc NUMBER;
8634: v_pick_cursor wms_rule_pvt.cv_pick_type;
8635: v_put_cursor wms_rule_pvt.cv_put_type;
8636: l_debug NUMBER; -- 1 for debug is on , 0 for debug is off
8637: l_progress VARCHAR2(10); -- local variable to track program progress,
8638: -- especially useful when exception occurs

Line 8635: v_put_cursor wms_rule_pvt.cv_put_type;

8631: -- Initilization of Ref cursors for Pick and putaway rules
8632: -- Added to pass into DoProjectCheck new parameter used in other apply procedure Bug3237702
8633: l_dummy_loc NUMBER;
8634: v_pick_cursor wms_rule_pvt.cv_pick_type;
8635: v_put_cursor wms_rule_pvt.cv_put_type;
8636: l_debug NUMBER; -- 1 for debug is on , 0 for debug is off
8637: l_progress VARCHAR2(10); -- local variable to track program progress,
8638: -- especially useful when exception occurs
8639: l_rule_counter INTEGER;

Line 8736: log_procedure(l_api_name, 'start', 'Start wms_rule_pvt.Apply');

8732: l_consider_staging_capacity := TRUE;
8733: END IF;
8734:
8735: IF l_debug = 1 THEN
8736: log_procedure(l_api_name, 'start', 'Start wms_rule_pvt.Apply');
8737: log_event(l_api_name, 'Apply ', 'org_id '||p_organization_id);
8738: log_event(l_api_name, 'Apply ', 'item_id '||p_inventory_item_id);
8739: END IF;
8740: -- end of debugging section

Line 9896: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

9892: THEN
9893: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
9894: IF l_max_sec_tolerance >= 0 THEN
9895: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
9896: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
9897: ELSE
9898: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
9899: END IF;
9900: ELSE

Line 9898: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

9894: IF l_max_sec_tolerance >= 0 THEN
9895: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
9896: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
9897: ELSE
9898: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
9899: END IF;
9900: ELSE
9901: IF l_max_tolerance >= 0 THEN
9902: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 9903: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

9899: END IF;
9900: ELSE
9901: IF l_max_tolerance >= 0 THEN
9902: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
9903: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
9904: ELSE
9905: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
9906: END IF;
9907: END IF;

Line 9905: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

9901: IF l_max_tolerance >= 0 THEN
9902: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
9903: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
9904: ELSE
9905: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
9906: END IF;
9907: END IF;
9908: END IF;
9909:

Line 10088: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10084: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
10085: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
10086: IF l_max_sec_tolerance >= 0 THEN
10087: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10088: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10089: ELSE
10090: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10091: END IF;
10092: ELSE

Line 10090: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10086: IF l_max_sec_tolerance >= 0 THEN
10087: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10088: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10089: ELSE
10090: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10091: END IF;
10092: ELSE
10093: IF l_max_tolerance >= 0 THEN
10094: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 10095: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10091: END IF;
10092: ELSE
10093: IF l_max_tolerance >= 0 THEN
10094: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10095: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10096: ELSE
10097: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10098: END IF;
10099: END IF;

Line 10097: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10093: IF l_max_tolerance >= 0 THEN
10094: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10095: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10096: ELSE
10097: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10098: END IF;
10099: END IF;
10100: END IF;
10101:

Line 10127: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10123: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
10124: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
10125: IF l_max_sec_tolerance >= 0 THEN
10126: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10127: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10128: ELSE
10129: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10130: END IF;
10131: ELSE

Line 10129: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10125: IF l_max_sec_tolerance >= 0 THEN
10126: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10127: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10128: ELSE
10129: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10130: END IF;
10131: ELSE
10132: IF l_max_tolerance >= 0 THEN
10133: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 10134: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10130: END IF;
10131: ELSE
10132: IF l_max_tolerance >= 0 THEN
10133: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10134: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10135: ELSE
10136: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10137: END IF;
10138: END IF;

Line 10136: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10132: IF l_max_tolerance >= 0 THEN
10133: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10134: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10135: ELSE
10136: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10137: END IF;
10138: END IF;
10139: END IF;
10140: END IF; --} enough quantity to allocate

Line 10181: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10177: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
10178: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
10179: IF l_max_sec_tolerance >= 0 THEN
10180: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10181: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10182: ELSE
10183: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10184: END IF;
10185: ELSE

Line 10183: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10179: IF l_max_sec_tolerance >= 0 THEN
10180: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10181: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10182: ELSE
10183: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10184: END IF;
10185: ELSE
10186: IF l_max_tolerance >= 0 THEN
10187: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 10188: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10184: END IF;
10185: ELSE
10186: IF l_max_tolerance >= 0 THEN
10187: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10188: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10189: ELSE
10190: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10191: END IF;
10192: END IF;

Line 10190: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10186: IF l_max_tolerance >= 0 THEN
10187: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10188: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10189: ELSE
10190: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10191: END IF;
10192: END IF;
10193: END IF;
10194: EXIT WHEN l_cur_lpn_group = 0;

Line 10360: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10356: THEN
10357: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
10358: IF l_max_sec_tolerance >= 0 THEN
10359: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10360: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10361: ELSE
10362: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10363: END IF;
10364: ELSE

Line 10362: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10358: IF l_max_sec_tolerance >= 0 THEN
10359: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10360: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10361: ELSE
10362: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10363: END IF;
10364: ELSE
10365: IF l_max_tolerance >= 0 THEN
10366: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 10367: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10363: END IF;
10364: ELSE
10365: IF l_max_tolerance >= 0 THEN
10366: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10367: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10368: ELSE
10369: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10370: END IF;
10371: END IF;

Line 10369: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10365: IF l_max_tolerance >= 0 THEN
10366: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10367: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10368: ELSE
10369: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10370: END IF;
10371: END IF;
10372: END IF;
10373: l_cur_lpn_rec := g_locs(l_cur_lpn_rec).next_rec;

Line 10396: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10392: THEN
10393: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
10394: IF l_max_sec_tolerance >= 0 THEN
10395: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10396: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10397: ELSE
10398: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10399: END IF;
10400: ELSE

Line 10398: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

10394: IF l_max_sec_tolerance >= 0 THEN
10395: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
10396: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10397: ELSE
10398: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
10399: END IF;
10400: ELSE
10401: IF l_max_tolerance >= 0 THEN
10402: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 10403: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10399: END IF;
10400: ELSE
10401: IF l_max_tolerance >= 0 THEN
10402: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10403: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10404: ELSE
10405: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10406: END IF;
10407: END IF;

Line 10405: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

10401: IF l_max_tolerance >= 0 THEN
10402: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
10403: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10404: ELSE
10405: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
10406: END IF;
10407: END IF;
10408: END IF;
10409: END IF; --} needed qty > lpn.quantity

Line 11074: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11070: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
11071: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
11072: IF l_max_sec_tolerance >= 0 THEN
11073: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11074: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11075: ELSE
11076: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11077: END IF;
11078: ELSE

Line 11076: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11072: IF l_max_sec_tolerance >= 0 THEN
11073: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11074: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11075: ELSE
11076: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11077: END IF;
11078: ELSE
11079: IF l_max_tolerance >= 0 THEN
11080: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 11081: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11077: END IF;
11078: ELSE
11079: IF l_max_tolerance >= 0 THEN
11080: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11081: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11082: ELSE
11083: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11084: END IF;
11085: END IF;

Line 11083: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11079: IF l_max_tolerance >= 0 THEN
11080: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11081: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11082: ELSE
11083: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11084: END IF;
11085: END IF;
11086: END IF;
11087:

Line 11111: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11107: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
11108: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
11109: IF l_max_sec_tolerance >= 0 THEN
11110: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11111: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11112: ELSE
11113: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11114: END IF;
11115: ELSE

Line 11113: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11109: IF l_max_sec_tolerance >= 0 THEN
11110: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11111: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11112: ELSE
11113: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11114: END IF;
11115: ELSE
11116: IF l_max_tolerance >= 0 THEN
11117: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 11118: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11114: END IF;
11115: ELSE
11116: IF l_max_tolerance >= 0 THEN
11117: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11118: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11119: ELSE
11120: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11121: END IF;
11122: END IF;

Line 11120: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11116: IF l_max_tolerance >= 0 THEN
11117: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11118: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11119: ELSE
11120: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11121: END IF;
11122: END IF;
11123: END IF;
11124:

Line 11567: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11563: THEN
11564: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
11565: IF l_max_sec_tolerance >= 0 THEN
11566: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11567: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11568: ELSE
11569: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11570: END IF;
11571: ELSE

Line 11569: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11565: IF l_max_sec_tolerance >= 0 THEN
11566: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11567: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11568: ELSE
11569: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11570: END IF;
11571: ELSE
11572: IF l_max_tolerance >= 0 THEN
11573: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 11574: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11570: END IF;
11571: ELSE
11572: IF l_max_tolerance >= 0 THEN
11573: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11574: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11575: ELSE
11576: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11577: END IF;
11578: END IF;

Line 11576: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11572: IF l_max_tolerance >= 0 THEN
11573: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11574: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11575: ELSE
11576: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11577: END IF;
11578: END IF;
11579: END IF;
11580: -- end loop (pick UOM)

Line 11599: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11595: THEN
11596: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
11597: IF l_max_sec_tolerance >= 0 THEN
11598: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11599: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11600: ELSE
11601: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11602: END IF;
11603: ELSE

Line 11601: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11597: IF l_max_sec_tolerance >= 0 THEN
11598: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11599: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11600: ELSE
11601: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11602: END IF;
11603: ELSE
11604: IF l_max_tolerance >= 0 THEN
11605: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 11606: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11602: END IF;
11603: ELSE
11604: IF l_max_tolerance >= 0 THEN
11605: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11606: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11607: ELSE
11608: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11609: END IF;
11610: END IF;

Line 11608: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11604: IF l_max_tolerance >= 0 THEN
11605: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11606: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11607: ELSE
11608: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11609: END IF;
11610: END IF;
11611: END IF;
11612: END IF; --} allocation mode in 3,4

Line 11889: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11885: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
11886: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
11887: IF l_max_sec_tolerance >= 0 THEN
11888: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11889: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11890: ELSE
11891: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11892: END IF;
11893: ELSE

Line 11891: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11887: IF l_max_sec_tolerance >= 0 THEN
11888: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11889: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11890: ELSE
11891: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11892: END IF;
11893: ELSE
11894: IF l_max_tolerance >= 0 THEN
11895: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 11896: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11892: END IF;
11893: ELSE
11894: IF l_max_tolerance >= 0 THEN
11895: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11896: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11897: ELSE
11898: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11899: END IF;
11900: END IF;

Line 11898: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11894: IF l_max_tolerance >= 0 THEN
11895: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11896: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11897: ELSE
11898: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11899: END IF;
11900: END IF;
11901: END IF;
11902: l_cur_uom_rec := g_locs(l_cur_uom_rec).next_rec;

Line 11928: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11924: ELSIF g_over_allocation = 'Y' AND p_type_code = 2 AND WMS_Engine_PVT.g_move_order_type = 3 THEN
11925: IF NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S' THEN
11926: IF l_max_sec_tolerance >= 0 THEN
11927: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11928: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11929: ELSE
11930: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11931: END IF;
11932: ELSE

Line 11930: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);

11926: IF l_max_sec_tolerance >= 0 THEN
11927: EXIT WHEN (l_sec_needed_quantity <= l_max_sec_tolerance)
11928: OR (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11929: ELSE
11930: EXIT WHEN (l_initial_sec_quantity - l_sec_needed_quantity >= WMS_RULE_PVT.g_min_sec_qty_to_alloc);
11931: END IF;
11932: ELSE
11933: IF l_max_tolerance >= 0 THEN
11934: EXIT WHEN (l_needed_quantity <= l_max_tolerance)

Line 11935: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11931: END IF;
11932: ELSE
11933: IF l_max_tolerance >= 0 THEN
11934: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11935: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11936: ELSE
11937: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11938: END IF;
11939: END IF;

Line 11937: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);

11933: IF l_max_tolerance >= 0 THEN
11934: EXIT WHEN (l_needed_quantity <= l_max_tolerance)
11935: OR (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11936: ELSE
11937: EXIT WHEN (l_initial_pri_quantity - l_needed_quantity >= WMS_RULE_PVT.g_min_qty_to_allocate);
11938: END IF;
11939: END IF;
11940: END IF;
11941:

Line 13122: AND (l_initial_pri_quantity - l_needed_quantity < WMS_RULE_PVT.g_min_qty_to_allocate))

13118: AND NOT (p_type_code = 2 AND l_lot_divisible_flag = 'N' AND l_lot_control_code <> 1)
13119: AND WMS_Engine_PVT.g_move_order_type = 3 AND p_type_code = 2
13120: AND ( (NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'P'
13121: AND ( (l_max_tolerance >= 0 AND (l_needed_quantity > l_max_tolerance)
13122: AND (l_initial_pri_quantity - l_needed_quantity < WMS_RULE_PVT.g_min_qty_to_allocate))
13123: OR (l_max_tolerance < 0
13124: AND (l_initial_pri_quantity - l_needed_quantity < WMS_RULE_PVT.g_min_qty_to_allocate))
13125: )
13126: )

Line 13124: AND (l_initial_pri_quantity - l_needed_quantity < WMS_RULE_PVT.g_min_qty_to_allocate))

13120: AND ( (NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'P'
13121: AND ( (l_max_tolerance >= 0 AND (l_needed_quantity > l_max_tolerance)
13122: AND (l_initial_pri_quantity - l_needed_quantity < WMS_RULE_PVT.g_min_qty_to_allocate))
13123: OR (l_max_tolerance < 0
13124: AND (l_initial_pri_quantity - l_needed_quantity < WMS_RULE_PVT.g_min_qty_to_allocate))
13125: )
13126: )
13127: OR (NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S'
13128: AND ( (l_max_sec_tolerance >= 0 AND (l_sec_needed_quantity > l_max_sec_tolerance)

Line 13129: AND (l_initial_sec_quantity - l_sec_needed_quantity < WMS_RULE_PVT.g_min_sec_qty_to_alloc))

13125: )
13126: )
13127: OR (NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S'
13128: AND ( (l_max_sec_tolerance >= 0 AND (l_sec_needed_quantity > l_max_sec_tolerance)
13129: AND (l_initial_sec_quantity - l_sec_needed_quantity < WMS_RULE_PVT.g_min_sec_qty_to_alloc))
13130: OR (l_max_sec_tolerance < 0
13131: AND (l_initial_sec_quantity - l_sec_needed_quantity < WMS_RULE_PVT.g_min_sec_qty_to_alloc))
13132: )
13133: )

Line 13131: AND (l_initial_sec_quantity - l_sec_needed_quantity < WMS_RULE_PVT.g_min_sec_qty_to_alloc))

13127: OR (NVL(wms_engine_pvt.g_fulfillment_base,'P') = 'S'
13128: AND ( (l_max_sec_tolerance >= 0 AND (l_sec_needed_quantity > l_max_sec_tolerance)
13129: AND (l_initial_sec_quantity - l_sec_needed_quantity < WMS_RULE_PVT.g_min_sec_qty_to_alloc))
13130: OR (l_max_sec_tolerance < 0
13131: AND (l_initial_sec_quantity - l_sec_needed_quantity < WMS_RULE_PVT.g_min_sec_qty_to_alloc))
13132: )
13133: )
13134: )
13135: )

Line 15296: ||' and ( mlna.EXPIRATION_DATE is NULL OR mlna.EXPIRATION_DATE > sysdate OR wms_rule_pvt.g_allow_expired_lot_txn = ''Y'' ) ' ;

15292: g_rule_where := g_rule_where
15293: ||' mlna.ORGANIZATION_ID (+) = base.ORGANIZATION_ID ' || g_line_feed
15294: ||' and mlna.INVENTORY_ITEM_ID (+) = base.INVENTORY_ITEM_ID ' || g_line_feed
15295: ||' and mlna.LOT_NUMBER (+) = base.LOT_NUMBER ' || g_line_feed
15296: ||' and ( mlna.EXPIRATION_DATE is NULL OR mlna.EXPIRATION_DATE > sysdate OR wms_rule_pvt.g_allow_expired_lot_txn = ''Y'' ) ' ;
15297: ELSE
15298: g_rule_where := g_rule_where
15299: ||' and mlna.ORGANIZATION_ID (+) = base.ORGANIZATION_ID ' || g_line_feed
15300: ||' and mlna.INVENTORY_ITEM_ID (+) = base.INVENTORY_ITEM_ID ' || g_line_feed

Line 15302: ||' and ( mlna.EXPIRATION_DATE is NULL OR mlna.EXPIRATION_DATE > sysdate OR wms_rule_pvt.g_allow_expired_lot_txn = ''Y'' ) ' ;

15298: g_rule_where := g_rule_where
15299: ||' and mlna.ORGANIZATION_ID (+) = base.ORGANIZATION_ID ' || g_line_feed
15300: ||' and mlna.INVENTORY_ITEM_ID (+) = base.INVENTORY_ITEM_ID ' || g_line_feed
15301: ||' and mlna.LOT_NUMBER (+) = base.LOT_NUMBER ' || g_line_feed
15302: ||' and ( mlna.EXPIRATION_DATE is NULL OR mlna.EXPIRATION_DATE > sysdate OR wms_rule_pvt.g_allow_expired_lot_txn = ''Y'' ) ' ;
15303: END IF;
15304:
15305: IF inv_pp_debug.is_debug_mode THEN
15306: -- Note: in debug mode, later call to fnd_msg_pub.get will not get

Line 15682: p_cursor IN OUT NOCOPY WMS_RULE_PVT.CV_PUT_TYPE,

15678: 'CREATE OR REPLACE PACKAGE '
15679: || l_package_name
15680: || ' AS
15681: procedure open_curs (
15682: p_cursor IN OUT NOCOPY WMS_RULE_PVT.CV_PUT_TYPE,
15683: p_organization_id IN NUMBER,
15684: p_inventory_item_id IN NUMBER,
15685: p_transaction_type_id IN NUMBER,
15686: p_subinventory_code IN VARCHAR2,

Line 15696: p_cursor IN WMS_RULE_PVT.CV_PUT_TYPE,

15692: p_task_id IN NUMBER,
15693: x_result OUT NOCOPY NUMBER);
15694:
15695: PROCEDURE fetch_one_row (
15696: p_cursor IN WMS_RULE_PVT.CV_PUT_TYPE,
15697: x_subinventory_code OUT NOCOPY VARCHAR2,
15698: x_locator_id OUT NOCOPY NUMBER,
15699: x_project_id OUT NOCOPY NUMBER,
15700: x_task_id OUT NOCOPY NUMBER,

Line 15703: PROCEDURE close_curs(p_cursor IN WMS_RULE_PVT.CV_PUT_TYPE );

15699: x_project_id OUT NOCOPY NUMBER,
15700: x_task_id OUT NOCOPY NUMBER,
15701: x_return_status OUT NOCOPY NUMBER);
15702:
15703: PROCEDURE close_curs(p_cursor IN WMS_RULE_PVT.CV_PUT_TYPE );
15704:
15705: end '
15706: || l_package_name
15707: || ';';

Line 15736: p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_put_type,

15732: || l_package_name
15733: || ' AS
15734:
15735: PROCEDURE open_curs (
15736: p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_put_type,
15737: p_organization_id IN NUMBER,
15738: p_inventory_item_id IN NUMBER,
15739: p_transaction_type_id IN NUMBER,
15740: p_subinventory_code IN VARCHAR2,

Line 15945: p_cursor IN WMS_RULE_PVT.cv_put_type,

15941:
15942: END open_curs;
15943:
15944: PROCEDURE fetch_one_row(
15945: p_cursor IN WMS_RULE_PVT.cv_put_type,
15946: x_subinventory_code OUT NOCOPY VARCHAR2,
15947: x_locator_id OUT NOCOPY NUMBER,
15948: x_project_id OUT NOCOPY NUMBER,
15949: x_task_id OUT NOCOPY NUMBER,

Line 15968: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_put_type) IS

15964: end if;
15965:
15966: END fetch_one_row;
15967:
15968: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_put_type) IS
15969: BEGIN
15970: if p_cursor%ISOPEN then
15971: CLOSE p_cursor;
15972: end if;

Line 16014: p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_pick_type,

16010: 'CREATE OR REPLACE PACKAGE '
16011: || l_package_name
16012: || ' AS
16013: procedure open_curs (
16014: p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_pick_type,
16015: p_organization_id IN NUMBER,
16016: p_inventory_item_id IN NUMBER,
16017: p_transaction_type_id IN NUMBER,
16018: p_revision IN VARCHAR2,

Line 16036: p_cursor IN WMS_RULE_PVT.cv_pick_type,

16032: p_task_id IN NUMBER,
16033: x_result OUT NOCOPY NUMBER);
16034:
16035: PROCEDURE fetch_one_row (
16036: p_cursor IN WMS_RULE_PVT.cv_pick_type,
16037: x_revision OUT NOCOPY VARCHAR2,
16038: x_lot_number OUT NOCOPY VARCHAR2,
16039: x_lot_expiration_date OUT NOCOPY DATE,
16040: x_subinventory_code OUT NOCOPY VARCHAR2,

Line 16053: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_pick_type);

16049: x_consist_string OUT NOCOPY VARCHAR2,
16050: x_order_by_string OUT NOCOPY VARCHAR2,
16051: x_return_status OUT NOCOPY NUMBER);
16052:
16053: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_pick_type);
16054:
16055: PROCEDURE fetch_available_rows (
16056: p_cursor IN WMS_RULE_PVT.cv_pick_type,
16057: x_return_status OUT NOCOPY NUMBER);

Line 16056: p_cursor IN WMS_RULE_PVT.cv_pick_type,

16052:
16053: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_pick_type);
16054:
16055: PROCEDURE fetch_available_rows (
16056: p_cursor IN WMS_RULE_PVT.cv_pick_type,
16057: x_return_status OUT NOCOPY NUMBER);
16058:
16059:
16060:

Line 16092: p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_pick_type,

16088: || ' AS
16089:
16090: PROCEDURE open_curs
16091: (
16092: p_cursor IN OUT NOCOPY WMS_RULE_PVT.cv_pick_type,
16093: p_organization_id IN NUMBER,
16094: p_inventory_item_id IN NUMBER,
16095: p_transaction_type_id IN NUMBER,
16096: p_revision IN VARCHAR2,

Line 16183: p_cursor IN WMS_RULE_PVT.cv_pick_type,

16179:
16180: END open_curs;
16181:
16182: PROCEDURE fetch_one_row(
16183: p_cursor IN WMS_RULE_PVT.cv_pick_type,
16184: x_revision OUT NOCOPY VARCHAR2,
16185: x_lot_number OUT NOCOPY VARCHAR2,
16186: x_lot_expiration_date OUT NOCOPY DATE,
16187: x_subinventory_code OUT NOCOPY VARCHAR2,

Line 16231: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_pick_type) IS

16227:
16228:
16229: END fetch_one_row;
16230:
16231: PROCEDURE close_curs( p_cursor IN WMS_RULE_PVT.cv_pick_type) IS
16232: BEGIN
16233: if (p_cursor%ISOPEN) THEN
16234: CLOSE p_cursor;
16235: END IF;

Line 16240: p_cursor IN WMS_RULE_PVT.cv_pick_type,

16236: END close_curs;
16237:
16238: -- LG convergence new procedure for the new manual picking select screen
16239: PROCEDURE fetch_available_rows(
16240: p_cursor IN WMS_RULE_PVT.cv_pick_type,
16241: x_return_status OUT NOCOPY NUMBER) IS
16242:
16243: /* Fix for Bug#8360804 . Added temp variable of type available_inventory_tbl */
16244:

Line 16494: wms_rule_pvt_ext_psetj.assign_operation_plan_psetj

16490: if (inv_control.g_current_release_level >= inv_release.g_j_release_level
16491: and wms_ui_tasks_apis.g_wms_patch_level >= wms_ui_tasks_apis.g_patchset_j)
16492: then
16493: -- ### Outbound for patchset 'J'
16494: wms_rule_pvt_ext_psetj.assign_operation_plan_psetj
16495: (p_api_version => 1.0,
16496: x_return_status => l_return_status,
16497: x_msg_count => l_msg_count,
16498: x_msg_data => l_msg_data,

Line 17576: wms_rule_pvt.generaterulepackage(

17572: LOOP
17573: FETCH l_enabled_rules INTO l_rule_id;
17574: EXIT WHEN l_enabled_rules%NOTFOUND;
17575: --fnd_file.put_line(fnd_file.LOG, 'Compiling Rule ID= ' || l_rule_id);
17576: wms_rule_pvt.generaterulepackage(
17577: p_api_version => 1.0
17578: , p_init_msg_list => fnd_api.g_true
17579: , p_validation_level => fnd_api.g_valid_level_full
17580: , x_return_status => l_return_status

Line 18515: v_pick_cursor wms_rule_pvt.cv_pick_type;

18511: --- Initilization of Ref cursors for Pick and putaway rules
18512: -- Added to pass into DoProjectCheck new parameter used in other apply procedure Bug3237702
18513: l_dummy_loc NUMBER;
18514:
18515: v_pick_cursor wms_rule_pvt.cv_pick_type;
18516: v_put_cursor wms_rule_pvt.cv_put_type;
18517:
18518: l_debug NUMBER; -- 1 for debug is on , 0 for debug is off
18519: l_progress VARCHAR2(10); -- local variable to track program progress,

Line 18516: v_put_cursor wms_rule_pvt.cv_put_type;

18512: -- Added to pass into DoProjectCheck new parameter used in other apply procedure Bug3237702
18513: l_dummy_loc NUMBER;
18514:
18515: v_pick_cursor wms_rule_pvt.cv_pick_type;
18516: v_put_cursor wms_rule_pvt.cv_put_type;
18517:
18518: l_debug NUMBER; -- 1 for debug is on , 0 for debug is off
18519: l_progress VARCHAR2(10); -- local variable to track program progress,
18520: -- especially useful when exception occurs

Line 19124: , p_cursor IN wms_rule_pvt.cv_pick_type

19120: PROCEDURE FetchCursorRows(
19121: x_return_status OUT NOCOPY VARCHAR2
19122: , x_msg_count OUT NOCOPY NUMBER
19123: , x_msg_data OUT NOCOPY VARCHAR2
19124: , p_cursor IN wms_rule_pvt.cv_pick_type
19125: , p_rule_id IN NUMBER
19126: ) IS
19127: invalid_pkg_state exception;
19128: Pragma Exception_Init(invalid_pkg_state, -6508);

Line 19382: END wms_rule_pvt;

19378: RETURN l_allocate_lot_flag;
19379:
19380: END get_allocate_lot_flag;
19381:
19382: END wms_rule_pvt;