The following lines contain the word 'select', 'insert', 'update' or 'delete':
X_LAST_UPDATED_BY out nocopy NUMBER,
X_LAST_UPDATE_LOGIN out nocopy NUMBER
) is
begin
X_CREATED_BY := AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER);
X_LAST_UPDATED_BY := AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER);
X_LAST_UPDATE_LOGIN := 0;
X_CURRENT_LAST_UPDATE_DATE out nocopy VARCHAR2,
X_USAGE_ROWID out nocopy VARCHAR2,
X_CURRENT_USAGE_OWNER out nocopy NUMBER,
X_CURRENT_USAGE_LUD out nocopy VARCHAR2,
X_CURRENT_ITEM_ID_QUERY out nocopy VARCHAR2,
X_CURRENT_APP_OVN out nocopy VARCHAR2,
X_CURRENT_USAGE_OVN out nocopy VARCHAR2
) is
cursor CSR_GET_FND_APPLICATION_ID is
select APPLICATION_ID
from FND_APPLICATION_VL
where APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME;
is select ROWID, nvl(OBJECT_VERSION_NUMBER,1),APPLICATION_ID,
LAST_UPDATED_BY,
to_char(LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS')
from AME_CALLING_APPS
where FND_APPLICATION_ID = X_FND_APPLICATION_ID
and nvl(TRANSACTION_TYPE_ID,'NULL')
= nvl(X_TRANSACTION_TYPE_ID,'NULL')
and sysdate between START_DATE
and nvl(END_DATE - (1/86400), sysdate);
select ROWID,
nvl(OBJECT_VERSION_NUMBER,1),
LAST_UPDATED_BY,
to_char(LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
ITEM_ID_QUERY
from AME_ITEM_CLASS_USAGES
where APPLICATION_ID = X_APPLICATION_ID
and ITEM_CLASS_ID = 2
and sysdate between START_DATE
and nvl(END_DATE - (1/86400), sysdate);
X_CURRENT_LAST_UPDATE_DATE;
function DO_UPDATE_INSERT(X_OWNER in NUMBER,
X_CURRENT_OWNER in NUMBER,
X_LAST_UPDATE_DATE in VARCHAR2,
X_CURRENT_LAST_UPDATE_DATE in VARCHAR2,
X_CUSTOM_MODE in VARCHAR2 default null)
return boolean as
begin
return AME_SEED_UTILITY.MERGE_ROW_TEST
(X_OWNER => X_OWNER
,X_CURRENT_OWNER => X_CURRENT_OWNER
,X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE
,X_CURRENT_LAST_UPDATE_DATE => X_CURRENT_LAST_UPDATE_DATE
,X_CUSTOM_MODE => X_CUSTOM_MODE
);
end DO_UPDATE_INSERT;
function DO_TL_UPDATE_INSERT(X_OWNER in NUMBER,
X_CURRENT_OWNER in NUMBER,
X_LAST_UPDATE_DATE in VARCHAR2,
X_CURRENT_LAST_UPDATE_DATE in VARCHAR2,
X_CREATED_BY in varchar2,
X_CUSTOM_MODE in VARCHAR2 default null)
return boolean as
begin
if X_CUSTOM_MODE = 'FORCE' then
return true;
,X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE
,X_CURRENT_LAST_UPDATE_DATE => X_CURRENT_LAST_UPDATE_DATE
,X_CUSTOM_MODE => X_CUSTOM_MODE
);
end DO_TL_UPDATE_INSERT;
procedure INSERT_ROW (
X_FND_APPLICATION_ID in NUMBER,
X_APPLICATION_NAME in VARCHAR2,
X_TRANSACTION_TYPE_ID in VARCHAR2,
X_APPLICATION_ID in NUMBER,
X_CREATED_BY in NUMBER,
X_CREATION_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATE_LOGIN in NUMBER,
X_START_DATE in DATE,
X_LINE_ITEM_ID_QUERY in VARCHAR2,
X_OBJECT_VERSION_NUMBER in NUMBER
)
is
begin
insert into AME_CALLING_APPS
(
FND_APPLICATION_ID,
APPLICATION_NAME,
TRANSACTION_TYPE_ID,
APPLICATION_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
START_DATE,
END_DATE,
LINE_ITEM_ID_QUERY,
OBJECT_VERSION_NUMBER
) select
X_FND_APPLICATION_ID,
X_APPLICATION_NAME,
X_TRANSACTION_TYPE_ID,
X_APPLICATION_ID,
X_CREATED_BY,
X_CREATION_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATE_LOGIN,
X_START_DATE,
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
X_LINE_ITEM_ID_QUERY,
X_OBJECT_VERSION_NUMBER
from sys.dual;
end INSERT_ROW;
procedure FORCE_UPDATE_ROW (
X_ROWID in VARCHAR2,
X_APPLICATION_NAME in VARCHAR2,
X_APPLICATION_ID in NUMBER,
X_LINE_ITEM_ID_QUERY in VARCHAR2,
X_CREATED_BY in NUMBER,
X_CREATION_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATE_LOGIN in NUMBER,
X_START_DATE in DATE,
X_END_DATE in DATE,
X_OBJECT_VERSION_NUMBER in NUMBER
) is
begin
update AME_CALLING_APPS
set APPLICATION_NAME = X_APPLICATION_NAME,
APPLICATION_ID = X_APPLICATION_ID,
LINE_ITEM_ID_QUERY = X_LINE_ITEM_ID_QUERY,
CREATED_BY = X_CREATED_BY,
CREATION_DATE = X_CREATION_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
START_DATE = X_START_DATE,
END_DATE = X_END_DATE,
OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER
where ROWID = X_ROWID;
end FORCE_UPDATE_ROW;
procedure INSERT_USAGE_ROW (
X_APPLICATION_ID in NUMBER,
X_ITEM_CLASS_ID in NUMBER,
X_ITEM_ID_QUERY in VARCHAR2,
X_ITEM_CLASS_ORDER_NUMBER in NUMBER,
X_ITEM_CLASS_PAR_MODE in VARCHAR2,
X_ITEM_CLASS_SUBLIST_MODE in VARCHAR2,
X_CREATED_BY in NUMBER,
X_CREATION_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATE_LOGIN in NUMBER,
X_START_DATE in DATE,
X_OBJECT_VERSION_NUMBER in NUMBER
)
is
begin
--do not populate usage row if AME11510 full patch has not been applied
if X_AME_INSTALLATION_LEVEL IS NULL then
return;
insert into AME_ITEM_CLASS_USAGES
(
APPLICATION_ID,
ITEM_CLASS_ID,
ITEM_ID_QUERY,
ITEM_CLASS_ORDER_NUMBER,
ITEM_CLASS_PAR_MODE,
ITEM_CLASS_SUBLIST_MODE,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
START_DATE,
END_DATE,
OBJECT_VERSION_NUMBER
) values (
X_APPLICATION_ID,
X_ITEM_CLASS_ID,
X_ITEM_ID_QUERY,
X_ITEM_CLASS_ORDER_NUMBER,
X_ITEM_CLASS_PAR_MODE,
X_ITEM_CLASS_SUBLIST_MODE,
X_CREATED_BY,
X_CREATION_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATE_LOGIN,
X_START_DATE,
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
X_OBJECT_VERSION_NUMBER);
end INSERT_USAGE_ROW;
procedure FORCE_UPDATE_USAGE_ROW (
X_ROWID in VARCHAR2,
X_ITEM_ID_QUERY in VARCHAR2,
X_ITEM_CLASS_ORDER_NUMBER in NUMBER,
X_ITEM_CLASS_PAR_MODE in VARCHAR2,
X_ITEM_CLASS_SUBLIST_MODE in VARCHAR2,
X_CREATED_BY in NUMBER,
X_CREATION_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATE_LOGIN in NUMBER,
X_START_DATE in DATE,
X_END_DATE in DATE,
X_OBJECT_VERSION_NUMBER in NUMBER
) is
begin
update AME_ITEM_CLASS_USAGES
set ITEM_ID_QUERY = X_ITEM_ID_QUERY,
ITEM_CLASS_ORDER_NUMBER = X_ITEM_CLASS_ORDER_NUMBER,
ITEM_CLASS_PAR_MODE = X_ITEM_CLASS_PAR_MODE,
ITEM_CLASS_SUBLIST_MODE = X_ITEM_CLASS_SUBLIST_MODE,
CREATED_BY = X_CREATED_BY,
CREATION_DATE = X_CREATION_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
START_DATE = X_START_DATE,
END_DATE = X_END_DATE,
OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER
where ROWID = X_ROWID;
end FORCE_UPDATE_USAGE_ROW;
procedure INSERT_TL_ROW (
X_APPLICATION_ID in NUMBER,
X_APPLICATION_NAME in VARCHAR2,
X_CREATED_BY in NUMBER,
X_CREATION_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATE_LOGIN in NUMBER) is
begin
if not AME_SEED_UTILITY.MLS_ENABLED then
return;
insert into AME_CALLING_APPS_TL
(APPLICATION_ID
,APPLICATION_NAME
,CREATED_BY
,CREATION_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATE_LOGIN
,LANGUAGE
,SOURCE_LANG
) select X_APPLICATION_ID,
X_APPLICATION_NAME,
X_CREATED_BY,
X_CREATION_DATE,
X_LAST_UPDATED_BY,
X_LAST_UPDATE_DATE,
X_LAST_UPDATE_LOGIN,
L.LANGUAGE_CODE,
userenv('LANG')
from FND_LANGUAGES L
where L.INSTALLED_FLAG in ('I', 'B')
and not exists (select null
from AME_CALLING_APPS_TL T
where T.APPLICATION_ID = X_APPLICATION_ID
and T.LANGUAGE = L.LANGUAGE_CODE);
END insert_tl_row;
procedure UPDATE_TL_ROW (
X_APPLICATION_ID in NUMBER,
X_APPLICATION_NAME in VARCHAR2,
X_CREATED_BY in NUMBER,
X_CREATION_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATE_LOGIN in NUMBER,
X_CUSTOM_MODE in VARCHAR2) is
X_CURRENT_OWNER NUMBER;
X_CURRENT_LAST_UPDATE_DATE DATE;
select LAST_UPDATED_BY,
LAST_UPDATE_DATE
into X_CURRENT_OWNER,
X_CURRENT_LAST_UPDATE_DATE
FROM AME_CALLING_APPS_TL
WHERE APPLICATION_ID = X_APPLICATION_ID
AND LANGUAGE = USERENV('LANG');
if DO_UPDATE_INSERT
(X_LAST_UPDATED_BY
,X_CURRENT_OWNER
,AME_SEED_UTILITY.DATE_AS_STRING(X_LAST_UPDATE_DATE)
,AME_SEED_UTILITY.DATE_AS_STRING(X_CURRENT_LAST_UPDATE_DATE)
,X_CUSTOM_MODE) then
update AME_CALLING_APPS_TL
set APPLICATION_NAME = nvl(X_APPLICATION_NAME,APPLICATION_NAME),
SOURCE_LANG = userenv('LANG'),
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = 0
where APPLICATION_ID = X_APPLICATION_ID
and userenv('LANG') in (LANGUAGE,SOURCE_LANG);
end UPDATE_TL_ROW;
procedure UPDATE_ROW (
X_CALLING_APPS_ROWID in VARCHAR2,
X_END_DATE in DATE)
is
begin
update AME_CALLING_APPS set
END_DATE = X_END_DATE
where ROWID = X_CALLING_APPS_ROWID;
end UPDATE_ROW;
procedure UPDATE_USAGE_ROW (
X_USAGE_ROWID in VARCHAR2,
X_END_DATE in DATE) is
begin
--do not populate usage row if AME11510 full patch has not been applied
if X_AME_INSTALLATION_LEVEL IS NULL then
return;
update AME_ITEM_CLASS_USAGES
set END_DATE = X_END_DATE
where ROWID = X_USAGE_ROWID;
end UPDATE_USAGE_ROW;
procedure DELETE_ROW (
X_FND_APPLICATION_ID in NUMBER,
X_TRANSACTION_TYPE_ID in VARCHAR2,
X_APPLICATION_ID in NUMBER
) is
begin
if AME_SEED_UTILITY.MLS_ENABLED then
delete from AME_CALLING_APPS_TL
where APPLICATION_ID in (select APPLICATION_ID
from AME_CALLING_APPS
where FND_APPLICATION_ID = X_FND_APPLICATION_ID
and nvl(TRANSACTION_TYPE_ID,'NULL') = nvl(X_TRANSACTION_TYPE_ID,'NULL'));
delete from AME_CALLING_APPS
where FND_APPLICATION_ID = X_FND_APPLICATION_ID
and nvl(TRANSACTION_TYPE_ID,'NULL') = nvl(X_TRANSACTION_TYPE_ID,'NULL');
end DELETE_ROW;
X_LAST_UPDATE_DATE in VARCHAR2,
X_CREATED_BY in NUMBER
)
is
cursor getApprovalGroup is
select aag.approval_group_id, aag.name, aag.start_date, aag.end_date
from ame_approval_groups aag
where aag.start_date =
(select max(start_date)
from ame_approval_groups aag2
where aag.approval_group_id = aag2.approval_group_id)
order by aag.approval_group_id;
select aat.action_type_id,
aat.name,
aat.created_by,
aat.last_updated_by,
aat.start_date,
aat.end_date
from ame_action_types aat
where aat.start_date =
(select max(start_date)
from ame_action_types aat2
where aat.action_type_id = aat2.action_type_id)
and ((end_date is null)
or (aat.start_date <> aat.end_date))
order by aat.action_type_id;
select attribute_id
from ame_attributes
where name = ame_util.rejectionResponseAttribute
and (sysdate between start_date
and nvl(end_date - (1/86400),sysdate));
select attribute_id
from ame_attributes
where name = ame_util.useWorkflowAttribute
and (sysdate between start_date
and nvl(end_date - (1/86400),sysdate));
select attribute_id
from ame_attributes
where name = 'REPEAT_SUBSTITUTIONS'
and (sysdate between start_date
and nvl(end_date - (1/86400),sysdate));
insert into ame_approval_group_config
(application_id,
approval_group_id,
voting_regime,
order_number,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
start_date,
end_date,
object_version_number)
select X_APPLICATION_ID,
groupsRec.approval_group_id,
ame_util.orderNumberVoting,
groupOrderNumber,
x_created_by,
sysdate,
x_created_by,
sysdate,
null,
groupsRec.start_date,
groupsRec.end_date,
1
from sys.dual
where not exists
(select null
from ame_approval_group_config
where application_id = X_APPLICATION_ID
and approval_group_id = groupsRec.approval_group_id
and ((sysdate between start_date
and nvl(end_date - (1/86400),sysdate))
or (groupsRec.start_date between start_date
and nvl(end_date,start_date))));
select count(*)
into authorityRuleTypeCount
from ame_action_type_usages
where action_type_id = actionRec.action_type_id
and rule_type = ame_util.authorityRuleType;
insert into ame_action_type_config
(application_id,
action_type_id,
voting_regime,
order_number,
chain_ordering_mode,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login,
start_date,
end_date,
object_version_number)
select
X_APPLICATION_ID,
actionRec.action_type_id,
votingRegimeValue,
decode(actionRec.name,
ame_util.preApprovalTypeName, 1,
ame_util.dynamicPreApprover, 2,
ame_util.absoluteJobLevelTypeName, 1,
ame_util.relativeJobLevelTypeName, 2,
ame_util.supervisoryLevelTypeName, 3,
ame_util.positionTypeName, 4,
ame_util.positionLevelTypeName, 5,
ame_util.managerFinalApproverTypeName, 6,
ame_util.finalApproverOnlyTypeName, 7,
ame_util.lineItemJobLevelTypeName, 8,
ame_util.dualChainsAuthorityTypeName, 9,
ame_util.groupChainApprovalTypeName, 10,
ame_util.nonFinalAuthority, 1,
ame_util.finalAuthorityTypeName, 2,
ame_util.substitutionTypeName, 1,
ame_util.postApprovalTypeName, 1,
ame_util.dynamicPostApprover, 2,
customOrderNumber),
ame_util.serialChainsMode,
actionRec.created_by,
sysdate,
actionRec.last_updated_by,
sysdate,
null,
actionRec.start_date,
actionRec.end_date,
1
from sys.dual
where not exists
(select null
from ame_action_type_config
where application_id = X_APPLICATION_ID
and action_type_id = actionRec.action_type_id
and ((sysdate between start_date
and nvl(end_date - (1/86400),sysdate))
or (actionRec.start_date between start_date
and nvl(end_date,start_date))));
insert into AME_ATTRIBUTE_USAGES
(ATTRIBUTE_ID,
APPLICATION_ID,
QUERY_STRING,
USE_COUNT,
IS_STATIC,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
START_DATE,
END_DATE,
USER_EDITABLE,
VALUE_SET_ID,
OBJECT_VERSION_NUMBER
)
select
X_REJECTION_RESPONSE_ID,
X_APPLICATION_ID,
ame_util.stopAllItems,
0,
ame_util.booleanTrue,
x_created_by,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
x_created_by,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
0,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
ame_util.booleanTrue,
null,
1
from sys.dual
where not exists
(select null
from ame_attribute_usages
where application_id = X_APPLICATION_ID
and attribute_id = X_REJECTION_RESPONSE_ID
and (sysdate between start_date
and nvl(end_date - (1/86400),sysdate)));
insert into AME_ATTRIBUTE_USAGES
(ATTRIBUTE_ID,
APPLICATION_ID,
QUERY_STRING,
USE_COUNT,
IS_STATIC,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
START_DATE,
END_DATE,
USER_EDITABLE,
VALUE_SET_ID,
OBJECT_VERSION_NUMBER
)
select
X_USE_WORKFLOW_ID,
X_APPLICATION_ID,
ame_util.booleanAttributeTrue,
0,
ame_util.booleanTrue,
x_created_by,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
x_created_by,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
0,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
ame_util.booleanTrue,
null,
1
from sys.dual
where not exists
(select null
from ame_attribute_usages
where application_id = X_APPLICATION_ID
and attribute_id = X_USE_WORKFLOW_ID
and (sysdate between start_date
and nvl(end_date - (1/86400),sysdate)));
insert into AME_ATTRIBUTE_USAGES
(ATTRIBUTE_ID,
APPLICATION_ID,
QUERY_STRING,
USE_COUNT,
IS_STATIC,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
START_DATE,
END_DATE,
USER_EDITABLE,
VALUE_SET_ID,
OBJECT_VERSION_NUMBER
)
select
X_REPEAT_SUBSTITUTIONS_ID,
X_APPLICATION_ID,
ame_util.booleanAttributeFalse,
0,
ame_util.booleanTrue,
x_created_by,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
x_created_by,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
0,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
ame_util.booleanTrue,
null,
1
from sys.dual
where not exists
(select null
from ame_attribute_usages
where application_id = X_APPLICATION_ID
and attribute_id = X_REPEAT_SUBSTITUTIONS_ID
and (sysdate between start_date
and nvl(end_date - (1/86400),sysdate)));
X_LAST_UPDATE_DATE in VARCHAR2,
X_CUSTOM_MODE in VARCHAR2
)
is
X_APPLICATION_ID NUMBER;
X_CURRENT_LAST_UPDATE_DATE VARCHAR2(19);
X_LAST_UPDATED_BY NUMBER;
X_LAST_UPDATE_LOGIN NUMBER;
X_CURRENT_LAST_UPDATE_DATE,
X_USAGE_ROWID,
X_CURRENT_USAGE_OWNER,
X_CURRENT_USAGE_LUD,
X_CURRENT_ITEM_ID_QUERY,
X_CURRENT_APP_OVN,
X_CURRENT_USAGE_OVN);
X_LAST_UPDATED_BY,
X_LAST_UPDATE_LOGIN
);
select ame_applications_s.nextval
into X_APPLICATION_ID
from dual;
INSERT_ROW (
X_FND_APPLICATION_ID,
X_BASE_APP_NAME,
X_TRANSACTION_TYPE_ID,
X_APPLICATION_ID,
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_NEW_LINE_ITEM_ID_QUERY,
1);
INSERT_TL_ROW
(
X_APPLICATION_ID,
X_APPLICATION_NAME,
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN
);
INSERT_USAGE_ROW (
X_APPLICATION_ID,
1,
'select :transactionId from dual',
1,
'S',
'S',
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
1);
INSERT_USAGE_ROW (
X_APPLICATION_ID,
2,
X_LINE_ITEM_ID_QUERY,
2,
'S',
'S',
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
1);
X_LAST_UPDATE_DATE,
X_CREATED_BY);
FORCE_UPDATE_ROW (
X_CALLING_APPS_ROWID,
X_BASE_APP_NAME,
X_APPLICATION_ID,
X_NEW_LINE_ITEM_ID_QUERY,
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
X_CURRENT_APP_OVN + 1
);
UPDATE_TL_ROW
(
X_APPLICATION_ID,
X_APPLICATION_NAME,
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
X_CUSTOM_MODE
);
FORCE_UPDATE_USAGE_ROW (
X_USAGE_ROWID,
X_LINE_ITEM_ID_QUERY,
2,
'S',
'S',
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
AME_SEED_UTILITY.GET_DEFAULT_END_DATE,
X_CURRENT_USAGE_OVN + 1
);
if DO_UPDATE_INSERT
(AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER),
X_CURRENT_OWNER,
X_LAST_UPDATE_DATE,
X_CURRENT_LAST_UPDATE_DATE) then
UPDATE_ROW (
X_CALLING_APPS_ROWID,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS')-(1/86400));
INSERT_ROW (
X_FND_APPLICATION_ID,
X_BASE_APP_NAME,
X_TRANSACTION_TYPE_ID,
X_APPLICATION_ID,
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_NEW_LINE_ITEM_ID_QUERY,
X_CURRENT_APP_OVN + 1);
UPDATE_TL_ROW
(
X_APPLICATION_ID,
X_APPLICATION_NAME,
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
X_CUSTOM_MODE
);
DO_UPDATE_INSERT(AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER),
X_CURRENT_USAGE_OWNER,
X_LAST_UPDATE_DATE,
X_CURRENT_USAGE_LUD) then
UPDATE_USAGE_ROW (
X_USAGE_ROWID,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS')-(1/86400)
);
INSERT_USAGE_ROW (
X_APPLICATION_ID,
2,
X_LINE_ITEM_ID_QUERY,
2,
'S',
'S',
X_CREATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATED_BY,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_LAST_UPDATE_LOGIN,
to_date(X_LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
X_CURRENT_USAGE_OVN + 1);
,X_LAST_UPDATE_DATE in varchar2
,X_CUSTOM_MODE in varchar2
) as
X_CURRENT_OWNER NUMBER;
X_CURRENT_LAST_UPDATE_DATE varchar2(20);
select ACATL.LAST_UPDATED_BY,
AME_SEED_UTILITY.DATE_AS_STRING(ACATL.LAST_UPDATE_DATE),
AME_SEED_UTILITY.OWNER_AS_STRING(ACATL.CREATED_BY),
ACA.APPLICATION_ID
into X_CURRENT_OWNER,
X_CURRENT_LAST_UPDATE_DATE,
X_CREATED_BY,
X_APPLICATION_ID
from AME_CALLING_APPS_TL ACATL,
AME_CALLING_APPS ACA,
FND_APPLICATION_VL FAV
where FAV.APPLICATION_SHORT_NAME = X_APPLICATION_SHORT_NAME
and FAV.APPLICATION_ID = ACA.FND_APPLICATION_ID
and ((ACA.TRANSACTION_TYPE_ID is null and X_TRANSACTION_TYPE_ID is null) or
ACA.TRANSACTION_TYPE_ID = X_TRANSACTION_TYPE_ID)
and sysdate between ACA.START_DATE and nvl(ACA.END_DATE - (1/86400),sysdate)
and ACATL.APPLICATION_ID = ACA.APPLICATION_ID
and ACATL.LANGUAGE = userenv('LANG');
if DO_TL_UPDATE_INSERT
(X_OWNER => AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER),
X_CURRENT_OWNER => X_CURRENT_OWNER,
X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE,
X_CURRENT_LAST_UPDATE_DATE => X_CURRENT_LAST_UPDATE_DATE,
X_CREATED_BY => X_CREATED_BY,
X_CUSTOM_MODE => X_CUSTOM_MODE) then
update AME_CALLING_APPS_TL ACATL
set APPLICATION_NAME = nvl(X_APPLICATION_NAME,APPLICATION_NAME),
SOURCE_LANG = userenv('LANG'),
LAST_UPDATE_DATE = AME_SEED_UTILITY.DATE_AS_DATE(X_LAST_UPDATE_DATE),
LAST_UPDATED_BY = AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER),
LAST_UPDATE_LOGIN = 0
where ACATL.APPLICATION_ID = X_APPLICATION_ID
and userenv('LANG') in (ACATL.LANGUAGE,ACATL.SOURCE_LANG);
,X_LAST_UPDATE_DATE in varchar2
,X_UPLOAD_MODE in varchar2
,X_CUSTOM_MODE in varchar2
) as
begin
if X_UPLOAD_MODE = 'NLS' then
TRANSLATE_ROW
(X_APPLICATION_SHORT_NAME => X_APPLICATION_SHORT_NAME
,X_TRANSACTION_TYPE_ID => X_TRANSACTION_TYPE_ID
,X_APPLICATION_NAME => X_APPLICATION_NAME
,X_OWNER => X_OWNER
,X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE
,X_CUSTOM_MODE => X_CUSTOM_MODE
);
,X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE
,X_CUSTOM_MODE => X_CUSTOM_MODE
);