[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
FUNCTION Insert_Picking_Line (
p_picking_line_id IN BINARY_INTEGER,
p_component_code IN VARCHAR2,
p_component_ratio IN BINARY_INTEGER,
p_component_sequence_id IN BINARY_INTEGER,
p_config_item_flag IN VARCHAR2,
p_date_requested IN DATE,
p_demand_class IN VARCHAR2,
p_included_item_flag IN VARCHAR2,
p_inventory_item_id IN BINARY_INTEGER,
p_customer_item_id IN BINARY_INTEGER,
p_original_line_detail_id IN BINARY_INTEGER,
p_order_line_id IN BINARY_INTEGER,
p_original_requested_quantity IN BINARY_INTEGER,
p_pick_header_id IN BINARY_INTEGER,
p_requested_quantity IN BINARY_INTEGER,
p_schedule_date IN DATE,
p_sequence_number IN BINARY_INTEGER,
p_shipment_priority_code IN VARCHAR2,
p_ship_method_code IN VARCHAR2,
p_ship_to_contact_id IN BINARY_INTEGER,
p_ship_to_site_use_id IN BINARY_INTEGER,
p_unit_code IN VARCHAR2,
p_warehouse_id IN BINARY_INTEGER,
p_org_id IN BINARY_INTEGER
) RETURN BINARY_INTEGER;
FUNCTION Insert_Picking_Line_Details (
p_mode IN BINARY_INTEGER,
p_ps_number IN BINARY_INTEGER,
p_departure_id IN BINARY_INTEGER,
p_delivery_id IN OUT BINARY_INTEGER,
p_dep_plan_required_flag IN VARCHAR2,
p_autoscheduled_flag IN VARCHAR2,
p_customer_requested_lot_flag IN VARCHAR2,
p_ccid IN BINARY_INTEGER,
p_order_line_id IN BINARY_INTEGER,
p_master_container_item_id IN BINARY_INTEGER,
p_detail_container_item_id IN BINARY_INTEGER,
p_inventory_item_id IN BINARY_INTEGER,
p_load_seq_number IN BINARY_INTEGER,
p_autodetail_group_id IN BINARY_INTEGER,
p_delivery IN BINARY_INTEGER,
p_demand_class IN VARCHAR2,
p_picking_line_id IN BINARY_INTEGER,
p_requested_quantity IN BINARY_INTEGER,
p_reservable_flag IN VARCHAR2,
p_schedule_date IN DATE,
p_schedule_level IN VARCHAR2,
p_schedule_status_code IN VARCHAR2,
p_subinventory IN VARCHAR2,
p_transactable_flag IN VARCHAR2,
p_released_flag IN VARCHAR2,
p_warehouse_id IN BINARY_INTEGER
) RETURN BINARY_INTEGER;
FUNCTION Insert_Order_Line_Detail (
p_original_line_detail_id IN BINARY_INTEGER,
p_new_line_detail_id IN OUT BINARY_INTEGER,
p_quantity IN BINARY_INTEGER,
p_new_delivery IN BINARY_INTEGER
) RETURN BINARY_INTEGER;
SELECT NVL(ORDER_NUMBER_FLAG, 'N'),
NVL(SUBINVENTORY_FLAG, 'N'),
NVL(CUSTOMER_FLAG, 'N'),
NVL(SHIP_TO_FLAG, 'N'),
NVL(CARRIER_FLAG, 'N'),
NVL(SHIPMENT_PRIORITY_FLAG, 'N'),
NVL(DEPARTURE_FLAG, 'N'),
NVL(DELIVERY_FLAG, 'N')
FROM WSH_PICK_SLIP_RULES
WHERE PICK_SLIP_RULE_ID = x_psr_id;
SELECT NVL(AUTOCREATE_DEL_ORDERS_FLAG, 'Y')
FROM WSH_PARAMETERS
WHERE organization_id = x_warehouse_id;
g_ps_table.delete;
g_ph_table.delete;
FUNCTION Insert_lines(
p_backorder_line IN BINARY_INTEGER,
p_order_header_id IN BINARY_INTEGER,
p_org_id IN BINARY_INTEGER,
p_customer_id IN BINARY_INTEGER,
p_ship_to_site_use_id IN BINARY_INTEGER,
p_component_code IN VARCHAR2,
p_component_ratio IN BINARY_INTEGER,
p_component_sequence_id IN BINARY_INTEGER,
p_date_requested IN DATE,
p_included_item_flag IN VARCHAR2,
p_inventory_item_id IN BINARY_INTEGER,
p_original_line_detail_id IN BINARY_INTEGER,
p_order_line_id IN BINARY_INTEGER,
p_original_requested_quantity IN BINARY_INTEGER,
p_requested_quantity IN BINARY_INTEGER,
p_schedule_date IN DATE,
p_sequence_number IN BINARY_INTEGER,
p_shipment_priority_code IN VARCHAR2,
p_ship_method_code IN VARCHAR2,
p_ship_to_contact_id IN BINARY_INTEGER,
p_unit_code IN VARCHAR2,
p_warehouse_id IN BINARY_INTEGER,
p_delivery IN BINARY_INTEGER,
p_demand_class IN VARCHAR2,
p_reservable_flag IN VARCHAR2,
p_schedule_level IN BINARY_INTEGER,
p_schedule_status_code IN VARCHAR2,
p_subinventory IN VARCHAR2,
p_autodetailed_quantity IN BINARY_INTEGER,
p_transactable_flag IN VARCHAR2,
p_config_item_flag IN VARCHAR2,
p_customer_requested_lot_flag IN VARCHAR2,
p_departure_id IN BINARY_INTEGER,
p_delivery_id IN OUT BINARY_INTEGER,
p_dep_plan_required_flag IN VARCHAR2,
p_customer_item_id IN BINARY_INTEGER,
p_master_container_item_id IN BINARY_INTEGER,
p_detail_container_item_id IN BINARY_INTEGER,
p_load_seq_number IN BINARY_INTEGER,
p_ccid IN BINARY_INTEGER,
p_autodetail_group_id IN BINARY_INTEGER,
p_autobackorder IN VARCHAR2,
p_picking_line_id IN OUT BINARY_INTEGER,
p_abo_picking_line_id IN OUT BINARY_INTEGER,
p_picking_header_id IN OUT BINARY_INTEGER,
p_new_line_detail_id IN OUT BINARY_INTEGER,
p_new_delivery IN OUT BINARY_INTEGER,
p_abo_recs IN OUT BINARY_INTEGER,
p_pld_recs IN OUT BINARY_INTEGER,
p_old_recs IN OUT BINARY_INTEGER
)
RETURN BINARY_INTEGER IS
CURSOR res_sub (x_ccid IN BINARY_INTEGER,
x_order_line_id IN BINARY_INTEGER,
x_delivery IN BINARY_INTEGER,
x_autodetail_group_id IN BINARY_INTEGER) IS
SELECT DISTINCT SUBINVENTORY
FROM MTL_DEMAND
WHERE DEMAND_SOURCE_HEADER_ID = x_ccid
AND DEMAND_SOURCE_TYPE IN (2,8)
AND DEMAND_SOURCE_LINE = to_char(x_order_line_id)
AND DEMAND_SOURCE_DELIVERY = to_char(x_delivery)
AND AUTODETAIL_GROUP_ID = x_autodetail_group_id
AND NVL(LINE_ITEM_QUANTITY,0) <> 0
AND PARENT_DEMAND_ID IS NOT NULL
AND RESERVATION_TYPE = 2;
SELECT DISTINCT SUBINVENTORY
FROM MTL_DEMAND
WHERE DEMAND_SOURCE_HEADER_ID = x_ccid
AND DEMAND_SOURCE_TYPE IN (2,8)
AND DEMAND_SOURCE_LINE = to_char(x_order_line_id)
AND DEMAND_SOURCE_DELIVERY = to_char(x_delivery)
AND AUTODETAIL_GROUP_ID IS NULL
AND NVL(LINE_ITEM_QUANTITY,0) <> 0
AND PARENT_DEMAND_ID IS NOT NULL;
WSH_UTIL.Write_Log('In Insert_Lines...');
WSH_UTIL.Write_Log('Inserting picking header ' || to_char(ph_id));
INSERT INTO SO_PICKING_HEADERS_ALL (
PICKING_HEADER_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
REQUEST_ID,
BATCH_ID,
ORDER_HEADER_ID,
WAREHOUSE_ID,
SHIP_TO_SITE_USE_ID,
STATUS_CODE,
PICK_SLIP_NUMBER,
SHIP_METHOD_CODE,
DATE_RELEASED,
ORG_ID)
VALUES (
ph_id,
sysdate,
g_user_id,
sysdate,
g_user_id,
g_login_id,
g_application_id,
g_program_id,
sysdate,
g_request_id,
g_batch_id,
p_order_header_id,
p_warehouse_id,
p_ship_to_site_use_id,
'OPEN',
-1,
p_ship_method_code,
sysdate,
decode(p_org_id, -3114, NULL, p_org_id));
SELECT SO_PICKING_LINES_S.NEXTVAL
INTO x_pl_id
FROM DUAL;
rc := Insert_Picking_Line (
x_pl_id,
p_component_code,
p_component_ratio,
p_component_sequence_id,
NULL,
p_date_requested,
p_demand_class,
p_included_item_flag,
p_inventory_item_id,
p_customer_item_id,
p_original_line_detail_id,
p_order_line_id,
p_original_requested_quantity,
ph_id,
p_original_requested_quantity,
p_schedule_date,
p_sequence_number,
p_shipment_priority_code,
p_ship_method_code,
p_ship_to_contact_id,
p_ship_to_site_use_id,
p_unit_code,
p_warehouse_id,
p_org_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
rc := Insert_Picking_Line_Details (
TRANSNONRES,
ps_number,
p_departure_id,
p_delivery_id,
p_dep_plan_required_flag,
'Y',
NULL,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
'DEMANDED',
current_sub,
p_transactable_flag,
NULL,
p_warehouse_id);
rc := Insert_Picking_Line_Details (
RESOFF,
ps_number,
p_departure_id,
p_delivery_id,
p_dep_plan_required_flag,
NULL,
p_customer_requested_lot_flag,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
p_schedule_status_code,
current_sub,
p_transactable_flag,
NULL,
p_warehouse_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
-- Insert picking line
SELECT SO_PICKING_LINES_S.NEXTVAL
INTO x_pl_id
FROM DUAL;
rc := Insert_Picking_Line (
x_pl_id,
p_component_code,
p_component_ratio,
p_component_sequence_id,
p_config_item_flag,
p_date_requested,
p_demand_class,
p_included_item_flag,
p_inventory_item_id,
p_customer_item_id,
p_original_line_detail_id,
p_order_line_id,
p_original_requested_quantity,
ph_id,
p_requested_quantity,
p_schedule_date,
p_sequence_number,
p_shipment_priority_code,
p_ship_method_code,
p_ship_to_contact_id,
p_ship_to_site_use_id,
p_unit_code,
p_warehouse_id,
p_org_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
-- line details to be inserted when using subinventory as part of the
-- pick slip grouping rule is slightly different.
-------------------------------------------------------------------------
IF g_use_sub_ps = 'Y' THEN
OPEN res_sub(p_ccid, p_order_line_id, p_delivery, p_autodetail_group_id);
rc := Insert_Picking_Line_Details (
RESERVABLE,
ps_number,
p_departure_id,
p_delivery_id,
p_dep_plan_required_flag,
'Y',
p_customer_requested_lot_flag,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
p_schedule_status_code,
current_sub,
p_transactable_flag,
NULL,
p_warehouse_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
rc := Insert_Picking_Line_Details (
RESERVABLE,
ps_number,
p_departure_id,
p_delivery_id,
p_dep_plan_required_flag,
'Y',
p_customer_requested_lot_flag,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
p_schedule_status_code,
p_subinventory,
p_transactable_flag,
NULL,
p_warehouse_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
SELECT SO_PICKING_LINES_S.NEXTVAL
INTO x_pl_id
FROM DUAL;
rc := Insert_Picking_Line (
x_pl_id,
p_component_code,
p_component_ratio,
p_component_sequence_id,
p_config_item_flag,
p_date_requested,
p_demand_class,
p_included_item_flag,
p_inventory_item_id,
p_customer_item_id,
p_original_line_detail_id,
p_order_line_id,
p_original_requested_quantity,
0,
p_original_requested_quantity -
p_autodetailed_quantity,
p_schedule_date,
p_sequence_number,
p_shipment_priority_code,
p_ship_method_code,
p_ship_to_contact_id,
p_ship_to_site_use_id,
p_unit_code,
p_warehouse_id,
p_org_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
SELECT SO_DELIVERIES_S.NEXTVAL
INTO p_new_delivery
FROM DUAL;
rc := Insert_Picking_Line_Details (
BACKORDER,
NULL,
NULL,
x_delivery_id,
p_dep_plan_required_flag,
NULL,
NULL,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_new_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity -
p_autodetailed_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
'DEMANDED',
p_subinventory,
p_transactable_flag,
'N',
p_warehouse_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
SELECT SO_DELIVERIES_S.NEXTVAL
INTO p_new_delivery
FROM DUAL;
rc := Insert_Order_Line_Detail (
p_original_line_detail_id,
p_new_line_detail_id,
p_original_requested_quantity -
p_autodetailed_quantity,
p_new_delivery);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
-- Insert picking line
SELECT SO_PICKING_LINES_S.NEXTVAL
INTO x_pl_id
FROM DUAL;
rc := Insert_Picking_Line (
x_pl_id,
p_component_code,
p_component_ratio,
p_component_sequence_id,
p_config_item_flag,
p_date_requested,
p_demand_class,
p_included_item_flag,
p_inventory_item_id,
p_customer_item_id,
p_original_line_detail_id,
p_order_line_id,
p_original_requested_quantity,
ph_id,
p_original_requested_quantity,
p_schedule_date,
p_sequence_number,
p_shipment_priority_code,
p_ship_method_code,
p_ship_to_contact_id,
p_ship_to_site_use_id,
p_unit_code,
p_warehouse_id,
p_org_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
rc := Insert_Picking_Line_Details (
TRANSNONRES,
ps_number,
p_departure_id,
p_delivery_id,
p_dep_plan_required_flag,
'Y',
NULL,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
'DEMANDED',
current_sub,
p_transactable_flag,
NULL,
p_warehouse_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
SELECT SO_PICKING_LINES_S.NEXTVAL
INTO x_pl_id
FROM DUAL;
rc := Insert_Picking_Line (
x_pl_id,
p_component_code,
p_component_ratio,
p_component_sequence_id,
'Y',
p_date_requested,
p_demand_class,
p_included_item_flag,
p_inventory_item_id,
p_customer_item_id,
p_original_line_detail_id,
p_order_line_id,
p_original_requested_quantity,
ph_id,
p_original_requested_quantity,
p_schedule_date,
p_sequence_number,
p_shipment_priority_code,
p_ship_method_code,
p_ship_to_contact_id,
p_ship_to_site_use_id,
p_unit_code,
p_warehouse_id,
p_org_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
rc := Insert_Picking_Line_Details (
NONTRANS,
ps_number,
p_departure_id,
p_delivery_id,
p_dep_plan_required_flag,
NULL,
p_customer_requested_lot_flag,
p_ccid,
p_order_line_id,
p_master_container_item_id,
p_detail_container_item_id,
p_inventory_item_id,
p_load_seq_number,
p_autodetail_group_id,
p_delivery,
p_demand_class,
x_pl_id,
p_original_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
p_schedule_status_code,
p_subinventory,
p_transactable_flag,
NULL,
p_warehouse_id);
WSH_UTIL.Write_Log('WSH_PR_PICKING_OBJECTS: Error in Insert_Lines');
WSH_UTIL.Default_Handler('WSH_PR_PICKING_OBJECTS.Insert_Lines');
END Insert_Lines;
FUNCTION Insert_Picking_Line (
p_picking_line_id IN BINARY_INTEGER,
p_component_code IN VARCHAR2,
p_component_ratio IN BINARY_INTEGER,
p_component_sequence_id IN BINARY_INTEGER,
p_config_item_flag IN VARCHAR2,
p_date_requested IN DATE,
p_demand_class IN VARCHAR2,
p_included_item_flag IN VARCHAR2,
p_inventory_item_id IN BINARY_INTEGER,
p_customer_item_id IN BINARY_INTEGER,
p_original_line_detail_id IN BINARY_INTEGER,
p_order_line_id IN BINARY_INTEGER,
p_original_requested_quantity IN BINARY_INTEGER,
p_pick_header_id IN BINARY_INTEGER,
p_requested_quantity IN BINARY_INTEGER,
p_schedule_date IN DATE,
p_sequence_number IN BINARY_INTEGER,
p_shipment_priority_code IN VARCHAR2,
p_ship_method_code IN VARCHAR2,
p_ship_to_contact_id IN BINARY_INTEGER,
p_ship_to_site_use_id IN BINARY_INTEGER,
p_unit_code IN VARCHAR2,
p_warehouse_id IN BINARY_INTEGER,
p_org_id IN BINARY_INTEGER
)
RETURN BINARY_INTEGER IS
BEGIN
WSH_UTIL.Write_Log('--------------------');
WSH_UTIL.Write_Log('Inserting Picking Line');
INSERT INTO SO_PICKING_LINES_ALL (
PICKING_LINE_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
REQUEST_ID,
COMPONENT_CODE,
COMPONENT_RATIO,
COMPONENT_SEQUENCE_ID,
CONFIGURATION_ITEM_FLAG,
DATE_REQUESTED,
DEMAND_CLASS_CODE,
INCLUDED_ITEM_FLAG,
INVENTORY_ITEM_ID,
CUSTOMER_ITEM_ID,
LINE_DETAIL_ID,
ORDER_LINE_ID,
ORIGINAL_REQUESTED_QUANTITY,
PICKING_HEADER_ID,
REQUESTED_QUANTITY,
SCHEDULE_DATE,
SEQUENCE_NUMBER,
SHIPMENT_PRIORITY_CODE,
SHIP_METHOD_CODE,
SHIP_TO_CONTACT_ID,
SHIP_TO_SITE_USE_ID,
UNIT_CODE,
WAREHOUSE_ID,
ORG_ID)
VALUES (
p_picking_line_id,
g_user_id,
SYSDATE,
g_user_id,
SYSDATE,
g_login_id,
g_application_id,
g_program_id,
SYSDATE,
g_request_id,
p_component_code,
p_component_ratio,
p_component_sequence_id,
p_config_item_flag,
p_date_requested,
p_demand_class,
p_included_item_flag,
p_inventory_item_id,
decode(p_customer_item_id,
-1, NULL,
p_customer_item_id),
p_original_line_detail_id,
p_order_line_id,
p_original_requested_quantity,
p_pick_header_id,
p_requested_quantity,
p_schedule_date,
p_sequence_number,
p_shipment_priority_code,
p_ship_method_code,
DECODE(p_ship_to_contact_id,
-1, NULL,
p_ship_to_contact_id),
DECODE(p_ship_to_site_use_id,
-1, NULL,
p_ship_to_site_use_id),
p_unit_code,
p_warehouse_id,
decode(p_org_id, -3114, NULL, p_org_id));
WSH_UTIL.Default_Handler('WSH_PR_PICKING_OBJECTS.Insert_Picking_Line');
END Insert_Picking_Line;
FUNCTION Insert_Picking_Line_Details (
p_mode IN BINARY_INTEGER,
p_ps_number IN BINARY_INTEGER,
p_departure_id IN BINARY_INTEGER,
p_delivery_id IN OUT BINARY_INTEGER,
p_dep_plan_required_flag IN VARCHAR2,
p_autoscheduled_flag IN VARCHAR2,
p_customer_requested_lot_flag IN VARCHAR2,
p_ccid IN BINARY_INTEGER,
p_order_line_id IN BINARY_INTEGER,
p_master_container_item_id IN BINARY_INTEGER,
p_detail_container_item_id IN BINARY_INTEGER,
p_inventory_item_id IN BINARY_INTEGER,
p_load_seq_number IN BINARY_INTEGER,
p_autodetail_group_id IN BINARY_INTEGER,
p_delivery IN BINARY_INTEGER,
p_demand_class IN VARCHAR2,
p_picking_line_id IN BINARY_INTEGER,
p_requested_quantity IN BINARY_INTEGER,
p_reservable_flag IN VARCHAR2,
p_schedule_date IN DATE,
p_schedule_level IN VARCHAR2,
p_schedule_status_code IN VARCHAR2,
p_subinventory IN VARCHAR2,
p_transactable_flag IN VARCHAR2,
p_released_flag IN VARCHAR2,
p_warehouse_id IN BINARY_INTEGER
)
RETURN BINARY_INTEGER IS
rows_inserted BINARY_INTEGER;
INSERT INTO SO_PICKING_LINE_DETAILS (
PICKING_LINE_DETAIL_ID,
PICK_SLIP_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
REQUEST_ID,
AUTOSCHEDULED_FLAG,
DEPARTURE_ID,
DELIVERY_ID,
MASTER_CONTAINER_ITEM_ID,
DETAIL_CONTAINER_ITEM_ID,
LOAD_SEQ_NUMBER,
DPW_ASSIGNED_FLAG,
DELIVERY,
DEMAND_CLASS_CODE,
PICKING_LINE_ID,
REQUESTED_QUANTITY,
RESERVABLE_FLAG,
SCHEDULE_DATE,
SCHEDULE_LEVEL,
SCHEDULE_STATUS_CODE,
SUBINVENTORY,
TRANSACTABLE_FLAG,
WAREHOUSE_ID,
MVT_STAT_STATUS)
VALUES (
SO_PICKING_LINE_DETAILS_S.NEXTVAL,
p_ps_number,
g_user_id,
SYSDATE,
g_user_id,
SYSDATE,
g_login_id,
g_application_id,
g_program_id,
SYSDATE,
g_request_id,
decode(p_mode,NONTRANS,'Y',NULL),
decode(p_departure_id, -1, NULL, p_departure_id),
decode(p_delivery_id, -1, NULL, p_delivery_id),
decode(p_master_container_item_id, -1, NULL, p_master_container_item_id),
decode(p_detail_container_item_id, -1, NULL, p_detail_container_item_id),
DECODE(p_load_seq_number,
-1, NULL,
p_load_seq_number),
l_dpw_assigned_flag,
p_delivery,
p_demand_class,
p_picking_line_id,
p_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
p_schedule_status_code,
nvl(p_subinventory, decode(p_reservable_flag, 'N', default_subinventory, NULL)),
p_transactable_flag,
p_warehouse_id,
'NEW');
rows_inserted := SQL%ROWCOUNT;
INSERT INTO SO_PICKING_LINE_DETAILS (
PICKING_LINE_DETAIL_ID,
PICK_SLIP_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
REQUEST_ID,
AUTOSCHEDULED_FLAG,
CUSTOMER_REQUESTED_LOT_FLAG,
DEPARTURE_ID,
DELIVERY_ID,
MASTER_CONTAINER_ITEM_ID,
DETAIL_CONTAINER_ITEM_ID,
LOAD_SEQ_NUMBER,
DPW_ASSIGNED_FLAG,
DELIVERY,
DEMAND_CLASS_CODE,
DEMAND_ID,
INVENTORY_LOCATION_ID,
LOT_NUMBER,
PICKING_LINE_ID,
REQUESTED_QUANTITY,
RESERVABLE_FLAG,
REVISION,
SCHEDULE_DATE,
SCHEDULE_LEVEL,
SCHEDULE_STATUS_CODE,
SUBINVENTORY,
SUPPLY_SOURCE_HEADER_ID,
SUPPLY_SOURCE_TYPE,
TRANSACTABLE_FLAG,
WAREHOUSE_ID,
MVT_STAT_STATUS)
SELECT
SO_PICKING_LINE_DETAILS_S.NEXTVAL,
p_ps_number,
g_user_id,
SYSDATE,
g_user_id,
SYSDATE,
g_login_id,
g_application_id,
g_program_id,
SYSDATE,
g_request_id,
'Y',
p_customer_requested_lot_flag,
decode(p_departure_id, -1, NULL, p_departure_id),
decode(p_delivery_id, -1, NULL, p_delivery_id),
decode(p_master_container_item_id, -1, NULL, p_master_container_item_id),
decode(p_detail_container_item_id, -1, NULL, p_detail_container_item_id),
DECODE(p_load_seq_number,
-1, NULL,
p_load_seq_number),
l_dpw_assigned_flag,
D.DEMAND_SOURCE_DELIVERY,
D.DEMAND_CLASS,
D.DEMAND_ID,
D.LOCATOR_ID,
D.LOT_NUMBER,
p_picking_line_id,
D.LINE_ITEM_QUANTITY,
p_reservable_flag,
D.REVISION,
D.REQUIREMENT_DATE,
p_schedule_level,
'RESERVED',
D.SUBINVENTORY,
D.SUPPLY_SOURCE_HEADER_ID,
D.SUPPLY_SOURCE_TYPE,
p_transactable_flag,
D.ORGANIZATION_ID,
'NEW'
FROM MTL_DEMAND D
WHERE D.DEMAND_SOURCE_HEADER_ID = p_ccid
AND D.DEMAND_SOURCE_TYPE IN (2,8)
AND D.DEMAND_SOURCE_LINE = to_char(p_order_line_id)
AND D.DEMAND_SOURCE_DELIVERY = to_char(p_delivery)
AND D.AUTODETAIL_GROUP_ID = p_autodetail_group_id
AND NVL(D.LINE_ITEM_QUANTITY,0) <> 0
AND D.PARENT_DEMAND_ID IS NOT NULL
AND D.RESERVATION_TYPE = 2
AND D.SUBINVENTORY = DECODE(g_use_sub_ps, 'Y', p_subinventory, D.SUBINVENTORY);
rows_inserted := SQL%ROWCOUNT;
INSERT INTO SO_PICKING_LINE_DETAILS (
PICKING_LINE_DETAIL_ID,
PICK_SLIP_NUMBER,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
REQUEST_ID,
AUTOSCHEDULED_FLAG,
CUSTOMER_REQUESTED_LOT_FLAG,
DEPARTURE_ID,
DELIVERY_ID,
MASTER_CONTAINER_ITEM_ID,
DETAIL_CONTAINER_ITEM_ID,
LOAD_SEQ_NUMBER,
DPW_ASSIGNED_FLAG,
DELIVERY,
DEMAND_CLASS_CODE,
DEMAND_ID,
INVENTORY_LOCATION_ID,
LOT_NUMBER,
PICKING_LINE_ID,
REQUESTED_QUANTITY,
RESERVABLE_FLAG,
REVISION,
SCHEDULE_DATE,
SCHEDULE_LEVEL,
SCHEDULE_STATUS_CODE,
SUBINVENTORY,
SUPPLY_SOURCE_HEADER_ID,
SUPPLY_SOURCE_TYPE,
TRANSACTABLE_FLAG,
WAREHOUSE_ID,
MVT_STAT_STATUS)
SELECT
SO_PICKING_LINE_DETAILS_S.NEXTVAL,
p_ps_number,
g_user_id,
SYSDATE,
g_user_id,
SYSDATE,
g_login_id,
g_application_id,
g_program_id,
SYSDATE,
g_request_id,
'Y',
p_customer_requested_lot_flag,
decode(p_departure_id, -1, NULL, p_departure_id),
decode(p_delivery_id, -1, NULL, p_delivery_id),
decode(p_master_container_item_id, -1, NULL, p_master_container_item_id),
decode(p_detail_container_item_id, -1, NULL, p_detail_container_item_id),
DECODE(p_load_seq_number,
-1, NULL,
p_load_seq_number),
l_dpw_assigned_flag,
D.DEMAND_SOURCE_DELIVERY,
D.DEMAND_CLASS,
D.DEMAND_ID,
D.LOCATOR_ID,
D.LOT_NUMBER,
p_picking_line_id,
D.LINE_ITEM_QUANTITY,
p_reservable_flag,
D.REVISION,
D.REQUIREMENT_DATE,
p_schedule_level,
'DEMANDED',
nvl(D.SUBINVENTORY, decode(p_reservable_flag, 'N', default_subinventory, NULL)),
D.SUPPLY_SOURCE_HEADER_ID,
D.SUPPLY_SOURCE_TYPE,
p_transactable_flag,
D.ORGANIZATION_ID,
'NEW'
FROM MTL_DEMAND D
WHERE D.DEMAND_SOURCE_HEADER_ID = p_ccid
AND D.DEMAND_SOURCE_TYPE IN (2,8)
AND D.DEMAND_SOURCE_LINE = to_char(p_order_line_id)
AND D.DEMAND_SOURCE_DELIVERY = to_char(p_delivery)
AND D.AUTODETAIL_GROUP_ID IS NULL
AND NVL(D.LINE_ITEM_QUANTITY,0) <> 0
AND D.PARENT_DEMAND_ID IS NOT NULL
AND nvl(D.SUBINVENTORY, -99) = DECODE(g_use_sub_ps, 'Y', nvl(p_subinventory, -99), nvl(D.SUBINVENTORY, -99));
rows_inserted := SQL%ROWCOUNT;
INSERT INTO SO_PICKING_LINE_DETAILS (
PICKING_LINE_DETAIL_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
REQUEST_ID,
DPW_ASSIGNED_FLAG,
RELEASED_FLAG,
DELIVERY,
DEMAND_CLASS_CODE,
PICKING_LINE_ID,
REQUESTED_QUANTITY,
RESERVABLE_FLAG,
SCHEDULE_DATE,
SCHEDULE_LEVEL,
SCHEDULE_STATUS_CODE,
SUBINVENTORY,
TRANSACTABLE_FLAG,
WAREHOUSE_ID,
MVT_STAT_STATUS)
VALUES (
SO_PICKING_LINE_DETAILS_S.NEXTVAL,
g_user_id,
SYSDATE,
g_user_id,
SYSDATE,
g_login_id,
g_application_id,
g_program_id,
SYSDATE,
g_request_id,
'N',
'N',
p_delivery,
p_demand_class,
p_picking_line_id,
p_requested_quantity,
p_reservable_flag,
p_schedule_date,
p_schedule_level,
'DEMANDED',
p_subinventory,
p_transactable_flag,
p_warehouse_id,
'NEW');
rows_inserted := SQL%ROWCOUNT;
WSH_UTIL.Write_Log('Invalid picking line detail insertion mode');
WSH_UTIL.Write_Log('Inserted ' || to_char(rows_inserted) ||
' picking_line_details for picking_line '|| to_char(p_picking_line_id));
IF rows_inserted = 0 THEN
RETURN FAILURE;
RETURN rows_inserted;
WSH_UTIL.Default_Handler('WSH_PR_PICKING_OBJECTS.Insert_Picking_Line_Details',
to_char(p_mode));
END Insert_Picking_Line_Details;
FUNCTION Insert_Order_Line_Detail (
p_original_line_detail_id IN BINARY_INTEGER,
p_new_line_detail_id IN OUT BINARY_INTEGER,
p_quantity IN BINARY_INTEGER,
p_new_delivery IN BINARY_INTEGER
) RETURN BINARY_INTEGER IS
rows_inserted BINARY_INTEGER;
WSH_UTIL.Write_Log('Inserting new order line detail');
SELECT SO_LINE_DETAILS_S.NEXTVAL
INTO p_new_line_detail_id
FROM DUAL;
INSERT INTO SO_LINE_DETAILS (
LINE_DETAIL_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LINE_ID,
INVENTORY_ITEM_ID,
INCLUDED_ITEM_FLAG,
COMPONENT_SEQUENCE_ID,
COMPONENT_CODE,
COMPONENT_RATIO,
SHIPPABLE_FLAG,
TRANSACTABLE_FLAG,
RESERVABLE_FLAG,
UNIT_CODE,
RELEASED_FLAG,
REQUIRED_FOR_REVENUE_FLAG,
QUANTITY,
WAREHOUSE_ID,
DEMAND_CLASS_CODE,
SCHEDULE_DATE,
REVISION,
LOT_NUMBER,
SUBINVENTORY,
CUSTOMER_REQUESTED_LOT_FLAG,
SCHEDULE_STATUS_CODE,
SCHEDULE_LEVEL_CODE,
QUANTITY_SVRID,
WAREHOUSE_SVRID,
DEMAND_CLASS_SVRID,
DATE_SVRID,
REVISION_SVRID,
LOT_SVRID,
SUBINVENTORY_SVRID,
CUSTOMER_REQUESTED_SVRID,
DF_SVRID,
CONTEXT,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
DELIVERY,
WIP_RESERVED_QUANTITY,
WIP_COMPLETED_QUANTITY,
SUPPLY_SOURCE_TYPE,
SUPPLY_SOURCE_HEADER_ID,
DEPARTURE_ID,
DELIVERY_ID,
DPW_ASSIGNED_FLAG,
UPDATE_FLAG,
INVENTORY_LOCATION_ID,
CONFIGURATION_ITEM_FLAG,
LATEST_ACCEPTABLE_DATE,
LATEST_ACCEPTABLE_DATE_SVRID,
DEP_PLAN_REQUIRED_FLAG,
CUSTOMER_ITEM_ID,
LOAD_SEQ_NUMBER
)
SELECT p_new_line_detail_id,
SYSDATE,
g_user_id,
SYSDATE,
g_user_id,
g_login_id,
LINE_ID,
INVENTORY_ITEM_ID,
INCLUDED_ITEM_FLAG,
COMPONENT_SEQUENCE_ID,
COMPONENT_CODE,
COMPONENT_RATIO,
SHIPPABLE_FLAG,
TRANSACTABLE_FLAG,
RESERVABLE_FLAG,
UNIT_CODE,
'N',
REQUIRED_FOR_REVENUE_FLAG,
p_quantity,
WAREHOUSE_ID,
DEMAND_CLASS_CODE,
SCHEDULE_DATE,
REVISION,
LOT_NUMBER,
SUBINVENTORY,
CUSTOMER_REQUESTED_LOT_FLAG,
SCHEDULE_STATUS_CODE,
SCHEDULE_LEVEL_CODE,
QUANTITY_SVRID,
WAREHOUSE_SVRID,
DEMAND_CLASS_SVRID,
DATE_SVRID,
REVISION_SVRID,
LOT_SVRID,
SUBINVENTORY_SVRID,
CUSTOMER_REQUESTED_SVRID,
DF_SVRID,
CONTEXT,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
p_new_delivery,
WIP_RESERVED_QUANTITY,
WIP_COMPLETED_QUANTITY,
SUPPLY_SOURCE_TYPE,
SUPPLY_SOURCE_HEADER_ID,
DEPARTURE_ID,
DELIVERY_ID,
DPW_ASSIGNED_FLAG,
UPDATE_FLAG,
INVENTORY_LOCATION_ID,
CONFIGURATION_ITEM_FLAG,
LATEST_ACCEPTABLE_DATE,
LATEST_ACCEPTABLE_DATE_SVRID,
DEP_PLAN_REQUIRED_FLAG,
CUSTOMER_ITEM_ID,
LOAD_SEQ_NUMBER
FROM SO_LINE_DETAILS
WHERE line_detail_id = p_original_line_detail_id;
rows_inserted := SQL%ROWCOUNT;
WSH_UTIL.Write_Log('Inserted ' || to_char(rows_inserted) ||
' order_line_detail = ' || to_char(p_new_line_detail_id));
RETURN rows_inserted;
WSH_UTIL.Default_Handler('WSH_PR_PICKING_OBJECTS.Insert_Order_Line_Detail');
END Insert_Order_Line_Detail;
SELECT SO_PICKING_HEADERS_S.NEXTVAL
INTO x_value
FROM DUAL;
SELECT SO_PICKING_HEADERS_S.NEXTVAL
INTO x_value
FROM DUAL;