The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_TEMP_MODIFIERS(
p_asl_id IN NUMBER,
p_proc_lead_time IN NUMBER,
p_min_order_qty IN NUMBER,
p_fixed_lot_multiple IN NUMBER,
p_created_by in number,
p_error_code OUT NOCOPY VARCHAR2,
p_error_message OUT NOCOPY VARCHAR2) is
l_seq number;
/* Update PO_ASL_ATTRIBUTES form ISP */
select POS_ORDER_MODIFIERS_TEMP_ID_S.NEXTVAL
into l_seq from sys.dual;
insert into POS_ORDER_MODIFIERS_TEMP (
order_mod_request_id,
asl_id,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by,
processing_lead_time,
min_order_quantity,
fixed_lot_multiple,
status)
values
(
l_seq,
p_asl_id,
sysdate,
p_created_by,
p_created_by,
sysdate,
p_created_by,
p_proc_lead_time,
p_min_order_qty,
p_fixed_lot_multiple,
'NEW');
p_ERROR_MESSAGE := 'exception raised during Update';
END INSERT_TEMP_MODIFIERS;
PROCEDURE UPDATE_EXIST(p_asl_id in NUMBER,
p_return_code out NOCOPY NUMBER) is
begin
select count(*)
into p_return_code
from POS_ORDER_MODIFIERS_TEMP
where asl_id=p_asl_id and status='NEW';
end UPDATE_EXIST;
/* Update PO_ASL_ATTRIBUTES form ISP */
select count(*)
into l_count
from POS_ORDER_MODIFIERS_TEMP
where asl_id=p_asl_id and status='NEW';
select to_char(POS_ASL_UPD_ITEMKEY_S.NEXTVAL)
into l_seq from sys.dual;
select BUYER_ID,
PLANNER_ID,
SUPPLIER_ITEM_NUMBER,
ITEM_NUMBER
into l_buyer_id,
l_planner_id,
p_supplier_item_num,
p_item_num
from POS_ORD_MODIFIERS_V
where asl_id=p_asl_id;
select DESCRIPTION,
BUYER_ID,
PLANNER_ID,
UOM,
SUPPLIER_ITEM_NUMBER,
ITEM_NUMBER,
VENDOR_ID,
to_char(PROCESSING_LEAD_TIME),
to_char(MIN_ORDER_QTY),
to_char(FIXED_LOT_MULTIPLE)
into l_item_description,
l_buyer_id,
l_planner_id,
l_uom,
l_supplier_item_number,
l_item_number,
l_vendor_id,
l_processing_lead_time,
l_min_order_qty,
l_fixed_lot_multiple
from POS_ORD_MODIFIERS_V
where asl_id=l_asl_id;
select vendor_name
into l_supplier_username
from po_vendors
where vendor_id=l_vendor_id;
select last_updated_by
into l_vendor_id
from POS_ORDER_MODIFIERS_TEMP
where order_mod_request_id=
(select min(order_mod_request_id)
from POS_ORDER_MODIFIERS_TEMP
where asl_id=l_asl_id and status='NEW');
select to_char(PROCESSING_LEAD_TIME),
to_char(MIN_ORDER_QUANTITY),
to_char(FIXED_LOT_MULTIPLE)
into l_processing_lead_time,
l_min_order_qty,
l_fixed_lot_multiple
from POS_ORDER_MODIFIERS_TEMP
where asl_id=l_asl_id and status='NEW';
l_document := l_document || '' || fnd_message.get_string('POS','POS_REQUESTED_UPDATES') || ' ' || NL;
procedure UPDATE_ASL( itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout out NOCOPY varchar2 ) is
l_asl_id number;
select processing_lead_time, min_order_quantity, fixed_lot_multiple
into l_proc_lead_time, l_min_order_qty, l_fixed_lot_multiple
from POS_ORDER_MODIFIERS_TEMP
where asl_id=l_asl_id
and status='NEW';
UPDATE PO_ASL_ATTRIBUTES
SET PROCESSING_LEAD_TIME = l_proc_lead_time,
MIN_ORDER_QTY = l_min_order_qty,
FIXED_LOT_MULTIPLE = l_fixed_lot_multiple
WHERE asl_id = l_asl_id
and using_organization_id = -1;
update POS_ORDER_MODIFIERS_TEMP
set status='ACE'
where asl_id=l_asl_id
and status='NEW';
procedure UPDATE_STATUS( itemtype in varchar2,
itemkey in varchar2,
actid in number,
funcmode in varchar2,
resultout out NOCOPY varchar2 ) is
l_asl_id number;
update POS_ORDER_MODIFIERS_TEMP
set status='REJ'
where asl_id=l_asl_id
and status='NEW';