The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
AMS_TCOP_REQUESTS_S.nextval
from dual;
INSERT INTO AMS_TCOP_REQUESTS
(
REQUEST_ID,
SCHEDULE_ID,
REQUEST_DATE,
STATUS,
COMPLETION_DATE,
WF_ITEM_TYPE,
WF_ITEM_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
SECURITY_GROUP_ID
)
VALUES
(
l_request_id,
p_schedule_id,
sysdate,
'NEW',
null,
p_item_type,
p_item_id,
sysdate,
FND_GLOBAL.USER_ID,
sysdate,
FND_GLOBAL.USER_ID,
FND_GLOBAL.USER_ID,
null
);
SELECT STATUS
FROM AMS_TCOP_REQUESTS
WHERE SCHEDULE_ID = p_schedule_id;
SELECT TCOP.WF_ITEM_TYPE WF_ITEM_TYPE,
TCOP.WF_ITEM_ID WF_ITEM_ID,
TCOP.SCHEDULE_ID SCHEDULE_ID
FROM AMS_TCOP_REQUESTS TCOP,WF_ITEMS WF
WHERE TCOP.STATUS='NEW'
and TCOP.WF_ITEM_ID=WF.ITEM_KEY
ORDER BY TCOP.REQUEST_DATE; --first come,first serve
UPDATE_STATUS(C1.SCHEDULE_ID,'SCHEDULED');
PROCEDURE UPDATE_STATUS(p_schedule_id NUMBER,
p_status VARCHAR2
)
IS
BEGIN
UPDATE AMS_TCOP_REQUESTS
SET STATUS = p_status
WHERE schedule_id=p_schedule_id;
END UPDATE_STATUS;