The following lines contain the word 'select', 'insert', 'update' or 'delete':
select value
INTO l_utl_file_dir
FROM v$parameter
WHERE name = 'utl_file_dir';
cursor c is select
STEP_ID,
ROUTE_ID,
STEP_SEQ_NUM,
ADHOC_STEP_FLAG,
WF_ITEM_TYPE,
WF_ITEM_KEY,
WF_PROCESS_NAME,
CONDITION_TYPE_CODE,
TIMEOUT_OPTION,
STEP_STATUS_CODE,
STEP_START_DATE,
STEP_END_DATE,
REQUIRED_RELATIVE_DAYS,
REQUIRED_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
REQUEST_ID,
ORIGINAL_SYSTEM_REFERENCE,
PROGRAM_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE,
ASSIGNMENT_CODE,
INSTRUCTION
from ENG_CHANGE_ROUTE_STEPS_VL
where ROUTE_ID = P_FROM_ROUTE_ID ;
SELECT ENG_CHANGE_ROUTE_STEPS_S.NEXTVAL into l_step_id
FROM DUAL;
INSERT_ROW (
X_ROWID => l_rowid,
X_STEP_ID => l_step_id ,
X_ROUTE_ID => P_TO_ROUTE_ID ,
X_STEP_SEQ_NUM => recinfo.STEP_SEQ_NUM,
X_ADHOC_STEP_FLAG => recinfo.ADHOC_STEP_FLAG,
X_WF_ITEM_TYPE => recinfo.WF_ITEM_TYPE,
X_WF_ITEM_KEY => recinfo.WF_ITEM_KEY,
X_WF_PROCESS_NAME => recinfo.WF_PROCESS_NAME,
X_CONDITION_TYPE_CODE => recinfo.CONDITION_TYPE_CODE,
X_TIMEOUT_OPTION => recinfo.TIMEOUT_OPTION,
X_STEP_STATUS_CODE => 'NOT_STARTED' ,
X_STEP_START_DATE => NULL ,
X_STEP_END_DATE => NULL ,
X_REQUIRED_RELATIVE_DAYS => recinfo.REQUIRED_RELATIVE_DAYS,
X_REQUIRED_DATE => NULL,
X_ATTRIBUTE_CATEGORY => recinfo.ATTRIBUTE_CATEGORY,
X_ATTRIBUTE1 => recinfo.ATTRIBUTE1,
X_ATTRIBUTE2 => recinfo.ATTRIBUTE2,
X_ATTRIBUTE3 => recinfo.ATTRIBUTE3,
X_ATTRIBUTE4 => recinfo.ATTRIBUTE4,
X_ATTRIBUTE5 => recinfo.ATTRIBUTE5,
X_ATTRIBUTE6 => recinfo.ATTRIBUTE6,
X_ATTRIBUTE7 => recinfo.ATTRIBUTE7,
X_ATTRIBUTE8 => recinfo.ATTRIBUTE8,
X_ATTRIBUTE9 => recinfo.ATTRIBUTE9,
X_ATTRIBUTE10 => recinfo.ATTRIBUTE10,
X_ATTRIBUTE11 => recinfo.ATTRIBUTE11,
X_ATTRIBUTE12 => recinfo.ATTRIBUTE12,
X_ATTRIBUTE13 => recinfo.ATTRIBUTE13,
X_ATTRIBUTE14 => recinfo.ATTRIBUTE14,
X_ATTRIBUTE15 => recinfo.ATTRIBUTE15,
X_REQUEST_ID => recinfo.REQUEST_ID,
X_ORIGINAL_SYSTEM_REFERENCE => recinfo.ORIGINAL_SYSTEM_REFERENCE,
X_INSTRUCTION => recinfo.INSTRUCTION,
X_CREATION_DATE => SYSDATE,
X_CREATED_BY => l_fnd_user_id,
X_LAST_UPDATE_DATE => SYSDATE,
X_LAST_UPDATED_BY => l_fnd_user_id,
X_LAST_UPDATE_LOGIN => l_fnd_login_id,
X_PROGRAM_ID => recinfo.PROGRAM_ID,
X_PROGRAM_APPLICATION_ID => recinfo.PROGRAM_APPLICATION_ID,
X_PROGRAM_UPDATE_DATE => recinfo.PROGRAM_UPDATE_DATE,
X_ASSIGNMENT_CODE => recinfo.ASSIGNMENT_CODE
) ;
* PROCEDURE INSERT_ROW;
* PROCEDURE UPDATE_ROW;
* PROCEDURE DELETE_ROW;
PROCEDURE INSERT_ROW (
X_ROWID IN OUT NOCOPY VARCHAR2,
X_STEP_ID IN NUMBER,
X_ROUTE_ID IN NUMBER,
X_STEP_SEQ_NUM IN NUMBER,
X_ADHOC_STEP_FLAG IN VARCHAR2,
X_WF_ITEM_TYPE IN VARCHAR2,
X_WF_ITEM_KEY IN VARCHAR2,
X_WF_PROCESS_NAME IN VARCHAR2,
X_CONDITION_TYPE_CODE IN VARCHAR2,
X_TIMEOUT_OPTION IN VARCHAR2,
X_STEP_STATUS_CODE IN VARCHAR2,
X_STEP_START_DATE IN DATE,
X_STEP_END_DATE IN DATE,
X_REQUIRED_RELATIVE_DAYS IN NUMBER,
X_REQUIRED_DATE IN DATE,
X_ATTRIBUTE_CATEGORY IN VARCHAR2,
X_ATTRIBUTE1 IN VARCHAR2,
X_ATTRIBUTE2 IN VARCHAR2,
X_ATTRIBUTE3 IN VARCHAR2,
X_ATTRIBUTE4 IN VARCHAR2,
X_ATTRIBUTE5 IN VARCHAR2,
X_ATTRIBUTE6 IN VARCHAR2,
X_ATTRIBUTE7 IN VARCHAR2,
X_ATTRIBUTE8 IN VARCHAR2,
X_ATTRIBUTE9 IN VARCHAR2,
X_ATTRIBUTE10 IN VARCHAR2,
X_ATTRIBUTE11 IN VARCHAR2,
X_ATTRIBUTE12 IN VARCHAR2,
X_ATTRIBUTE13 IN VARCHAR2,
X_ATTRIBUTE14 IN VARCHAR2,
X_ATTRIBUTE15 IN VARCHAR2,
X_REQUEST_ID IN NUMBER,
X_ORIGINAL_SYSTEM_REFERENCE IN VARCHAR2,
X_INSTRUCTION IN VARCHAR2,
X_CREATION_DATE IN DATE,
X_CREATED_BY IN NUMBER,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_PROGRAM_ID IN NUMBER,
X_PROGRAM_APPLICATION_ID IN NUMBER,
X_PROGRAM_UPDATE_DATE IN DATE,
X_ASSIGNMENT_CODE IN VARCHAR2
)
IS
CURSOR C IS select ROWID from ENG_CHANGE_ROUTE_STEPS
where STEP_ID = X_STEP_ID
;
insert into ENG_CHANGE_ROUTE_STEPS (
STEP_ID,
ROUTE_ID,
STEP_SEQ_NUM,
ADHOC_STEP_FLAG,
WF_ITEM_TYPE,
WF_ITEM_KEY,
WF_PROCESS_NAME,
CONDITION_TYPE_CODE,
TIMEOUT_OPTION,
STEP_STATUS_CODE,
STEP_START_DATE,
STEP_END_DATE,
REQUIRED_RELATIVE_DAYS,
REQUIRED_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
REQUEST_ID,
ORIGINAL_SYSTEM_REFERENCE,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
PROGRAM_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE,
ASSIGNMENT_CODE
) values (
X_STEP_ID,
X_ROUTE_ID,
X_STEP_SEQ_NUM,
X_ADHOC_STEP_FLAG,
X_WF_ITEM_TYPE,
X_WF_ITEM_KEY,
X_WF_PROCESS_NAME,
X_CONDITION_TYPE_CODE,
X_TIMEOUT_OPTION,
X_STEP_STATUS_CODE,
X_STEP_START_DATE,
X_STEP_END_DATE,
X_REQUIRED_RELATIVE_DAYS,
X_REQUIRED_DATE,
X_ATTRIBUTE_CATEGORY,
X_ATTRIBUTE1,
X_ATTRIBUTE2,
X_ATTRIBUTE3,
X_ATTRIBUTE4,
X_ATTRIBUTE5,
X_ATTRIBUTE6,
X_ATTRIBUTE7,
X_ATTRIBUTE8,
X_ATTRIBUTE9,
X_ATTRIBUTE10,
X_ATTRIBUTE11,
X_ATTRIBUTE12,
X_ATTRIBUTE13,
X_ATTRIBUTE14,
X_ATTRIBUTE15,
X_REQUEST_ID,
X_ORIGINAL_SYSTEM_REFERENCE,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN,
X_PROGRAM_ID,
X_PROGRAM_APPLICATION_ID,
X_PROGRAM_UPDATE_DATE,
X_ASSIGNMENT_CODE
);
insert into ENG_CHANGE_ROUTE_STEPS_TL (
STEP_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
INSTRUCTION,
LANGUAGE,
SOURCE_LANG
) select
X_STEP_ID,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN,
X_INSTRUCTION,
L.LANGUAGE_CODE,
userenv('LANG')
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from ENG_CHANGE_ROUTE_STEPS_TL T
where T.STEP_ID = X_STEP_ID
and T.LANGUAGE = L.LANGUAGE_CODE);
END INSERT_ROW ;
X_PROGRAM_UPDATE_DATE IN DATE,
X_ASSIGNMENT_CODE IN VARCHAR2
)
IS
cursor c is select
ROUTE_ID,
STEP_SEQ_NUM,
ADHOC_STEP_FLAG,
WF_ITEM_TYPE,
WF_ITEM_KEY,
WF_PROCESS_NAME,
CONDITION_TYPE_CODE,
TIMEOUT_OPTION,
STEP_STATUS_CODE,
STEP_START_DATE,
STEP_END_DATE,
REQUIRED_RELATIVE_DAYS,
REQUIRED_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
REQUEST_ID,
ORIGINAL_SYSTEM_REFERENCE,
PROGRAM_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE,
ASSIGNMENT_CODE
from ENG_CHANGE_ROUTE_STEPS
where STEP_ID = X_STEP_ID
for update of STEP_ID nowait;
cursor c1 is select
INSTRUCTION,
decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
from ENG_CHANGE_ROUTE_STEPS_TL
where STEP_ID = X_STEP_ID
and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
for update of STEP_ID nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
PROCEDURE UPDATE_ROW (
X_STEP_ID IN NUMBER,
X_ROUTE_ID IN NUMBER,
X_STEP_SEQ_NUM IN NUMBER,
X_ADHOC_STEP_FLAG IN VARCHAR2,
X_WF_ITEM_TYPE IN VARCHAR2,
X_WF_ITEM_KEY IN VARCHAR2,
X_WF_PROCESS_NAME IN VARCHAR2,
X_CONDITION_TYPE_CODE IN VARCHAR2,
X_TIMEOUT_OPTION IN VARCHAR2,
X_STEP_STATUS_CODE IN VARCHAR2,
X_STEP_START_DATE IN DATE,
X_STEP_END_DATE IN DATE,
X_REQUIRED_RELATIVE_DAYS IN NUMBER,
X_REQUIRED_DATE IN DATE,
X_ATTRIBUTE_CATEGORY IN VARCHAR2,
X_ATTRIBUTE1 IN VARCHAR2,
X_ATTRIBUTE2 IN VARCHAR2,
X_ATTRIBUTE3 IN VARCHAR2,
X_ATTRIBUTE4 IN VARCHAR2,
X_ATTRIBUTE5 IN VARCHAR2,
X_ATTRIBUTE6 IN VARCHAR2,
X_ATTRIBUTE7 IN VARCHAR2,
X_ATTRIBUTE8 IN VARCHAR2,
X_ATTRIBUTE9 IN VARCHAR2,
X_ATTRIBUTE10 IN VARCHAR2,
X_ATTRIBUTE11 IN VARCHAR2,
X_ATTRIBUTE12 IN VARCHAR2,
X_ATTRIBUTE13 IN VARCHAR2,
X_ATTRIBUTE14 IN VARCHAR2,
X_ATTRIBUTE15 IN VARCHAR2,
X_REQUEST_ID IN NUMBER,
X_ORIGINAL_SYSTEM_REFERENCE IN VARCHAR2,
X_INSTRUCTION IN VARCHAR2,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_PROGRAM_ID IN NUMBER,
X_PROGRAM_APPLICATION_ID IN NUMBER,
X_PROGRAM_UPDATE_DATE IN DATE,
X_ASSIGNMENT_CODE IN VARCHAR2
)
IS
BEGIN
update ENG_CHANGE_ROUTE_STEPS set
ROUTE_ID = X_ROUTE_ID,
STEP_SEQ_NUM = X_STEP_SEQ_NUM,
ADHOC_STEP_FLAG = X_ADHOC_STEP_FLAG,
WF_ITEM_TYPE = X_WF_ITEM_TYPE,
WF_ITEM_KEY = X_WF_ITEM_KEY,
WF_PROCESS_NAME = X_WF_PROCESS_NAME,
CONDITION_TYPE_CODE = X_CONDITION_TYPE_CODE,
TIMEOUT_OPTION = X_TIMEOUT_OPTION,
STEP_STATUS_CODE = X_STEP_STATUS_CODE,
STEP_START_DATE = X_STEP_START_DATE,
STEP_END_DATE = X_STEP_END_DATE,
REQUIRED_RELATIVE_DAYS = X_REQUIRED_RELATIVE_DAYS,
REQUIRED_DATE = X_REQUIRED_DATE,
ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
ATTRIBUTE1 = X_ATTRIBUTE1,
ATTRIBUTE2 = X_ATTRIBUTE2,
ATTRIBUTE3 = X_ATTRIBUTE3,
ATTRIBUTE4 = X_ATTRIBUTE4,
ATTRIBUTE5 = X_ATTRIBUTE5,
ATTRIBUTE6 = X_ATTRIBUTE6,
ATTRIBUTE7 = X_ATTRIBUTE7,
ATTRIBUTE8 = X_ATTRIBUTE8,
ATTRIBUTE9 = X_ATTRIBUTE9,
ATTRIBUTE10 = X_ATTRIBUTE10,
ATTRIBUTE11 = X_ATTRIBUTE11,
ATTRIBUTE12 = X_ATTRIBUTE12,
ATTRIBUTE13 = X_ATTRIBUTE13,
ATTRIBUTE14 = X_ATTRIBUTE14,
ATTRIBUTE15 = X_ATTRIBUTE15,
REQUEST_ID = X_REQUEST_ID,
ORIGINAL_SYSTEM_REFERENCE = X_ORIGINAL_SYSTEM_REFERENCE,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
PROGRAM_ID = X_PROGRAM_ID,
PROGRAM_APPLICATION_ID = X_PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE = X_PROGRAM_UPDATE_DATE,
ASSIGNMENT_CODE = X_ASSIGNMENT_CODE
where STEP_ID = X_STEP_ID;
update ENG_CHANGE_ROUTE_STEPS_TL set
INSTRUCTION = X_INSTRUCTION,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
SOURCE_LANG = userenv('LANG')
where STEP_ID = X_STEP_ID
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
END UPDATE_ROW ;
PROCEDURE DELETE_ROW (
X_STEP_ID IN NUMBER
)
IS
BEGIN
delete from ENG_CHANGE_ROUTE_STEPS_TL
where STEP_ID = X_STEP_ID;
delete from ENG_CHANGE_ROUTE_STEPS
where STEP_ID = X_STEP_ID;
END DELETE_ROW ;
delete from ENG_CHANGE_ROUTE_STEPS_TL T
where not exists
(select NULL
from ENG_CHANGE_ROUTE_STEPS B
where B.STEP_ID = T.STEP_ID
);
update ENG_CHANGE_ROUTE_STEPS_TL T set (
INSTRUCTION
) = (select
B.INSTRUCTION
from ENG_CHANGE_ROUTE_STEPS_TL B
where B.STEP_ID = T.STEP_ID
and B.LANGUAGE = T.SOURCE_LANG)
where (
T.STEP_ID,
T.LANGUAGE
) in (select
SUBT.STEP_ID,
SUBT.LANGUAGE
from ENG_CHANGE_ROUTE_STEPS_TL SUBB, ENG_CHANGE_ROUTE_STEPS_TL SUBT
where SUBB.STEP_ID = SUBT.STEP_ID
and SUBB.LANGUAGE = SUBT.SOURCE_LANG
and (SUBB.INSTRUCTION <> SUBT.INSTRUCTION
or (SUBB.INSTRUCTION is null and SUBT.INSTRUCTION is not null)
or (SUBB.INSTRUCTION is not null and SUBT.INSTRUCTION is null)
));
insert into ENG_CHANGE_ROUTE_STEPS_TL (
STEP_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
INSTRUCTION,
LANGUAGE,
SOURCE_LANG
) select
B.STEP_ID,
B.CREATION_DATE,
B.CREATED_BY,
B.LAST_UPDATE_DATE,
B.LAST_UPDATED_BY,
B.LAST_UPDATE_LOGIN,
B.INSTRUCTION,
L.LANGUAGE_CODE,
B.SOURCE_LANG
from ENG_CHANGE_ROUTE_STEPS_TL B, FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and B.LANGUAGE = userenv('LANG')
and not exists
(select NULL
from ENG_CHANGE_ROUTE_STEPS_TL T
where T.STEP_ID = B.STEP_ID
and T.LANGUAGE = L.LANGUAGE_CODE);