The following lines contain the word 'select', 'insert', 'update' or 'delete':
| -- Insert_gml_batch_so_workflow() |
| |
| HISTORY |
| 10-Oct-2003 nchekuri Created |
| |
+=========================================================================+ */
PROCEDURE init_wf (
p_session_id IN NUMBER
, p_approver IN NUMBER
, p_so_header_id IN NUMBER
, p_so_line_id IN NUMBER
, p_batch_id IN NUMBER
, p_batch_line_id IN NUMBER
, p_whse_code IN VARCHAR2
, p_lot_no IN VARCHAR2 DEFAULT NULL
, p_action_code IN VARCHAR2 )IS
l_itemtype VARCHAR2(240) := 'GMLBTRES';
SELECT user_name
FROM fnd_user
WHERE user_id = p_user_id;
SELECT ol.line_number, mtl.segment1,
ot.transaction_type_code,
oh.order_number
FROM oe_order_headers_all oh
,oe_order_lines_all ol
,oe_transaction_types_all ot
,mtl_system_items mtl
WHERE ol.line_id = p_so_line_id
and ol.header_id = oh.header_id
and oh.order_type_id = ot.transaction_type_id
and mtl.inventory_item_id = ol.inventory_item_id;
SELECT batch_no,plant_code,
plan_cmplt_date
FROM gme_batch_header
WHERE batch_id = p_batch_id;
/* Insert the workflow/batch/so information into Gml_batch_so_workflow table for
future reference. */
GMI_RESERVATION_UTIL.PrintLn('In GML_BATCH_WORKFLOW_PKG. Init_wf Before Insert Record');
INSERT_GML_BATCH_SO_WORKFLOW(
l_itemtype
, l_itemkey
, p_so_header_id
, p_so_line_id
, p_batch_id
, p_batch_line_id
, p_action_code);
GMI_RESERVATION_UTIL.PrintLn('In GML_BATCH_WORKFLOW_PKG. Init_wf After Insert Record');
PROCEDURE INSERT_GML_BATCH_SO_WORKFLOW(
p_itemtype IN VARCHAR2
, p_itemkey IN VARCHAR2
, p_so_header_id IN NUMBER
, p_so_line_id IN NUMBER
, p_batch_id IN NUMBER
, p_batch_line_id IN NUMBER
, p_action_code IN VARCHAR2) IS
l_wf_item_id NUMBER;
GMI_RESERVATION_UTIL.PrintLn('In GML_BATCH_WORKFLOW_PKG. INSERT_GML_BATCH_SO_WORKFLOW..... ');
SELECT GML_BATCH_SO_WORKFLOW_S.nextval
INTO l_wf_item_id FROM DUAL;
GMI_RESERVATION_UTIL.PrintLn('In GML_BATCH_WORKFLOW_PKG. INSERT_GML_BATCH_SO_WORKFLOW Before Insert ');
INSERT INTO Gml_batch_so_workflow (
WF_ITEM_ID
, WF_ITEM_TYPE
, WF_ITEM_KEY
, SO_HEADER_ID
, SO_LINE_ID
, BATCH_ID
, BATCH_LINE_ID
, ACTION_CODE
, CREATION_DATE
, CREATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATED_BY ) VALUES
( l_wf_item_id
, p_itemtype
, p_itemkey
, p_so_header_id
, p_so_line_id
, p_batch_id
, p_batch_line_id
, p_action_code
, sysdate
, fnd_global.user_id
, sysdate
, fnd_global.user_id);
GMI_RESERVATION_UTIL.PrintLn('In GML_BATCH_WORKFLOW_PKG. INSERT_GML_BATCH_SO_WORKFLOW After Insert ');
GMI_RESERVATION_UTIL.PrintLn('WARNING! GML_BATCH_WORKFLOW_PKG. INSERT_GML_BATCH_SO_WORKFLOW OTHERS Exception ');
END INSERT_GML_BATCH_SO_WORKFLOW;