The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure UpdateInstallBase(itemtype in varchar2,
itemkey in varchar2
);
Procedure UPDATE_INSTALL_BASE (itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout OUT NOCOPY varchar2) IS
l_result varchar2(10);
UpdateInstallBase(itemtype, itemkey);
wf_core.context('XDPCORE_LINE', 'UPDATE_INSTALL_BASE', itemtype, itemkey, to_char(actid), funcmode);
END UPDATE_INSTALL_BASE;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select LINE_ITEM_ID, IS_PACKAGE_FLAG, PRIORITY ,IB_SOURCE, NVL(IB_SOURCE_ID,-999) IB_SOURCE_ID
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE = 0;
select LINE_ITEM_ID
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE > 0;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select LINE_ITEM_ID, IS_PACKAGE_FLAG, PRIORITY ,IB_SOURCE, NVL(IB_SOURCE_ID,-999) IB_SOURCE_ID
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE = 0;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select LINE_ITEM_ID, IS_PACKAGE_FLAG, PRIORITY ,IB_SOURCE, NVL(IB_SOURCE_ID,-999) IB_SOURCE_ID
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE = 0
and BUNDLE_ID = BundleID;
select LINE_ITEM_ID, IS_PACKAGE_FLAG, PRIORITY ,IB_SOURCE, NVL(IB_SOURCE_ID,-999) IB_SOURCE_ID
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE = 0
and ((BUNDLE_ID is null) or (BUNDLE_ID = 0 ) );
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
select to_char(XDP_WF_ITEMKEY_S.NEXTVAL) into l_tempKey from dual;
UPDATE xdp_order_line_items
SET status_code = p_status_code ,
wf_item_type = p_itemtype,
wf_item_key = p_itemkey,
last_update_date = sysdate ,
last_updated_by = fnd_global.user_id ,
last_update_login = fnd_global.login_id
WHERE line_item_id = p_line_item_id ;
Procedure UpdateInstallBase(itemtype in varchar2,
itemkey in varchar2)
is
l_OrderID number;
l_OrderID := wf_engine.GetItemAttrNumber(itemtype => UpdateInstallBase.itemtype,
itemkey => UpdateInstallBase.itemkey,
aname => 'ORDER_ID');
l_LineItemID := wf_engine.GetItemAttrNumber(itemtype => UpdateInstallBase.itemtype,
itemkey => UpdateInstallBase.itemkey,
aname => 'LINE_ITEM_ID');
XDP_INSTALL_BASE.UPDATE_IB(p_order_id => l_OrderID,
p_line_id => l_LineItemID,
p_error_code => l_errcode,
p_error_description => l_error_description);
'UpdateInstallBase. Error: ' || substr(l_error_description,1,1500);
END UpdateInstallBase;
select 'Y'
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE = 0;
select 'Y'
from XDP_ORDER_LINE_ITEMS
where ORDER_ID = OrderID
and IS_VIRTUAL_LINE_FLAG = 'N'
and STATUS_CODE = 'READY'
and LINE_SEQUENCE > 0;
SELECT is_virtual_line_flag INTO l_flag
FROM xdp_order_line_items
WHERE line_item_id = l_LineItemID;
SELECT line_number
INTO l_line_number
FROM xdp_order_line_items
WHERE line_item_id = l_line_item_id ;