The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* Insert_Row Procedure */
/*----------------------------------------------------------*/
/* --
-- Purpose
-- Insert a row into WSH_CC_USERS entity
--
-- Input Parameters
-- p_api_version
-- API version number (current version is 1.0)
-- p_init_msg_list (optional, default FND_API.G_FALSE)
-- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
-- if set to FND_API.G_TRUE
-- initialize error message list
-- if set to FND_API.G_FALSE - not initialize error
-- message list
-- p_commit (optional, default FND_API.G_FALSE)
-- whether or not to commit the changes to database
--
-- Input parameters for clear cross users informations
-- p_APPLICATION_ID --Application ID added.
-- p_MASTER_ORGANIZATION_ID - Master Org
-- p_ORGANIZATION_ID - Org
-- p_APPLICATION_USER_ID - Application User
-- p_CC_USER_ID - Clear Cross User
-- p_ENCRYPTED_USER_PASSWORD - Password
--
-- Output Parameters
-- x_return_status
-- if the process succeeds, the value is
-- fnd_api.g_ret_sts_success;
PROCEDURE Insert_Row
(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
p_commit IN VARCHAR2 := fnd_api.g_false ,
x_return_status OUT VARCHAR2 ,
x_msg_count OUT NUMBER ,
x_msg_data OUT VARCHAR2 ,
p_APPLICATION_ID IN NUMBER,
p_MASTER_ORGANIZATION_ID IN NUMBER,
p_ORGANIZATION_ID IN NUMBER default null,
p_APPLICATION_USER_ID IN NUMBER default null,
p_CC_USER_ID IN VARCHAR2,
p_ENCRYPTED_USER_PASSWORD IN VARCHAR2,
p_CC_USER_SEQUENCE_ID OUT NUMBER
)
IS
l_CC_USER_SEQUENCE_ID NUMBER ;
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
select wsh_cc_user_setups_s.nextval into l_CC_USER_SEQUENCE_ID from dual;
insert into wsh_cc_user_setups
( CC_USER_SEQUENCE_ID
,APPLICATION_ID
,MASTER_ORGANIZATION_ID
,ORGANIZATION_ID
,APPLICATION_USER_ID
,CC_USER_ID
,ENCRYPTED_USER_PASSWORD
,CREATION_DATE
,CREATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_LOGIN
)
values (
l_CC_USER_SEQUENCE_ID
,p_APPLICATION_ID
,p_MASTER_ORGANIZATION_ID
,p_ORGANIZATION_ID
,p_APPLICATION_USER_ID
,p_CC_USER_ID
,p_ENCRYPTED_USER_PASSWORD
,sysdate
,FND_GLOBAL.user_id
,sysdate
,FND_GLOBAL.user_id
,FND_GLOBAL.login_id
) ;
FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
End Insert_Row;
/* Update_Row Procedure */
/*----------------------------------------------------------*/
/* --
-- Purpose
-- Update a row into WSH_CC_USERS entity for the given cc seq id
--
-- Input Parameters
-- p_api_version
-- API version number (current version is 1.0)
-- p_init_msg_list (optional, default FND_API.G_FALSE)
-- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
-- if set to FND_API.G_TRUE
-- initialize error message list
-- if set to FND_API.G_FALSE - not initialize error
-- message list
-- p_commit (optional, default FND_API.G_FALSE)
-- whether or not to commit the changes to database
--
-- Input parameters for clear cross users informations
-- p_APPLICATION_ID --Application added
-- p_MASTER_ORGANIZATION_ID -- Master Org
-- p_ORGANIZATION_ID --Org
-- p_APPLICATION_USER_ID -- Application User
-- p_CC_USER_ID -- Clear Cross User
-- p_ENCRYPTED_USER_PASSWORD -- Password
-- p_CC_USER_SEQUENCE_ID -- CC Seq Id
--
--
-- Output Parameters
-- x_return_status
-- if the process succeeds, the value is
-- fnd_api.g_ret_sts_success;
PROCEDURE Update_Row
(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
p_commit IN VARCHAR2 := fnd_api.g_false ,
x_return_status OUT VARCHAR2 ,
x_msg_count OUT NUMBER ,
x_msg_data OUT VARCHAR2 ,
p_APPLICATION_ID IN NUMBER,
p_MASTER_ORGANIZATION_ID IN NUMBER,
p_ORGANIZATION_ID IN NUMBER default fnd_api.g_miss_num,
p_APPLICATION_USER_ID IN NUMBER default fnd_api.g_miss_num,
p_CC_USER_ID IN VARCHAR2,
p_ENCRYPTED_USER_PASSWORD IN VARCHAR2,
p_CC_USER_SEQUENCE_ID IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row' ;
update wsh_cc_user_setups
SET
APPLICATION_ID = p_APPLICATION_ID
,MASTER_ORGANIZATION_ID = p_MASTER_ORGANIZATION_ID
,ORGANIZATION_ID = decode(p_ORGANIZATION_ID,fnd_api.g_miss_num,
ORGANIZATION_ID,p_ORGANIZATION_ID)
,APPLICATION_USER_ID = decode(p_APPLICATION_USER_ID,fnd_api.g_miss_num,
APPLICATION_USER_ID,p_APPLICATION_USER_ID)
,CC_USER_ID = p_CC_USER_ID
,ENCRYPTED_USER_PASSWORD = p_ENCRYPTED_USER_PASSWORD
,LAST_UPDATE_DATE = sysdate
,LAST_UPDATED_BY = FND_GLOBAL.user_id
,LAST_UPDATE_LOGIN = FND_GLOBAL.login_id
where cc_user_sequence_id = p_cc_user_sequence_id ;
FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
End Update_Row;
/* Delete_Row Procedure */
/*----------------------------------------------------------*/
/* --
-- Purpose
-- Delete a row from WSH_CC_USERS entity for the given cc seq id
--
-- Input Parameters
-- p_api_version
-- API version number (current version is 1.0)
-- p_init_msg_list (optional, default FND_API.G_FALSE)
-- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
-- if set to FND_API.G_TRUE
-- initialize error message list
-- if set to FND_API.G_FALSE - not initialize error
-- message list
-- p_commit (optional, default FND_API.G_FALSE)
-- whether or not to commit the changes to database
--
-- Input parameters for clear cross users informations
-- p_CC_USER_SEQUENCE_ID -- CC Seq Id
--
--
-- Output Parameters
-- x_return_status
-- if the process succeeds, the value is
-- fnd_api.g_ret_sts_success;
PROCEDURE Delete_Row
(
p_api_version IN NUMBER ,
p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
p_commit IN VARCHAR2 := fnd_api.g_false ,
x_return_status OUT VARCHAR2 ,
x_msg_count OUT NUMBER ,
x_msg_data OUT VARCHAR2 ,
p_CC_USER_SEQUENCE_ID IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row' ;
DELETE from wsh_cc_user_setups
WHERE cc_user_sequence_id = p_cc_user_sequence_id ;
FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
End Delete_Row;
SELECT *
FROM wsh_cc_user_setups
WHERE rowid = p_rowid
FOR UPDATE OF CC_USER_SEQUENCE_ID NOWAIT;
FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');