1148: --------------
1149: --- Build Rules List
1150: --- Generate all static rule list package for diffrent rule types.
1151: ---- Total of 15 packages will be generated
1152: ---- WMS_RULE_PICK_PKG, WMS_RULE_PICK_PKG1, WMS_RULE_PICK_PKG2
1153: PROCEDURE buildrulespkg(errbuf OUT NOCOPY VARCHAR2, retcode OUT NOCOPY NUMBER, x_return_status OUT NOCOPY VARCHAR2) IS
1154: l_return_status VARCHAR2(1);
1155: l_msg_count NUMBER;
1156: l_msg_data VARCHAR2(240);
3647: , x_rows
3648: );
3649: ELSIF (l_ctr = 2) THEN
3650:
3651: wms_rule_pick_pkg2.execute_fetch_rule(
3652: p_cursor
3653: , p_rule_id
3654: , x_revision
3655: , x_lot_number
4000: );
4001: ELSIF (l_ctr = 2) THEN
4002:
4003: IF l_debug = 1 THEN
4004: log_statement(l_api_name, ' wms_rule_pick_pkg2.execute_open_rule', l_ctr);
4005: END IF;
4006:
4007: wms_rule_pick_pkg2.execute_open_rule(
4008: p_cursor
4003: IF l_debug = 1 THEN
4004: log_statement(l_api_name, ' wms_rule_pick_pkg2.execute_open_rule', l_ctr);
4005: END IF;
4006:
4007: wms_rule_pick_pkg2.execute_open_rule(
4008: p_cursor
4009: , p_rule_id
4010: , p_organization_id
4011: , p_inventory_item_id
4368:
4369: IF (l_ctr = 1) THEN
4370: wms_rule_pick_pkg1.execute_close_rule(p_rule_id, p_cursor);
4371: ELSIF (l_ctr = 2) THEN
4372: wms_rule_pick_pkg2.execute_close_rule(p_rule_id, p_cursor);
4373: ELSIF (l_ctr = 3) THEN
4374: wms_rule_pick_pkg3.execute_close_rule(p_rule_id, p_cursor);
4375: END IF;
4376:
19175: , x_return_status
19176: );
19177: ELSIF (l_ctr = 2) THEN
19178:
19179: wms_rule_pick_pkg2.execute_fetch_available_inv(
19180: p_cursor
19181: , p_rule_id
19182: , x_return_status
19183: );