The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE do_update_rule_crit_param(
p_rule_crit_param_rec IN OUT NOCOPY RULE_CRIT_PARAMS_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
);
FUN_RULE_CRIT_PARAMS_PKG.Insert_Row (
X_ROWID =>l_rowid,
X_CRITERIA_PARAM_ID =>p_rule_crit_param_rec.criteria_param_id,
X_RULE_OBJECT_ID =>p_rule_crit_param_rec.rule_object_id,
X_PARAM_NAME =>p_rule_crit_param_rec.param_name,
X_DATA_TYPE =>p_rule_crit_param_rec.data_type,
X_FLEX_VALUE_SET_ID =>p_rule_crit_param_rec.flex_value_set_id,
X_CREATED_BY_MODULE =>p_rule_crit_param_rec.created_by_module,
X_USER_PARAM_NAME =>p_rule_crit_param_rec.user_param_name,
X_DESCRIPTION =>p_rule_crit_param_rec.description,
X_TIP_TEXT =>p_rule_crit_param_rec.tiptext
);
SELECT
B.criteria_param_id,
B.rule_object_id,
B.param_name,
TL.user_param_name,
TL.description,
tip_text,
B.data_type,
B.flex_value_set_id,
B.created_by_module
FROM FUN_RULE_CRIT_PARAMS_B B, FUN_RULE_CRIT_PARAMS_TL TL
WHERE B.RULE_OBJECT_ID = p_from_rule_object_id
AND B.CRITERIA_PARAM_ID = TL.CRITERIA_PARAM_ID
AND TL.LANGUAGE='US';
SELECT RULE_OBJECT_ID INTO l_rule_object_id
FROM FUN_RULE_OBJECTS_B WHERE RULE_OBJECT_ID = p_to_rule_object_id;
| do_update_rule_crit_param
|
| DESCRIPTION
| Updates rules criteria Parameter
|
| SCOPE - PRIVATE
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| OUT:
| IN/ OUT:
| p_rule_crit_param_rec
| p_object_version_number
| x_return_status
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
|
+===========================================================================*/
PROCEDURE do_update_rule_crit_param(
p_rule_crit_param_rec IN OUT NOCOPY RULE_CRIT_PARAMS_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_object_version_number NUMBER;
SELECT OBJECT_VERSION_NUMBER,
ROWID
INTO l_object_version_number,
l_rowid
FROM FUN_RULE_CRIT_PARAMS_B
WHERE PARAM_NAME = p_rule_crit_param_rec.param_name
AND RULE_OBJECT_ID = p_rule_crit_param_rec.rule_object_id
FOR UPDATE OF PARAM_NAME NOWAIT;
SELECT 'Y' INTO l_dummy
FROM FUN_RULE_OBJECTS_B
WHERE RULE_OBJECT_ID = p_rule_crit_param_rec.rule_object_id
AND INSTANCE_LABEL IS NULL AND ORG_ID IS NULL;
FND_MESSAGE.SET_NAME('FUN', 'FUN_RULE_NO_UPDATE_PARAM');
FUN_RULE_CRIT_PARAMS_PKG.UPDATE_ROW (
X_CRITERIA_PARAM_ID =>p_rule_crit_param_rec.criteria_param_id,
X_RULE_OBJECT_ID =>p_rule_crit_param_rec.rule_object_id,
X_PARAM_NAME =>p_rule_crit_param_rec.param_name,
X_DATA_TYPE =>p_rule_crit_param_rec.data_type,
X_FLEX_VALUE_SET_ID =>p_rule_crit_param_rec.flex_value_set_id,
X_CREATED_BY_MODULE =>p_rule_crit_param_rec.created_by_module,
X_USER_PARAM_NAME =>p_rule_crit_param_rec.user_param_name,
X_DESCRIPTION =>p_rule_crit_param_rec.description,
X_TIP_TEXT =>p_rule_crit_param_rec.tiptext
);
* PROCEDURE update_rule_crit_param
*
* DESCRIPTION
* Updates Rules Criteria parameter.
*
* EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
*
* ARGUMENTS
* IN:
* p_init_msg_list Initialize message stack if it is set to
* FND_API.G_TRUE. Default is FND_API.G_FALSE.
* p_rule_crit_param_rec Rules Criteria parameter record.
* IN/OUT:
* p_object_version_number Used for locking the being updated record.
* OUT:
* x_return_status Return status after the call. The status can
* be FND_API.G_RET_STS_SUCCESS (success),
* FND_API.G_RET_STS_ERROR (error),
* FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
* x_msg_count Number of messages in message stack.
* x_msg_data Message text if x_msg_count is 1.
*
* NOTES
*
* MODIFICATION HISTORY
*
* 10-Sep-2004 Amulya Mishra Created.
*
*/
PROCEDURE update_rule_crit_param (
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_rule_crit_param_rec IN RULE_CRIT_PARAMS_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_rule_crit_param_rec RULE_CRIT_PARAMS_REC_TYPE := p_rule_crit_param_rec;
SAVEPOINT update_rule_crit_param;
do_update_rule_crit_param(
l_rule_crit_param_rec,
p_object_version_number,
x_return_status);
ROLLBACK TO update_rule_crit_param;
ROLLBACK TO update_rule_crit_param;
ROLLBACK TO update_rule_crit_param;
END update_rule_crit_param;
* FUN_RULE_CRIT_PARAMS_PKG.Select_Row
*
* ARGUMENTS
* IN:
* p_init_msg_list Initialize message stack if it is set to
* FND_API.G_TRUE. Default is FND_API.G_FALSE.
* p_param_name Rule criteria object name..
* IN/OUT:
* OUT:
* x_rule_crit_param_rec Returned rule criteria param record.
* x_return_status Return status after the call. The status can
* be FND_API.G_RET_STS_SUCCESS (success),
* FND_API.G_RET_STS_ERROR (error),
* FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
* x_msg_count Number of messages in message stack.
* x_msg_data Message text if x_msg_count is 1.
*
* NOTES
*
* MODIFICATION HISTORY
*
* 10-Sep-2004 Amulya Mishra Created.
*
*/
PROCEDURE get_rule_crit_param_rec (
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_rule_object_id IN NUMBER,
p_param_name IN VARCHAR2,
x_rule_crit_param_rec OUT NOCOPY RULE_CRIT_PARAMS_REC_TYPE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
cpid number;
SELECT cp.criteria_param_id
INTO cpid
FROM fun_rule_crit_params_b cp
where cp.rule_object_id = p_rule_object_id
and cp.param_name = p_param_name;
FUN_RULE_CRIT_PARAMS_PKG.Select_Row (
X_CRITERIA_PARAM_ID =>x_rule_crit_param_rec.criteria_param_id,
X_RULE_OBJECT_ID =>x_rule_crit_param_rec.rule_object_id,
X_PARAM_NAME =>x_rule_crit_param_rec.param_name,
X_USER_PARAM_NAME =>x_rule_crit_param_rec.user_param_name,
X_DESCRIPTION =>x_rule_crit_param_rec.description,
X_TIP_TEXT =>x_rule_crit_param_rec.tiptext,
X_DATA_TYPE =>x_rule_crit_param_rec.data_type,
X_FLEX_VALUE_SET_ID =>x_rule_crit_param_rec.flex_value_set_id,
X_CREATED_BY_MODULE =>x_rule_crit_param_rec.created_by_module
);
* PROCEDURE delete_rule_crit_param
*
* DESCRIPTION
* Deletes Rule Criteria Params.
*
* EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
*
*
* ARGUMENTS
* IN:
* p_init_msg_list Initialize message stack if it is set to
* FND_API.G_TRUE. Default is FND_API.G_FALSE.
* p_param_name Object Param Name.
* p_rule_object_id Rule Object Id
* IN/OUT:
* OUT:
* x_return_status Return status after the call. The status can
* be FND_API.G_RET_STS_SUCCESS (success),
* FND_API.G_RET_STS_ERROR (error),
* FND_API.G_RET_STS_UNEXP_ERROR (unexpected error).
* x_msg_count Number of messages in message stack.
* x_msg_data Message text if x_msg_count is 1.
*
* NOTES
*
* MODIFICATION HISTORY
*
* 10-Sep-2004 Amulya Mishra Created.
*
*/
PROCEDURE delete_rule_crit_param(
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_criteria_param_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
BEGIN
-- standard start of API savepoint
SAVEPOINT delete_rule_crit_param;
FUN_RULE_CRIT_PARAMS_PKG.Delete_Row (
X_CRITERIA_PARAM_ID =>p_criteria_param_id
);
ROLLBACK TO delete_rule_crit_param;
ROLLBACK TO delete_rule_crit_param;
ROLLBACK TO delete_rule_crit_param;
END delete_rule_crit_param;