The following lines contain the word 'select', 'insert', 'update' or 'delete':
END GMF_GL_INSERT_JE_CATEGORY;
PROCEDURE GMF_GL_INSERT_JE_SOURCE(sourcename in varchar2,
descrip in varchar2,
createdby in number,
statuscode out number) AS
BEGIN
INSERT INTO GL_JE_SOURCES (
je_source_name,
user_je_source_name,
last_update_date,
last_updated_by,
override_edits_flag,
journal_reference_flag,
effective_date_rule_code,
journal_approval_flag,
description,
creation_date,
created_by)
SELECT sourcename,
sourcename,
sysdate,
nvl(user_id,0),
'N',
'N',
'R',
'N',
descrip,
sysdate,
nvl(user_id,0)
FROM FND_USER
WHERE user_id = nvl(createdby,0);
END GMF_GL_INSERT_JE_SOURCE;