The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID in out NOCOPY ROWID, --File.Sql.39 bug 4440895
X_FIN_PLAN_TYPE_ID in NUMBER,
X_FIN_PLAN_TYPE_CODE in VARCHAR2,
X_PRE_DEFINED_FLAG in VARCHAR2,
X_GENERATED_FLAG in VARCHAR2,
X_EDIT_GENERATED_AMT_FLAG in VARCHAR2,
X_USED_IN_BILLING_FLAG in VARCHAR2,
X_ENABLE_WF_FLAG in VARCHAR2,
X_START_DATE_ACTIVE in DATE,
X_END_DATE_ACTIVE in DATE,
X_RECORD_VERSION_NUMBER in NUMBER,
X_NAME in VARCHAR2,
X_DESCRIPTION in VARCHAR2,
X_PLAN_CLASS_CODE in VARCHAR2 ,
X_APPROVED_COST_PLAN_TYPE_FLAG in VARCHAR2 ,
X_APPROVED_REV_PLAN_TYPE_FLAG in VARCHAR2 ,
X_PROJFUNC_COST_RATE_TYPE in VARCHAR2 ,
X_PROJFUNC_COST_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJFUNC_COST_RATE_DATE in DATE ,
X_PROJFUNC_REV_RATE_TYPE in VARCHAR2 ,
X_PROJFUNC_REV_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJFUNC_REV_RATE_DATE in DATE ,
X_PROJECT_COST_RATE_TYPE in VARCHAR2 ,
X_PROJECT_COST_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJECT_COST_RATE_DATE in DATE ,
X_PROJECT_REV_RATE_TYPE in VARCHAR2 ,
X_PROJECT_REV_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJECT_REV_RATE_DATE in DATE ,
X_ATTRIBUTE_CATEGORY in VARCHAR2 ,
X_ATTRIBUTE1 in VARCHAR2 ,
X_ATTRIBUTE2 in VARCHAR2 ,
X_ATTRIBUTE3 in VARCHAR2 ,
X_ATTRIBUTE4 in VARCHAR2 ,
X_ATTRIBUTE5 in VARCHAR2 ,
X_ATTRIBUTE6 in VARCHAR2 ,
X_ATTRIBUTE7 in VARCHAR2 ,
X_ATTRIBUTE8 in VARCHAR2 ,
X_ATTRIBUTE9 in VARCHAR2 ,
X_ATTRIBUTE10 in VARCHAR2 ,
X_ATTRIBUTE11 in VARCHAR2 ,
X_ATTRIBUTE12 in VARCHAR2 ,
X_ATTRIBUTE13 in VARCHAR2 ,
X_ATTRIBUTE14 in VARCHAR2 ,
X_ATTRIBUTE15 in VARCHAR2 ,
X_CREATION_DATE in DATE ,
X_CREATED_BY in NUMBER ,
X_LAST_UPDATE_DATE in DATE ,
X_LAST_UPDATED_BY in NUMBER ,
X_LAST_UPDATE_LOGIN in NUMBER ,
X_MIGRATED_FRM_BDGT_TYP_CODE in VARCHAR2 default null,
/* dbora --- FP M --13-NOV-03 :Introduced the following additional parameters to check for different set up options
*/
X_ENABLE_PARTIAL_IMPL_FLAG IN PA_FIN_PLAN_TYPES_B.ENABLE_PARTIAL_IMPL_FLAG%TYPE,
X_PRIMARY_COST_FORECAST_FLAG IN PA_FIN_PLAN_TYPES_B.PRIMARY_COST_FORECAST_FLAG%TYPE,
X_PRIMARY_REV_FORECAST_FLAG IN PA_FIN_PLAN_TYPES_B.PRIMARY_REV_FORECAST_FLAG%TYPE,
X_EDIT_AFTER_BASELINE_FLAG IN PA_FIN_PLAN_TYPES_B.EDIT_AFTER_BASELINE_FLAG%TYPE,
X_USE_FOR_WORKPLAN_FLAG IN PA_FIN_PLAN_TYPES_B.USE_FOR_WORKPLAN_FLAG%TYPE)
is
l_fin_plan_type_id pa_Fin_plan_types_b.fin_plan_type_id%type;
cursor C is select ROWID from PA_FIN_PLAN_TYPES_B
where FIN_PLAN_TYPE_ID = L_FIN_PLAN_TYPE_ID;
select nvl(X_FIN_PLAN_TYPE_ID,PA_FIN_PLAN_TYPES_S.nextval)
into L_FIN_PLAN_TYPE_ID
from dual;
insert into PA_FIN_PLAN_TYPES_B (
FIN_PLAN_TYPE_ID ,
FIN_PLAN_TYPE_CODE ,
PRE_DEFINED_FLAG ,
GENERATED_FLAG ,
EDIT_GENERATED_AMT_FLAG ,
USED_IN_BILLING_FLAG ,
ENABLE_WF_FLAG ,
START_DATE_ACTIVE ,
END_DATE_ACTIVE ,
RECORD_VERSION_NUMBER ,
PLAN_CLASS_CODE ,
APPROVED_COST_PLAN_TYPE_FLAG ,
APPROVED_REV_PLAN_TYPE_FLAG ,
PROJFUNC_COST_RATE_TYPE ,
PROJFUNC_COST_RATE_DATE_TYPE ,
PROJFUNC_COST_RATE_DATE ,
PROJFUNC_REV_RATE_TYPE ,
PROJFUNC_REV_RATE_DATE_TYPE ,
PROJFUNC_REV_RATE_DATE ,
PROJECT_COST_RATE_TYPE ,
PROJECT_COST_RATE_DATE_TYPE ,
PROJECT_COST_RATE_DATE ,
PROJECT_REV_RATE_TYPE ,
PROJECT_REV_RATE_DATE_TYPE ,
PROJECT_REV_RATE_DATE ,
ATTRIBUTE_CATEGORY ,
ATTRIBUTE1 ,
ATTRIBUTE2 ,
ATTRIBUTE3 ,
ATTRIBUTE4 ,
ATTRIBUTE5 ,
ATTRIBUTE6 ,
ATTRIBUTE7 ,
ATTRIBUTE8 ,
ATTRIBUTE9 ,
ATTRIBUTE10 ,
ATTRIBUTE11 ,
ATTRIBUTE12 ,
ATTRIBUTE13 ,
ATTRIBUTE14 ,
ATTRIBUTE15 ,
CREATION_DATE ,
CREATED_BY ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN ,
MIGRATED_FRM_BDGT_TYP_CODE,
/* dbora --- FP M - 13-NOV-03
*/
ENABLE_PARTIAL_IMPL_FLAG ,
PRIMARY_COST_FORECAST_FLAG,
PRIMARY_REV_FORECAST_FLAG,
EDIT_AFTER_BASELINE_FLAG,
USE_FOR_WORKPLAN_FLAG
) values (
L_FIN_PLAN_TYPE_ID ,
X_FIN_PLAN_TYPE_CODE ,
X_PRE_DEFINED_FLAG ,
X_GENERATED_FLAG ,
decode(X_GENERATED_FLAG,'N','N',X_EDIT_GENERATED_AMT_FLAG),
X_USED_IN_BILLING_FLAG ,
X_ENABLE_WF_FLAG ,
X_START_DATE_ACTIVE ,
X_END_DATE_ACTIVE ,
1 ,
X_PLAN_CLASS_CODE ,
X_APPROVED_COST_PLAN_TYPE_FLAG ,
X_APPROVED_REV_PLAN_TYPE_FLAG ,
X_PROJFUNC_COST_RATE_TYPE ,
X_PROJFUNC_COST_RATE_DATE_TYPE ,
X_PROJFUNC_COST_RATE_DATE ,
X_PROJFUNC_REV_RATE_TYPE ,
X_PROJFUNC_REV_RATE_DATE_TYPE ,
X_PROJFUNC_REV_RATE_DATE ,
X_PROJECT_COST_RATE_TYPE ,
X_PROJECT_COST_RATE_DATE_TYPE ,
X_PROJECT_COST_RATE_DATE ,
X_PROJECT_REV_RATE_TYPE ,
X_PROJECT_REV_RATE_DATE_TYPE ,
X_PROJECT_REV_RATE_DATE ,
X_ATTRIBUTE_CATEGORY ,
X_ATTRIBUTE1 ,
X_ATTRIBUTE2 ,
X_ATTRIBUTE3 ,
X_ATTRIBUTE4 ,
X_ATTRIBUTE5 ,
X_ATTRIBUTE6 ,
X_ATTRIBUTE7 ,
X_ATTRIBUTE8 ,
X_ATTRIBUTE9 ,
X_ATTRIBUTE10 ,
X_ATTRIBUTE11 ,
X_ATTRIBUTE12 ,
X_ATTRIBUTE13 ,
X_ATTRIBUTE14 ,
X_ATTRIBUTE15 ,
X_CREATION_DATE ,
X_CREATED_BY ,
X_LAST_UPDATE_DATE ,
X_LAST_UPDATED_BY ,
X_LAST_UPDATE_LOGIN ,
X_MIGRATED_FRM_BDGT_TYP_CODE,
/* dbora --- FP M - 13-NOV-03
*/
NVL (X_ENABLE_PARTIAL_IMPL_FLAG , 'N'),
NVL (X_PRIMARY_COST_FORECAST_FLAG,'N'),
NVL (X_PRIMARY_REV_FORECAST_FLAG, 'N'),
NVL (X_EDIT_AFTER_BASELINE_FLAG,'N'),
NVL (X_USE_FOR_WORKPLAN_FLAG, 'N')
);
insert into PA_FIN_PLAN_TYPES_TL (
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
FIN_PLAN_TYPE_ID,
NAME,
DESCRIPTION,
LANGUAGE,
SOURCE_LANG
) select
X_LAST_UPDATE_LOGIN,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
L_FIN_PLAN_TYPE_ID,
X_NAME,
X_DESCRIPTION,
L.LANGUAGE_CODE,
userenv('LANG')
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists
(select NULL
from PA_FIN_PLAN_TYPES_TL T
where T.FIN_PLAN_TYPE_ID = L_FIN_PLAN_TYPE_ID
and T.LANGUAGE = L.LANGUAGE_CODE);
end INSERT_ROW;
cursor c is select
FIN_PLAN_TYPE_CODE,
PRE_DEFINED_FLAG,
GENERATED_FLAG,
EDIT_GENERATED_AMT_FLAG,
USED_IN_BILLING_FLAG,
ENABLE_WF_FLAG,
START_DATE_ACTIVE,
END_DATE_ACTIVE,
RECORD_VERSION_NUMBER
from PA_FIN_PLAN_TYPES_B
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID
for update of FIN_PLAN_TYPE_ID nowait;
cursor c1 is select
NAME,
DESCRIPTION,
decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
from PA_FIN_PLAN_TYPES_TL
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID
and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
for update of FIN_PLAN_TYPE_ID nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
X_FIN_PLAN_TYPE_ID in NUMBER,
X_FIN_PLAN_TYPE_CODE in VARCHAR2 ,
X_PRE_DEFINED_FLAG in VARCHAR2 ,
X_GENERATED_FLAG in VARCHAR2 ,
X_EDIT_GENERATED_AMT_FLAG in VARCHAR2 ,
X_USED_IN_BILLING_FLAG in VARCHAR2 ,
X_ENABLE_WF_FLAG in VARCHAR2 ,
X_START_DATE_ACTIVE in DATE ,
X_END_DATE_ACTIVE in DATE ,
X_RECORD_VERSION_NUMBER in NUMBER ,
X_NAME in VARCHAR2 ,
X_DESCRIPTION in VARCHAR2 ,
X_PLAN_CLASS_CODE in VARCHAR2 ,
X_APPROVED_COST_PLAN_TYPE_FLAG in VARCHAR2 ,
X_APPROVED_REV_PLAN_TYPE_FLAG in VARCHAR2 ,
X_PROJFUNC_COST_RATE_TYPE in VARCHAR2 ,
X_PROJFUNC_COST_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJFUNC_COST_RATE_DATE in DATE ,
X_PROJFUNC_REV_RATE_TYPE in VARCHAR2 ,
X_PROJFUNC_REV_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJFUNC_REV_RATE_DATE in DATE ,
X_PROJECT_COST_RATE_TYPE in VARCHAR2 ,
X_PROJECT_COST_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJECT_COST_RATE_DATE in DATE ,
X_PROJECT_REV_RATE_TYPE in VARCHAR2 ,
X_PROJECT_REV_RATE_DATE_TYPE in VARCHAR2 ,
X_PROJECT_REV_RATE_DATE in DATE ,
X_ATTRIBUTE_CATEGORY in VARCHAR2 ,
X_ATTRIBUTE1 in VARCHAR2 ,
X_ATTRIBUTE2 in VARCHAR2 ,
X_ATTRIBUTE3 in VARCHAR2 ,
X_ATTRIBUTE4 in VARCHAR2 ,
X_ATTRIBUTE5 in VARCHAR2 ,
X_ATTRIBUTE6 in VARCHAR2 ,
X_ATTRIBUTE7 in VARCHAR2 ,
X_ATTRIBUTE8 in VARCHAR2 ,
X_ATTRIBUTE9 in VARCHAR2 ,
X_ATTRIBUTE10 in VARCHAR2 ,
X_ATTRIBUTE11 in VARCHAR2 ,
X_ATTRIBUTE12 in VARCHAR2 ,
X_ATTRIBUTE13 in VARCHAR2 ,
X_ATTRIBUTE14 in VARCHAR2 ,
X_ATTRIBUTE15 in VARCHAR2 ,
X_LAST_UPDATE_DATE in DATE ,
X_LAST_UPDATED_BY in NUMBER ,
X_LAST_UPDATE_LOGIN in NUMBER ,
X_MIGRATED_FRM_BDGT_TYP_CODE in VARCHAR2 default null,
/* dbora --- FP M --13-NOV-03 :Introduced the following additional parameters to check for different set up options
*/
X_ENABLE_PARTIAL_IMPL_FLAG IN PA_FIN_PLAN_TYPES_B.ENABLE_PARTIAL_IMPL_FLAG%TYPE,
X_PRIMARY_COST_FORECAST_FLAG IN PA_FIN_PLAN_TYPES_B.PRIMARY_COST_FORECAST_FLAG%TYPE,
X_PRIMARY_REV_FORECAST_FLAG IN PA_FIN_PLAN_TYPES_B.PRIMARY_REV_FORECAST_FLAG%TYPE,
X_EDIT_AFTER_BASELINE_FLAG IN PA_FIN_PLAN_TYPES_B.EDIT_AFTER_BASELINE_FLAG%TYPE,
X_USE_FOR_WORKPLAN_FLAG IN PA_FIN_PLAN_TYPES_B.USE_FOR_WORKPLAN_FLAG%TYPE)
is
begin
update PA_FIN_PLAN_TYPES_B set
FIN_PLAN_TYPE_CODE = X_FIN_PLAN_TYPE_CODE,
PRE_DEFINED_FLAG = X_PRE_DEFINED_FLAG,
GENERATED_FLAG = X_GENERATED_FLAG,
EDIT_GENERATED_AMT_FLAG =
decode(X_GENERATED_FLAG,'N','N',X_EDIT_GENERATED_AMT_FLAG),
USED_IN_BILLING_FLAG = X_USED_IN_BILLING_FLAG,
ENABLE_WF_FLAG = X_ENABLE_WF_FLAG,
START_DATE_ACTIVE = X_START_DATE_ACTIVE,
END_DATE_ACTIVE = X_END_DATE_ACTIVE,
RECORD_VERSION_NUMBER = RECORD_VERSION_NUMBER + 1,
PLAN_CLASS_CODE = X_PLAN_CLASS_CODE ,
APPROVED_COST_PLAN_TYPE_FLAG = X_APPROVED_COST_PLAN_TYPE_FLAG ,
APPROVED_REV_PLAN_TYPE_FLAG = X_APPROVED_REV_PLAN_TYPE_FLAG ,
PROJFUNC_COST_RATE_TYPE = X_PROJFUNC_COST_RATE_TYPE ,
PROJFUNC_COST_RATE_DATE_TYPE = X_PROJFUNC_COST_RATE_DATE_TYPE ,
PROJFUNC_COST_RATE_DATE = X_PROJFUNC_COST_RATE_DATE ,
PROJFUNC_REV_RATE_TYPE = X_PROJFUNC_REV_RATE_TYPE ,
PROJFUNC_REV_RATE_DATE_TYPE = X_PROJFUNC_REV_RATE_DATE_TYPE ,
PROJFUNC_REV_RATE_DATE = X_PROJFUNC_REV_RATE_DATE ,
PROJECT_COST_RATE_TYPE = X_PROJECT_COST_RATE_TYPE ,
PROJECT_COST_RATE_DATE_TYPE = X_PROJECT_COST_RATE_DATE_TYPE ,
PROJECT_COST_RATE_DATE = X_PROJECT_COST_RATE_DATE ,
PROJECT_REV_RATE_TYPE = X_PROJECT_REV_RATE_TYPE ,
PROJECT_REV_RATE_DATE_TYPE = X_PROJECT_REV_RATE_DATE_TYPE ,
PROJECT_REV_RATE_DATE = X_PROJECT_REV_RATE_DATE ,
ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY ,
ATTRIBUTE1 = X_ATTRIBUTE1 ,
ATTRIBUTE2 = X_ATTRIBUTE2 ,
ATTRIBUTE3 = X_ATTRIBUTE3 ,
ATTRIBUTE4 = X_ATTRIBUTE4 ,
ATTRIBUTE5 = X_ATTRIBUTE5 ,
ATTRIBUTE6 = X_ATTRIBUTE6 ,
ATTRIBUTE7 = X_ATTRIBUTE7 ,
ATTRIBUTE8 = X_ATTRIBUTE8 ,
ATTRIBUTE9 = X_ATTRIBUTE9 ,
ATTRIBUTE10 = X_ATTRIBUTE10 ,
ATTRIBUTE11 = X_ATTRIBUTE11 ,
ATTRIBUTE12 = X_ATTRIBUTE12 ,
ATTRIBUTE13 = X_ATTRIBUTE13 ,
ATTRIBUTE14 = X_ATTRIBUTE14 ,
ATTRIBUTE15 = X_ATTRIBUTE15 ,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE ,
LAST_UPDATED_BY = X_LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN ,
MIGRATED_FRM_BDGT_TYP_CODE = NVL(X_MIGRATED_FRM_BDGT_TYP_CODE,MIGRATED_FRM_BDGT_TYP_CODE),
/* dbora --- FP M - 13-NOV-03
*/
ENABLE_PARTIAL_IMPL_FLAG = NVL (X_ENABLE_PARTIAL_IMPL_FLAG , 'N'),
PRIMARY_COST_FORECAST_FLAG = NVL (X_PRIMARY_COST_FORECAST_FLAG,'N'),
PRIMARY_REV_FORECAST_FLAG = NVL (X_PRIMARY_REV_FORECAST_FLAG, 'N'),
EDIT_AFTER_BASELINE_FLAG = NVL (X_EDIT_AFTER_BASELINE_FLAG, 'N'),
USE_FOR_WORKPLAN_FLAG = NVL (X_USE_FOR_WORKPLAN_FLAG, 'N')
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID
and decode(pre_defined_flag,'Y',0,nvl(RECORD_VERSION_NUMBER,0) ) =
decode(pre_defined_flag,'Y',0,
nvl(X_RECORD_VERSION_NUMBER,nvl(RECORD_VERSION_NUMBER,0)));
update PA_FIN_PLAN_TYPES_TL set
NAME = X_NAME,
DESCRIPTION = X_DESCRIPTION,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
SOURCE_LANG = userenv('LANG')
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
end UPDATE_ROW;
procedure DELETE_ROW (
X_FIN_PLAN_TYPE_ID in NUMBER
) is
begin
delete from PA_FIN_PLAN_TYPES_TL
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID;
delete from PA_FIN_PLAN_TYPES_B
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID;
end DELETE_ROW;
delete from PA_FIN_PLAN_TYPES_TL T
where not exists
(select NULL
from PA_FIN_PLAN_TYPES_B B
where B.FIN_PLAN_TYPE_ID = T.FIN_PLAN_TYPE_ID
);
update PA_FIN_PLAN_TYPES_TL T set (
NAME,
DESCRIPTION
) = (select
B.NAME,
B.DESCRIPTION
from PA_FIN_PLAN_TYPES_TL B
where B.FIN_PLAN_TYPE_ID = T.FIN_PLAN_TYPE_ID
and B.LANGUAGE = T.SOURCE_LANG)
where (
T.FIN_PLAN_TYPE_ID,
T.LANGUAGE
) in (select
SUBT.FIN_PLAN_TYPE_ID,
SUBT.LANGUAGE
from PA_FIN_PLAN_TYPES_TL SUBB, PA_FIN_PLAN_TYPES_TL SUBT
where SUBB.FIN_PLAN_TYPE_ID = SUBT.FIN_PLAN_TYPE_ID
and SUBB.LANGUAGE = SUBT.SOURCE_LANG
and (SUBB.NAME <> SUBT.NAME
or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
));
insert into PA_FIN_PLAN_TYPES_TL (
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
FIN_PLAN_TYPE_ID,
NAME,
DESCRIPTION,
LANGUAGE,
SOURCE_LANG
) select
B.LAST_UPDATE_LOGIN,
B.CREATION_DATE,
B.CREATED_BY,
B.LAST_UPDATE_DATE,
B.LAST_UPDATED_BY,
B.FIN_PLAN_TYPE_ID,
B.NAME,
B.DESCRIPTION,
L.LANGUAGE_CODE,
B.SOURCE_LANG
from PA_FIN_PLAN_TYPES_TL B, FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and B.LANGUAGE = userenv('LANG')
and not exists
(select NULL
from PA_FIN_PLAN_TYPES_TL T
where T.FIN_PLAN_TYPE_ID = B.FIN_PLAN_TYPE_ID
and T.LANGUAGE = L.LANGUAGE_CODE);
update PA_FIN_PLAN_TYPES_TL set
NAME = X_NAME,
DESCRIPTION = X_DESCRIPTION,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = decode(X_OWNER, 'SEED', 1, 0),
LAST_UPDATE_LOGIN = 0,
source_lang = userenv('LANG')
where FIN_PLAN_TYPE_ID = X_FIN_PLAN_TYPE_ID
and USERENV('LANG') IN ( LANGUAGE , SOURCE_LANG );
SELECT fin_plan_type_id
INTO l_wp_plan_type_id
FROM pa_fin_plan_types_b
WHERE use_for_workplan_flag = 'Y';
PA_FIN_PLAN_TYPES_PKG.UPDATE_ROW (
X_FIN_PLAN_TYPE_ID => X_FIN_PLAN_TYPE_ID ,
X_FIN_PLAN_TYPE_CODE => X_FIN_PLAN_TYPE_CODE ,
X_PRE_DEFINED_FLAG => X_PRE_DEFINED_FLAG ,
X_GENERATED_FLAG => X_GENERATED_FLAG ,
X_EDIT_GENERATED_AMT_FLAG => X_EDIT_GENERATED_AMT_FLAG ,
X_USED_IN_BILLING_FLAG => X_USED_IN_BILLING_FLAG ,
X_ENABLE_WF_FLAG => X_ENABLE_WF_FLAG ,
X_START_DATE_ACTIVE => X_START_DATE_ACTIVE ,
X_END_DATE_ACTIVE => X_END_DATE_ACTIVE ,
X_RECORD_VERSION_NUMBER => X_RECORD_VERSION_NUMBER ,
X_NAME => X_NAME ,
X_DESCRIPTION => X_DESCRIPTION ,
X_PLAN_CLASS_CODE => X_PLAN_CLASS_CODE ,
X_APPROVED_COST_PLAN_TYPE_FLAG => X_APPROVED_COST_PLAN_TYPE_FLAG ,
X_APPROVED_REV_PLAN_TYPE_FLAG => X_APPROVED_REV_PLAN_TYPE_FLAG ,
X_PROJFUNC_COST_RATE_TYPE => X_PROJFUNC_COST_RATE_TYPE ,
X_PROJFUNC_COST_RATE_DATE_TYPE => X_PROJFUNC_COST_RATE_DATE_TYPE ,
X_PROJFUNC_COST_RATE_DATE => X_PROJFUNC_COST_RATE_DATE ,
X_PROJFUNC_REV_RATE_TYPE => X_PROJFUNC_REV_RATE_TYPE ,
X_PROJFUNC_REV_RATE_DATE_TYPE => X_PROJFUNC_REV_RATE_DATE_TYPE ,
X_PROJFUNC_REV_RATE_DATE => X_PROJFUNC_REV_RATE_DATE ,
X_PROJECT_COST_RATE_TYPE => X_PROJECT_COST_RATE_TYPE ,
X_PROJECT_COST_RATE_DATE_TYPE => X_PROJECT_COST_RATE_DATE_TYPE ,
X_PROJECT_COST_RATE_DATE => X_PROJECT_COST_RATE_DATE ,
X_PROJECT_REV_RATE_TYPE => X_PROJECT_REV_RATE_TYPE ,
X_PROJECT_REV_RATE_DATE_TYPE => X_PROJECT_REV_RATE_DATE_TYPE ,
X_PROJECT_REV_RATE_DATE => X_PROJECT_REV_RATE_DATE ,
X_ATTRIBUTE_CATEGORY => X_ATTRIBUTE_CATEGORY ,
X_ATTRIBUTE1 => X_ATTRIBUTE1 ,
X_ATTRIBUTE2 => X_ATTRIBUTE2 ,
X_ATTRIBUTE3 => X_ATTRIBUTE3 ,
X_ATTRIBUTE4 => X_ATTRIBUTE4 ,
X_ATTRIBUTE5 => X_ATTRIBUTE5 ,
X_ATTRIBUTE6 => X_ATTRIBUTE6 ,
X_ATTRIBUTE7 => X_ATTRIBUTE7 ,
X_ATTRIBUTE8 => X_ATTRIBUTE8 ,
X_ATTRIBUTE9 => X_ATTRIBUTE9 ,
X_ATTRIBUTE10 => X_ATTRIBUTE10 ,
X_ATTRIBUTE11 => X_ATTRIBUTE11 ,
X_ATTRIBUTE12 => X_ATTRIBUTE12 ,
X_ATTRIBUTE13 => X_ATTRIBUTE13 ,
X_ATTRIBUTE14 => X_ATTRIBUTE14 ,
X_ATTRIBUTE15 => X_ATTRIBUTE15 ,
X_LAST_UPDATE_DATE => sysdate ,
X_LAST_UPDATED_BY => user_id ,
X_LAST_UPDATE_LOGIN => 0 ,
X_MIGRATED_FRM_BDGT_TYP_CODE => X_MIGRATED_FRM_BDGT_TYP_CODE,
/* dbora --- FP M - 13-NOV-03
*/
X_ENABLE_PARTIAL_IMPL_FLAG => NVL (X_ENABLE_PARTIAL_IMPL_FLAG, 'N'),
X_PRIMARY_COST_FORECAST_FLAG => NVL (X_PRIMARY_COST_FORECAST_FLAG,'N'),
X_PRIMARY_REV_FORECAST_FLAG => NVL (X_PRIMARY_REV_FORECAST_FLAG, 'N'),
X_EDIT_AFTER_BASELINE_FLAG => NVL (X_EDIT_AFTER_BASELINE_FLAG, 'N'),
X_USE_FOR_WORKPLAN_FLAG => NVL (l_use_for_workplan_flag, 'N')); --Bug 5437529.
PA_FIN_PLAN_TYPES_PKG.INSERT_ROW (
X_ROWID => X_ROWID ,
X_FIN_PLAN_TYPE_ID => X_FIN_PLAN_TYPE_ID ,
X_FIN_PLAN_TYPE_CODE => X_FIN_PLAN_TYPE_CODE ,
X_PRE_DEFINED_FLAG => X_PRE_DEFINED_FLAG ,
X_GENERATED_FLAG => X_GENERATED_FLAG ,
X_EDIT_GENERATED_AMT_FLAG => X_EDIT_GENERATED_AMT_FLAG ,
X_USED_IN_BILLING_FLAG => X_USED_IN_BILLING_FLAG ,
X_ENABLE_WF_FLAG => X_ENABLE_WF_FLAG ,
X_START_DATE_ACTIVE => X_START_DATE_ACTIVE ,
X_END_DATE_ACTIVE => X_END_DATE_ACTIVE ,
X_RECORD_VERSION_NUMBER => X_RECORD_VERSION_NUMBER ,
X_NAME => X_NAME ,
X_DESCRIPTION => X_DESCRIPTION ,
X_PLAN_CLASS_CODE => X_PLAN_CLASS_CODE ,
X_APPROVED_COST_PLAN_TYPE_FLAG => X_APPROVED_COST_PLAN_TYPE_FLAG ,
X_APPROVED_REV_PLAN_TYPE_FLAG => X_APPROVED_REV_PLAN_TYPE_FLAG ,
X_PROJFUNC_COST_RATE_TYPE => X_PROJFUNC_COST_RATE_TYPE ,
X_PROJFUNC_COST_RATE_DATE_TYPE => X_PROJFUNC_COST_RATE_DATE_TYPE ,
X_PROJFUNC_COST_RATE_DATE => X_PROJFUNC_COST_RATE_DATE ,
X_PROJFUNC_REV_RATE_TYPE => X_PROJFUNC_REV_RATE_TYPE ,
X_PROJFUNC_REV_RATE_DATE_TYPE => X_PROJFUNC_REV_RATE_DATE_TYPE ,
X_PROJFUNC_REV_RATE_DATE => X_PROJFUNC_REV_RATE_DATE ,
X_PROJECT_COST_RATE_TYPE => X_PROJECT_COST_RATE_TYPE ,
X_PROJECT_COST_RATE_DATE_TYPE => X_PROJECT_COST_RATE_DATE_TYPE ,
X_PROJECT_COST_RATE_DATE => X_PROJECT_COST_RATE_DATE ,
X_PROJECT_REV_RATE_TYPE => X_PROJECT_REV_RATE_TYPE ,
X_PROJECT_REV_RATE_DATE_TYPE => X_PROJECT_REV_RATE_DATE_TYPE ,
X_PROJECT_REV_RATE_DATE => X_PROJECT_REV_RATE_DATE ,
X_ATTRIBUTE_CATEGORY => X_ATTRIBUTE_CATEGORY ,
X_ATTRIBUTE1 => X_ATTRIBUTE1 ,
X_ATTRIBUTE2 => X_ATTRIBUTE2 ,
X_ATTRIBUTE3 => X_ATTRIBUTE3 ,
X_ATTRIBUTE4 => X_ATTRIBUTE4 ,
X_ATTRIBUTE5 => X_ATTRIBUTE5 ,
X_ATTRIBUTE6 => X_ATTRIBUTE6 ,
X_ATTRIBUTE7 => X_ATTRIBUTE7 ,
X_ATTRIBUTE8 => X_ATTRIBUTE8 ,
X_ATTRIBUTE9 => X_ATTRIBUTE9 ,
X_ATTRIBUTE10 => X_ATTRIBUTE10 ,
X_ATTRIBUTE11 => X_ATTRIBUTE11 ,
X_ATTRIBUTE12 => X_ATTRIBUTE12 ,
X_ATTRIBUTE13 => X_ATTRIBUTE13 ,
X_ATTRIBUTE14 => X_ATTRIBUTE14 ,
X_ATTRIBUTE15 => X_ATTRIBUTE15 ,
X_CREATION_DATE => sysdate ,
X_CREATED_BY => user_id ,
X_LAST_UPDATE_DATE => sysdate ,
X_LAST_UPDATED_BY => user_id ,
X_LAST_UPDATE_LOGIN => 0 ,
X_MIGRATED_FRM_BDGT_TYP_CODE => X_MIGRATED_FRM_BDGT_TYP_CODE,
/* dbora --- FP M - 13-NOV-03
*/
X_ENABLE_PARTIAL_IMPL_FLAG => NVL (X_ENABLE_PARTIAL_IMPL_FLAG, 'N'),
X_PRIMARY_COST_FORECAST_FLAG => NVL (X_PRIMARY_COST_FORECAST_FLAG,'N'),
X_PRIMARY_REV_FORECAST_FLAG => NVL (X_PRIMARY_REV_FORECAST_FLAG, 'N'),
X_EDIT_AFTER_BASELINE_FLAG => NVL (X_EDIT_AFTER_BASELINE_FLAG, 'N'),
X_USE_FOR_WORKPLAN_FLAG => NVL (l_use_for_workplan_flag, 'N')); --Bug 5437529.