The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT as_sales_methodology_s.nextval
INTO v_sales_methodology_id
FROM dual;
as_sales_methodology_pkg.insert_row (
v_rowid,
v_sales_methodology_id,
p_sales_methodology_name,
p_start_date_active,
p_end_date_active,
p_autocreatetask_flag,
p_description,
p_attribute1,
p_attribute2,
p_attribute3,
p_attribute4,
p_attribute5,
p_attribute6,
p_attribute7,
p_attribute8,
p_attribute9,
p_attribute10,
p_attribute11,
p_attribute12,
p_attribute13,
p_attribute14,
p_attribute15,
p_attribute_category,
SYSDATE,
fnd_global.user_id,
SYSDATE,
fnd_global.user_id,
fnd_global.login_id
);
Procedure UPDATE_SALES_METHODOLOGY
(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2 default fnd_api.g_false,
P_COMMIT IN VARCHAR2 default fnd_api.g_false,
P_VALIDATE_LEVEL IN VARCHAR2 default fnd_api.g_valid_level_full,
P_SALES_METHODOLOGY_ID IN NUMBER,
P_SALES_METHODOLOGY_NAME IN VARCHAR2,
P_START_DATE_ACTIVE IN DATE,
P_END_DATE_ACTIVE IN DATE DEFAULT NULL,
P_AUTOCREATETASK_FLAG IN VARCHAR2 DEFAULT NULL,
P_DESCRIPTION IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE1 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE2 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE3 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE4 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE5 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE6 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE7 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE8 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE9 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE10 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE11 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE12 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE13 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE14 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE15 IN VARCHAR2 DEFAULT NULL,
P_ATTRIBUTE_CATEGORY IN VARCHAR2 DEFAULT NULL,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2,
X_OBJECT_VERSION_NUMBER IN OUT NOCOPY NUMBER
)
IS
l_api_name VARCHAR2(30) := 'UPDATE_SALES_METHODOLOGY';
SAVEPOINT update_sales_methodology_pvt;
as_sales_methodology_pkg.update_row (
p_sales_methodology_id,
x_object_version_number,
p_sales_methodology_name,
p_start_date_active,
p_end_date_active,
p_autocreatetask_flag,
p_description,
p_attribute1,
p_attribute2,
p_attribute3,
p_attribute4,
p_attribute5,
p_attribute6,
p_attribute7,
p_attribute8,
p_attribute9,
p_attribute10,
p_attribute11,
p_attribute12,
p_attribute13,
p_attribute14,
p_attribute15,
p_attribute_category,
SYSDATE,
fnd_global.user_id,
fnd_global.login_id
);
ROLLBACK TO update_sales_methodology_pvt;
ROLLBACK TO update_sales_methodology_pvt;
ROLLBACK TO update_sales_methodology_pvt;
END update_sales_methodology;
Procedure DELETE_SALES_METHODOLOGY
(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2 default fnd_api.g_false,
P_COMMIT IN VARCHAR2 default fnd_api.g_false,
P_VALIDATE_LEVEL IN VARCHAR2 default fnd_api.g_valid_level_full,
P_SALES_METHODOLOGY_ID IN NUMBER,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2,
X_OBJECT_VERSION_NUMBER IN NUMBER
)
IS
l_api_name VARCHAR2(30) := 'DELETE_SALES_METHODOLOGY';
SAVEPOINT delete_sales_methodology_pvt;
DELETE FROM AS_SALES_METH_STAGE_MAP
WHERE SALES_METHODOLOGY_ID = P_SALES_METHODOLOGY_ID;
as_sales_methodology_pkg.delete_row (p_sales_methodology_id);
ROLLBACK TO delete_sales_methodology_pvt;
ROLLBACK TO delete_sales_methodology_pvt;
ROLLBACK TO delete_sales_methodology_pvt;
END delete_sales_methodology;
CURSOR C IS SELECT ROWID FROM AS_SALES_METH_STAGE_MAP
WHERE SALES_METHODOLOGY_ID = P_SALES_METHODOLOGY_ID
AND SALES_STAGE_ID = P_SALES_STAGE_ID;
UPDATE as_sales_meth_stage_map SET
task_template_group_id = p_task_template_group_id,
max_win_probability = p_max_win_probability,
min_win_probability = p_min_win_probability,
template_id = p_sales_supplement_template,
stage_sequence = p_stage_sequence,
last_update_date = SYSDATE,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE
sales_methodology_id = p_sales_methodology_id
AND
sales_stage_id = p_sales_stage_id;
-- if the row was not found for update, insert it.
IF (SQL%NOTFOUND) THEN
INSERT INTO as_sales_meth_stage_map (
sales_methodology_id,
sales_stage_id,
task_template_group_id,
max_win_probability,
min_win_probability,
template_id,
stage_sequence,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login
)
VALUES (
p_sales_methodology_id,
p_sales_stage_id,
p_task_template_group_id,
p_max_win_probability,
p_min_win_probability,
p_sales_supplement_template,
p_stage_sequence,
fnd_global.user_id,
SYSDATE,
fnd_global.user_id,
SYSDATE,
fnd_global.login_id
);
Procedure DELETE_SALES_METH_STAGE_MAP
(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2 default fnd_api.g_false,
P_COMMIT IN VARCHAR2 default fnd_api.g_false,
P_VALIDATE_LEVEL IN VARCHAR2 default fnd_api.g_valid_level_full,
P_SALES_METHODOLOGY_ID IN NUMBER,
P_SALES_STAGE_ID IN NUMBER,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2
)
IS
l_api_name VARCHAR2(30) := 'DELETE_SALES_METH_STAGE_MAP';
SAVEPOINT delete_sm_stage_map_pvt;
DELETE FROM as_sales_meth_stage_map
WHERE
sales_methodology_id = p_sales_methodology_id
AND
sales_stage_id = p_sales_stage_id;
-- if the row was not found for delete, raise an exception.
IF (SQL%NOTFOUND) THEN
RAISE no_data_found;
ROLLBACK TO delete_sm_stage_map_pvt;
ROLLBACK TO delete_sm_stage_map_pvt;
ROLLBACK TO delete_sm_stage_map_pvt;
END delete_sales_meth_stage_map;