The following lines contain the word 'select', 'insert', 'update' or 'delete':
FUNCTION select_process(appl_short_name IN VARCHAR2,
code IN VARCHAR2,
num IN NUMBER,
itemtype IN VARCHAR2)
RETURN VARCHAR2
IS
l_pname VARCHAR2(30);
SELECT
wf_process_name
INTO l_pname
FROM fnd_flex_workflow_processes fwk, fnd_application app
WHERE app.application_short_name = appl_short_name
AND fwk.application_id = app.application_id
AND fwk.id_flex_code = code
AND fwk.id_flex_num = num
AND fwk.wf_item_type = itemtype;
END select_process;
SELECT
application_id
INTO l_application_id
FROM fnd_application
WHERE application_short_name = appl_short_name;
SELECT
COUNT(*)
INTO l_nsegments
FROM fnd_id_flex_segments
WHERE application_id = l_application_id
AND id_flex_code = code
AND id_flex_num = num
AND enabled_flag = 'Y';
SELECT
TO_CHAR(FND_FLEX_WORKFLOW_ITEMKEY_S.NEXTVAL)
INTO l_itemkey
FROM DUAL;
l_pname := fnd_flex_workflow.select_process(appl_short_name, code, num,
itemtype);
wf_engine.AddItemAttr(itemtype, l_itemkey, 'FND_FLEX_INSERT');
l_insert_if_new BOOLEAN := FALSE;
RETURN generate(itemtype, itemkey, l_insert_if_new, ccid, concat_segs,
concat_ids, concat_descrs, error_message,
l_new_combination);
insert_if_new IN BOOLEAN,
ccid IN OUT nocopy NUMBER,
concat_segs IN OUT nocopy VARCHAR2,
concat_ids IN OUT nocopy VARCHAR2,
concat_descrs IN OUT nocopy VARCHAR2,
error_message IN OUT nocopy VARCHAR2,
new_combination IN OUT nocopy BOOLEAN) RETURN BOOLEAN
IS
l_process_status VARCHAR2(100);
debug('INSERT_IF_NEW = ' || bool_to_char(insert_if_new));
IF (insert_if_new) THEN
wf_engine.SetItemAttrText(itemtype, itemkey, 'FND_FLEX_INSERT', 'Y');
wf_engine.SetItemAttrText(itemtype, itemkey, 'FND_FLEX_INSERT', 'N');
l_insert_if_new BOOLEAN := FALSE;
l_insert_if_new, ccid, concat_segs, concat_ids,
concat_descrs, error_message, l_new_combination);
insert_if_new IN BOOLEAN,
ccid IN OUT nocopy NUMBER,
concat_segs IN OUT nocopy VARCHAR2,
concat_ids IN OUT nocopy VARCHAR2,
concat_descrs IN OUT nocopy VARCHAR2,
error_message IN OUT nocopy VARCHAR2,
new_combination IN OUT nocopy BOOLEAN)
RETURN BOOLEAN
IS
l_process_status VARCHAR2(100);
debug('INSERT_IF_NEW = ' || bool_to_char(insert_if_new));
IF (insert_if_new) THEN
wf_engine.SetItemAttrText(itemtype, itemkey,
'FND_FLEX_INSERT', 'Y');
'FND_FLEX_INSERT', 'N');
wf_engine.SetItemAttrText(itemtype, itemkey, 'FND_FLEX_INSERT', NULL);