The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_atp_request (p_inventory_item_id IN NUMBER,
p_organization_id IN NUMBER,
p_quantity IN NUMBER,
p_atp_group_id IN OUT NOCOPY NUMBER,
p_return_status OUT NOCOPY VARCHAR2,
p_error_message OUT NOCOPY VARCHAR2,
p_sequence_number IN NUMBER,
p_atp_rule_id IN NUMBER DEFAULT NULL) IS
rec_mgav mtl_group_atps_view%rowtype;
select MTL_DEMAND_INTERFACE_S.NEXTVAL into p_atp_group_id
from dual;
select atp_rule_id, primary_uom_code
into
rec_mgav.atp_rule_id, rec_mgav.uom_code
from
mtl_system_items
where
inventory_item_id = p_inventory_item_id and
organization_id = p_organization_id;
SELECT r.rule_id
INTO
rec_mgav.atp_rule_id
FROM
mtl_parameters p, mtl_atp_rules r
WHERE
p.default_atp_rule_id = r.rule_id
AND p.organization_id = p_organization_id;
SELECT MTL.ORGANIZATION_ID
into rec_mgav.atp_calendar_organization_id
FROM HR_ORGANIZATION_UNITS HR, MTL_PARAMETERS MTL
WHERE HR.ORGANIZATION_ID = MTL.ORGANIZATION_ID
AND MTL.CALENDAR_CODE is not null
AND MTL.CALENDAR_EXCEPTION_SET_ID is not null
AND MTL.ORGANIZATION_ID = p_organization_id;
INSERT INTO MTL_GROUP_ATPS_VIEW
(ATP_GROUP_ID,
ORGANIZATION_ID,
INVENTORY_ITEM_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ATP_RULE_ID,
REQUEST_QUANTITY,
REQUEST_PRIMARY_UOM_QUANTITY,
REQUEST_DATE,
ATP_LEAD_TIME,
ATP_CALENDAR_ORGANIZATION_ID,
AVAILABLE_TO_ATP,
UOM_CODE,
DEMAND_CLASS,
N_COLUMN2
)
values
(
rec_mgav.ATP_GROUP_ID,
p_organization_id,
p_inventory_item_id,
sysdate,
-1,
sysdate,
-1,
-1,
rec_mgav.ATP_RULE_ID,
p_quantity,
p_quantity,
sysdate,
atp_lead_time,
rec_mgav.ATP_CALENDAR_ORGANIZATION_ID,
1,
rec_mgav.UOM_CODE,
demand_class,
p_sequence_number
);
p_error_message := 'cz_atp_util.insert_atp_request: ' || SQLERRM;
END insert_atp_request;
select
error_code,
group_available_date,
earliest_atp_date
into
error_code,
group_available_date,
p_earliest_atp_date
from
MTL_GROUP_ATPS_VIEW
where
ATP_GROUP_ID = p_atp_group_id and
n_column2 = p_sequence_number;
SELECT meaning INTO p_error_message FROM mfg_lookups
WHERE lookup_code = error_code
AND lookup_type = 'MTL_DEMAND_INTERFACE_ERRORS';
DELETE FROM mtl_group_atps_view WHERE atp_group_id = p_atp_group_id
AND n_column2 = p_sequence_number;