The following lines contain the word 'select', 'insert', 'update' or 'delete':
-- no. of recs that are inserted into CSC_CUST_PLANS
G_ERRBUF VARCHAR2(2000) := NULL;
G_DEL_IDX NUMBER := 0; -- index for delete tables
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.plan_id = p_plan_id
and a.customized_plan = 'N'
and ( ( a.use_for_cust_account = 'N'
and b.cust_account_id is null )
OR ( a.use_for_cust_account = 'Y'
and b.cust_account_id is not null ) )
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate );
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.profile_check_id = p_check_id
and a.customized_plan = 'N'
and ( ( a.use_for_cust_account = 'N'
and b.cust_account_id is null )
OR ( a.use_for_cust_account = 'Y'
and b.cust_account_id is not null ) )
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate );
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.customized_plan = 'N'
and b.party_id = p_party_id
and b.cust_account_id is NULL
and a.use_for_cust_account = 'N'
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate );
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.customized_plan = 'N'
and b.cust_account_id = p_cust_account_id
and a.use_for_cust_account = 'Y'
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate );
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.plan_id = p_plan_id
and a.customized_plan = 'N'
and b.party_id = p_party_id
and b.cust_account_id is NULL
and a.use_for_cust_account = 'N'
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate ) ;
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.plan_id = p_plan_id
and a.customized_plan = 'N'
and b.cust_account_id = p_cust_account_id
and a.use_for_cust_account = 'Y'
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate ) ;
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.profile_check_id = p_check_id
and a.customized_plan = 'N'
and b.party_id = p_party_id
and b.cust_account_id is null
and a.use_for_cust_account = 'N'
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate ) ;
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.profile_check_id = p_check_id
and a.customized_plan = 'N'
and b.cust_account_id = p_cust_account_id
and a.use_for_cust_account = 'Y'
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate ) ;
select a.plan_id, a.profile_check_id, a.relational_operator,
a.criteria_value_low, a.criteria_value_high, a.start_date_active,
a.end_date_active, a.use_for_cust_account,
b.party_id, b.cust_account_id, b.value
from csc_plan_headers_b a,
csc_prof_check_results b
where a.profile_check_id = b.check_id
and a.customized_plan = 'N'
and ( ( a.use_for_cust_account = 'N' and
b.cust_account_id is null )
OR ( a.use_for_cust_account = 'Y' and
b.cust_account_id is not null ) )
and sysdate between nvl(a.start_date_active, sysdate )
and nvl(a.end_date_active, sysdate ) ;
L_DEL_IDX NUMBER := 0; -- index for delete tables
DELETE_CUST_PLANS (
P_PLAN_ID_TBL => L_PLAN_ID_DEL_TBL,
P_PARTY_ID_TBL => L_PARTY_ID_DEL_TBL,
P_CUST_ID_TBL => L_CUST_ID_DEL_TBL,
X_RETURN_STATUS => x_return_status );
g_mesg := 'Delete of customer to plan association failed.';
L_PLAN_ID_DEL_TBL.DELETE;
L_PARTY_ID_DEL_TBL.DELETE;
L_CUST_ID_DEL_TBL.DELETE;
g_mesg := 'Insert of new customer to plan association failed.';
L_PLAN_ID_ADD_TBL.DELETE;
L_START_DATE_ACTIVE_ADD_TBL.DELETE;
L_END_DATE_ACTIVE_ADD_TBL.DELETE;
L_PARTY_ID_ADD_TBL.DELETE;
L_CUST_ID_ADD_TBL.DELETE;
DELETE_CUST_PLANS (
P_PLAN_ID_TBL => L_PLAN_ID_DEL_TBL,
P_PARTY_ID_TBL => L_PARTY_ID_DEL_TBL,
P_CUST_ID_TBL => L_CUST_ID_DEL_TBL,
X_RETURN_STATUS => x_return_status );
g_mesg := 'Delete of customer to plan association failed.';
g_mesg := 'Insert of new customer to plan association failed.';
select sysdate
into l_ins_start_date
from sys.dual;
INSERT INTO csc_cust_plans (
CUST_PLAN_ID, PLAN_ID, PARTY_ID,
CUST_ACCOUNT_ID, START_DATE_ACTIVE,
END_DATE_ACTIVE, MANUAL_FLAG, PLAN_STATUS_CODE,
REQUEST_ID, PROGRAM_APPLICATION_ID, PROGRAM_ID,
PROGRAM_UPDATE_DATE, LAST_UPDATE_DATE, CREATION_DATE,
LAST_UPDATED_BY, CREATED_BY, LAST_UPDATE_LOGIN,
ATTRIBUTE1, ATTRIBUTE2, ATTRIBUTE3,
ATTRIBUTE4, ATTRIBUTE5, ATTRIBUTE6,
ATTRIBUTE7, ATTRIBUTE8, ATTRIBUTE9,
ATTRIBUTE10, ATTRIBUTE11, ATTRIBUTE12,
ATTRIBUTE13, ATTRIBUTE14, ATTRIBUTE15,
ATTRIBUTE_CATEGORY, OBJECT_VERSION_NUMBER )
SELECT
CSC_CUST_PLANS_S.NEXTVAL, p_plan_id_tbl(i), p_party_id_tbl(i),
p_cust_id_tbl(i), p_start_date_active_tbl(i),
p_end_date_active_tbl(i), 'N', CSC_CORE_UTILS_PVT.APPLY_PLAN,
NULL, NULL, NULL,
NULL, sysdate, sysdate,
FND_GLOBAL.USER_ID, FND_GLOBAL.USER_ID, FND_GLOBAL.CONC_LOGIN_ID,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, 1
FROM SYS.DUAL
WHERE NOT EXISTS ( select 1
from csc_cust_plans
where plan_id = p_plan_id_tbl(i)
and party_id = p_party_id_tbl(i)
and nvl(cust_account_id, 0) = nvl(p_cust_id_tbl(i), 0)
);
select sysdate
into l_ins_end_date
from sys.dual;
INSERT INTO csc_cust_plans_audit (
PLAN_AUDIT_ID, PLAN_ID, PARTY_ID,
CUST_ACCOUNT_ID, PLAN_STATUS_CODE,
REQUEST_ID, PROGRAM_APPLICATION_ID, PROGRAM_ID,
PROGRAM_UPDATE_DATE, LAST_UPDATE_DATE, CREATION_DATE,
LAST_UPDATED_BY, CREATED_BY, LAST_UPDATE_LOGIN,
ATTRIBUTE1, ATTRIBUTE2, ATTRIBUTE3,
ATTRIBUTE4, ATTRIBUTE5, ATTRIBUTE6,
ATTRIBUTE7, ATTRIBUTE8, ATTRIBUTE9,
ATTRIBUTE10, ATTRIBUTE11, ATTRIBUTE12,
ATTRIBUTE13, ATTRIBUTE14, ATTRIBUTE15,
ATTRIBUTE_CATEGORY, OBJECT_VERSION_NUMBER )
SELECT
CSC_CUST_PLANS_AUDIT_S.NEXTVAL, p_plan_id_tbl(i), p_party_id_tbl(i),
p_cust_id_tbl(i), CSC_CORE_UTILS_PVT.APPLY_PLAN,
NULL, NULL, NULL,
NULL, SYSDATE, SYSDATE,
FND_GLOBAL.USER_ID, FND_GLOBAL.USER_ID, FND_GLOBAL.CONC_LOGIN_ID,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, 1
FROM SYS.DUAL
WHERE EXISTS ( select 1
from csc_cust_plans
where plan_id = p_plan_id_tbl(i)
and party_id = p_party_id_tbl(i)
and creation_date between l_ins_start_date and l_ins_end_date);
PROCEDURE DELETE_CUST_PLANS (
P_PLAN_ID_TBL IN CSC_PLAN_ID_TBL_TYPE,
P_PARTY_ID_TBL IN CSC_PARTY_ID_TBL_TYPE,
P_CUST_ID_TBL IN CSC_CUST_ID_TBL_TYPE,
X_RETURN_STATUS OUT NOCOPY VARCHAR2 )
IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CUST_PLANS';
SAVEPOINT DELETE_CUST_PLANS_PVT;
DELETE FROM csc_cust_plans
WHERE plan_id = p_plan_id_tbl(i)
AND party_id = p_party_id_tbl(i)
AND nvl(cust_account_id,0) = nvl(p_cust_id_tbl(i), nvl(cust_account_id,0) )
AND manual_flag = 'N'
RETURNING plan_id, party_id, cust_account_id
BULK COLLECT INTO l_plan_id_tbl, l_party_id_tbl, l_cust_id_tbl;
INSERT INTO csc_cust_plans_audit (
PLAN_AUDIT_ID, PLAN_ID, PARTY_ID,
CUST_ACCOUNT_ID, PLAN_STATUS_CODE,
REQUEST_ID, PROGRAM_APPLICATION_ID, PROGRAM_ID,
PROGRAM_UPDATE_DATE, LAST_UPDATE_DATE, CREATION_DATE,
LAST_UPDATED_BY, CREATED_BY, LAST_UPDATE_LOGIN,
ATTRIBUTE1, ATTRIBUTE2, ATTRIBUTE3,
ATTRIBUTE4, ATTRIBUTE5, ATTRIBUTE6,
ATTRIBUTE7, ATTRIBUTE8, ATTRIBUTE9,
ATTRIBUTE10, ATTRIBUTE11, ATTRIBUTE12,
ATTRIBUTE13, ATTRIBUTE14, ATTRIBUTE15,
ATTRIBUTE_CATEGORY, OBJECT_VERSION_NUMBER )
SELECT
CSC_CUST_PLANS_AUDIT_S.NEXTVAL, l_plan_id_tbl(i), l_party_id_tbl(i),
l_cust_id_tbl(i), CSC_CORE_UTILS_PVT.REMOVE_PLAN,
NULL, NULL, NULL,
NULL, SYSDATE, SYSDATE,
FND_GLOBAL.USER_ID, FND_GLOBAL.USER_ID, FND_GLOBAL.CONC_LOGIN_ID,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, NULL, NULL,
NULL, 1
FROM SYS.DUAL;
END DELETE_CUST_PLANS;