The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_LAST_UPDATE_DATE DATE := sysdate;
G_LAST_UPDATED_BY NUMBER := fnd_global.user_id;
G_LAST_UPDATE_LOGIN NUMBER := fnd_global.login_id;
Procedure Insert_row ( p_calc_sub_quota_id NUMBER,
p_calc_sub_batch_id NUMBER,
p_quota_id NUMBER,
p_org_id NUMBER,
P_ATTRIBUTE_CATEGORY VARCHAR2,
P_ATTRIBUTE1 VARCHAR2,
P_ATTRIBUTE2 VARCHAR2,
P_ATTRIBUTE3 VARCHAR2,
P_ATTRIBUTE4 VARCHAR2,
P_ATTRIBUTE5 VARCHAR2,
P_ATTRIBUTE6 VARCHAR2,
P_ATTRIBUTE7 VARCHAR2,
P_ATTRIBUTE8 VARCHAR2,
P_ATTRIBUTE9 VARCHAR2,
P_ATTRIBUTE10 VARCHAR2,
P_ATTRIBUTE11 VARCHAR2,
P_ATTRIBUTE12 VARCHAR2,
P_ATTRIBUTE13 VARCHAR2,
P_ATTRIBUTE14 VARCHAR2,
P_ATTRIBUTE15 VARCHAR2,
P_CREATED_BY NUMBER ,
P_CREATION_DATE DATE ,
P_LAST_UPDATE_LOGIN NUMBER ,
P_LAST_UPDATE_DATE DATE ,
P_LAST_UPDATED_BY NUMBER
) IS
l_calc_sub_quota_id NUMBER(15);
SELECT cn_calc_sub_quotas_s.NEXTVAL
INTO l_calc_sub_quota_id
FROM dual;
INSERT INTO cn_calc_sub_quotas
( calc_sub_quota_id,
calc_sub_batch_id,
quota_id,
org_id
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,created_by
,creation_date
,last_update_login
,last_update_date
,last_updated_by
)
VALUES ( l_calc_sub_quota_id,
p_calc_sub_batch_id,
p_quota_id,
p_org_id
,p_attribute_category
,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
,Nvl( p_created_by,g_created_by)
,Nvl( p_creation_date,g_creation_date )
,Nvl( p_last_update_login, g_last_update_login )
,Nvl( p_last_update_date, g_last_update_date )
,Nvl( p_last_updated_by, g_last_updated_by )
) ;
END insert_row;
Procedure Update_row ( p_calc_sub_quota_id NUMBER,
p_calc_sub_batch_id NUMBER,
p_quota_id NUMBER,
P_ATTRIBUTE_CATEGORY VARCHAR2,
P_ATTRIBUTE1 VARCHAR2,
P_ATTRIBUTE2 VARCHAR2,
P_ATTRIBUTE3 VARCHAR2,
P_ATTRIBUTE4 VARCHAR2,
P_ATTRIBUTE5 VARCHAR2,
P_ATTRIBUTE6 VARCHAR2,
P_ATTRIBUTE7 VARCHAR2,
P_ATTRIBUTE8 VARCHAR2,
P_ATTRIBUTE9 VARCHAR2,
P_ATTRIBUTE10 VARCHAR2,
P_ATTRIBUTE11 VARCHAR2,
P_ATTRIBUTE12 VARCHAR2,
P_ATTRIBUTE13 VARCHAR2,
P_ATTRIBUTE14 VARCHAR2,
P_ATTRIBUTE15 VARCHAR2,
P_CREATED_BY NUMBER ,
P_CREATION_DATE DATE ,
P_LAST_UPDATE_LOGIN NUMBER ,
P_LAST_UPDATE_DATE DATE ,
P_LAST_UPDATED_BY NUMBER
) IS
BEGIN
UPDATE cn_calc_sub_quotas_all SET
calc_sub_quota_id = p_calc_sub_quota_id,
calc_sub_batch_id = p_calc_sub_batch_id,
quota_id = p_quota_id
,attribute_category = p_attribute_category
,attribute1 = p_attribute1
,attribute2 = p_attribute2
,attribute3 = p_attribute3
,attribute4 = p_attribute4
,attribute5 = p_attribute5
,attribute6 = p_attribute6
,attribute7 = p_attribute7
,attribute8 = p_attribute8
,attribute9 = p_attribute9
,attribute10 = p_attribute10
,attribute11 = p_attribute11
,attribute12 = p_attribute12
,attribute13 = p_attribute13
,attribute14 = p_attribute14
,attribute15 = p_attribute15
,created_by = Nvl( p_created_by,g_created_by)
,creation_date = Nvl( p_creation_date,g_creation_date )
,last_update_login = Nvl( p_last_update_login, g_last_update_login )
,last_update_date = Nvl( p_last_update_date, g_last_update_date )
,last_updated_by = Nvl( p_last_updated_by, g_last_updated_by )
WHERE calc_sub_quota_id = p_calc_sub_quota_id;
END update_row;
Procedure delete_row ( p_calc_sub_quota_id NUMBER ) IS
BEGIN
DELETE cn_calc_sub_quotas_all
WHERE calc_sub_quota_id = p_calc_sub_quota_id;
END delete_row;
P_LAST_UPDATE_LOGIN NUMBER ,
P_LAST_UPDATE_DATE DATE ,
P_LAST_UPDATED_BY NUMBER
) IS
CURSOR C IS
SELECT * FROM cn_calc_sub_quotas_all
WHERE calc_sub_quota_id = p_calc_sub_quota_id
FOR UPDATE OF calc_sub_quota_id NOWAIT;
fnd_message.set_name('FND','FORM_RECORD_DELETED');
P_LAST_UPDATE_LOGIN NUMBER := NULL,
P_LAST_UPDATE_DATE DATE := NULL,
P_LAST_UPDATED_BY NUMBER := NULL ) IS
BEGIN
IF p_operation = 'INSERT' THEN
insert_row ( p_calc_sub_quota_id,
p_calc_sub_batch_id,
p_quota_id,
p_org_id
,p_attribute_category
,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_created_by
,p_creation_date
,p_last_update_login
,p_last_update_date
,p_last_updated_by ) ;
ELSIF p_operation = 'UPDATE' THEN
update_row ( p_calc_sub_quota_id,
p_calc_sub_batch_id,
p_quota_id
,p_attribute_category
,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_created_by
,p_creation_date
,p_last_update_login
,p_last_update_date
,p_last_updated_by ) ;
ELSIF p_operation = 'DELETE' THEN
delete_row ( p_calc_sub_quota_id );
,p_last_update_login
,p_last_update_date
,p_last_updated_by );