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
ROUTE_ASSOCIATION_ID,
ROUTE_PEOPLE_ID,
ADHOC_ASSOC_FLAG,
ASSOC_OBJECT_NAME,
ASSOC_OBJ_PK1_VALUE,
ASSOC_OBJ_PK2_VALUE,
ASSOC_OBJ_PK3_VALUE,
ASSOC_OBJ_PK4_VALUE,
ASSOC_OBJ_PK5_VALUE,
OBJECT_NAME,
OBJECT_ID1,
OBJECT_ID2,
OBJECT_ID3,
OBJECT_ID4,
OBJECT_ID5,
REQUEST_ID,
ORIGINAL_SYSTEM_REFERENCE,
PROGRAM_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE
from ENG_CHANGE_ROUTE_ASSOCS
where ROUTE_PEOPLE_ID = P_FROM_PEOPLE_ID ;
SELECT ENG_CHANGE_ROUTE_ASSOCS_S.NEXTVAL into l_assoc_id
FROM DUAL;
INSERT_ROW (
X_ROWID => l_rowid,
X_ROUTE_ASSOCIATION_ID => l_assoc_id,
X_ROUTE_PEOPLE_ID => P_TO_PEOPLE_ID,
X_ASSOC_OBJECT_NAME => recinfo.ASSOC_OBJECT_NAME,
X_ASSOC_OBJ_PK1_VALUE => recinfo.ASSOC_OBJ_PK1_VALUE,
X_ASSOC_OBJ_PK2_VALUE => recinfo.ASSOC_OBJ_PK2_VALUE,
X_ASSOC_OBJ_PK3_VALUE => recinfo.ASSOC_OBJ_PK3_VALUE,
X_ASSOC_OBJ_PK4_VALUE => recinfo.ASSOC_OBJ_PK4_VALUE,
X_ASSOC_OBJ_PK5_VALUE => recinfo.ASSOC_OBJ_PK5_VALUE,
X_OBJECT_NAME => recinfo.OBJECT_NAME,
X_OBJECT_ID1 => recinfo.OBJECT_ID1,
X_OBJECT_ID2 => recinfo.OBJECT_ID2,
X_OBJECT_ID3 => recinfo.OBJECT_ID3,
X_OBJECT_ID4 => recinfo.OBJECT_ID4,
X_OBJECT_ID5 => recinfo.OBJECT_ID5,
X_REQUEST_ID => recinfo.REQUEST_ID,
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_ORIGINAL_SYSTEM_REFERENCE => recinfo.ORIGINAL_SYSTEM_REFERENCE,
X_ADHOC_ASSOC_FLAG => recinfo.ADHOC_ASSOC_FLAG
) ;
* PROCEDURE INSERT_ROW;
* -- Not Supproting PROCEDURE UPDATE_ROW;
* -- Not Supproting PROCEDURE DELETE_ROW;
PROCEDURE INSERT_ROW (
X_ROWID IN OUT NOCOPY VARCHAR2,
X_ROUTE_ASSOCIATION_ID IN NUMBER,
X_ROUTE_PEOPLE_ID IN NUMBER,
X_ASSOC_OBJECT_NAME IN VARCHAR2,
X_ASSOC_OBJ_PK1_VALUE IN VARCHAR2,
X_ASSOC_OBJ_PK2_VALUE IN VARCHAR2,
X_ASSOC_OBJ_PK3_VALUE IN VARCHAR2,
X_ASSOC_OBJ_PK4_VALUE IN VARCHAR2,
X_ASSOC_OBJ_PK5_VALUE IN VARCHAR2,
X_OBJECT_NAME IN VARCHAR2,
X_OBJECT_ID1 IN NUMBER,
X_OBJECT_ID2 IN NUMBER,
X_OBJECT_ID3 IN NUMBER,
X_OBJECT_ID4 IN NUMBER,
X_OBJECT_ID5 IN NUMBER,
X_REQUEST_ID IN NUMBER,
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_ORIGINAL_SYSTEM_REFERENCE IN VARCHAR2,
X_ADHOC_ASSOC_FLAG IN VARCHAR2
)
IS
cursor C is select ROWID from ENG_CHANGE_ROUTE_ASSOCS
where ROUTE_ASSOCIATION_ID = X_ROUTE_ASSOCIATION_ID
;
insert into ENG_CHANGE_ROUTE_ASSOCS (
ROUTE_ASSOCIATION_ID,
ROUTE_PEOPLE_ID,
ASSOC_OBJECT_NAME,
ASSOC_OBJ_PK1_VALUE,
ASSOC_OBJ_PK2_VALUE,
ASSOC_OBJ_PK3_VALUE,
ASSOC_OBJ_PK4_VALUE,
ASSOC_OBJ_PK5_VALUE,
OBJECT_NAME,
OBJECT_ID1,
OBJECT_ID2,
OBJECT_ID3,
OBJECT_ID4,
OBJECT_ID5,
REQUEST_ID,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
PROGRAM_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE,
ORIGINAL_SYSTEM_REFERENCE,
ADHOC_ASSOC_FLAG
) values (
X_ROUTE_ASSOCIATION_ID,
X_ROUTE_PEOPLE_ID,
X_ASSOC_OBJECT_NAME,
X_ASSOC_OBJ_PK1_VALUE,
X_ASSOC_OBJ_PK2_VALUE,
X_ASSOC_OBJ_PK3_VALUE,
X_ASSOC_OBJ_PK4_VALUE,
X_ASSOC_OBJ_PK5_VALUE,
X_OBJECT_NAME,
X_OBJECT_ID1,
X_OBJECT_ID2,
X_OBJECT_ID3,
X_OBJECT_ID4,
X_OBJECT_ID5,
X_REQUEST_ID,
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_ORIGINAL_SYSTEM_REFERENCE,
X_ADHOC_ASSOC_FLAG
);
END INSERT_ROW;