Oracle DB scn情况查询

2019年5月8日小潘留下评论

–1、查询当前scn情况

select version,
date_time,
dbms_flashback.get_system_change_number current_scn,
indicator
from (select version,
to_char(SYSDATE, 'YYYY/MM/DD HH24:MI:SS') DATE_TIME,
((((((to_number(to_char(sysdate, 'YYYY')) – 1988) * 12 * 31 * 24 * 60 * 60) +
((to_number(to_char(sysdate, 'MM')) – 1) * 31 * 24 * 60 * 60) +
(((to_number(to_char(sysdate, 'DD')) – 1)) * 24 * 60 * 60) +
(to_number(to_char(sysdate, 'HH24')) * 60 * 60) +
(to_number(to_char(sysdate, 'MI')) * 60) +
(to_number(to_char(sysdate, 'SS')))) * (16 * 1024)) –
SYS.dbms_flashback.get_system_change_number) /
(16 * 1024 * 60 * 60 * 24)) indicator
from v$instance);

–2、查询距离上限天数的历史变化情况

SELECT tim,
gscn,
round(rate),
round((chk16kscn – gscn) / 24 / 3600 / 16 / 1024, 1) "HEADROOM"
FROM (SELECT tim,
gscn,
rate,
((((to_number(to_char(tim, 'YYYY')) – 1988) * 12 * 31 * 24 * 60 * 60) +
((to_number(to_char(tim, 'MM')) – 1) * 31 * 24 * 60 * 60) +
(((to_number(to_char(tim, 'DD')) – 1)) * 24 * 60 * 60) +
(to_number(to_char(tim, 'HH24')) * 60 * 60) +
(to_number(to_char(tim, 'MI')) * 60) +
(to_number(to_char(tim, 'SS')))) * (16 * 1024)) chk16kscn
FROM (SELECT first_time tim,
first_change# gscn,
((next_change# – first_change#) /
((next_time – first_time) * 24 * 60 * 60)) rate
FROM v$archived_log
WHERE (next_time > first_time)))
ORDER BY 1, 2;

可参考以下链接：

https://www.cnblogs.com/likingzi/p/6420927.html

其他：此脚本来做patch 13498243

经验闲谈

Oracle S 由数据库端找到对应的前台URL地址

2019年4月29日小潘留下评论

SELECT home_url FROM icx_parameters;

SELECT profile_option_value
FROM fnd_profile_option_values
WHERE profile_option_id=
   (SELECT profile_option_id
      FROM fnd_profile_options WHERE profile_option_name = 'APPS_FRAMEWORK_AGENT')
   AND level_value = 0;

原创程序、经验闲谈

Oracle ebs资产调整 api例子

2019年4月25日小潘一条评论

declare
l_trans_rec FA_API_TYPES.trans_rec_type;
l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
l_inv_tbl FA_API_TYPES.inv_tbl_type;
l_inv_rate_tbl FA_API_TYPES.inv_rate_tbl_type;
l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
l_inv_rec FA_API_TYPES.inv_rec_type;
l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
l_return_status VARCHAR2(1);
l_mesg_count number := 0;
l_mesg_len number;
l_mesg varchar2(4000);
begin
fnd_profile.put('PRINT_DEBUG', 'Y');
dbms_output.enable(1000000);
FA_SRVR_MSG.Init_Server_Message;
FA_DEBUG_PKG.Initialize;
— asset header info
l_asset_hdr_rec.asset_id := 100000206;
l_asset_hdr_rec.book_type_code := 'FIN_FA_BOOK';
— fin info
l_asset_fin_rec_adj.cost := 1002;

–需注意这个金额是在原基础上的增减值。
FA_ADJUSTMENT_PUB.do_adjustment(p_api_version => 1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_calling_fn => 'ADJ_TEST_SCRIPT',
x_return_status => l_return_status,
x_msg_count => l_mesg_count,
x_msg_data => l_mesg,
px_trans_rec => l_trans_rec,
px_asset_hdr_rec => l_asset_hdr_rec,
p_asset_fin_rec_adj => l_asset_fin_rec_adj,
x_asset_fin_rec_new => l_asset_fin_rec_new,
x_asset_fin_mrc_tbl_new => l_asset_fin_mrc_tbl_new,
px_inv_trans_rec => l_inv_trans_rec,
px_inv_tbl => l_inv_tbl,
–px_inv_rate_tbl => l_inv_rate_tbl,
p_asset_deprn_rec_adj => l_asset_deprn_rec_adj,
x_asset_deprn_rec_new => l_asset_deprn_rec_new,
x_asset_deprn_mrc_tbl_new => l_asset_deprn_mrc_tbl_new,
p_group_reclass_options_rec => l_group_reclass_options_rec);
dbms_output.put_line(l_return_status);
if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
fa_debug_pkg.dump_debug_messages(max_mesgs => 0);
l_mesg_count := fnd_msg_pub.count_msg;
if l_mesg_count > 0 then
l_mesg := substr(fnd_msg_pub.get(fnd_msg_pub.G_FIRST, fnd_api.G_FALSE),
1,
512);
dbms_output.put_line(substr(l_mesg, 1, 255));
for i in 1 .. l_mesg_count – 1 loop
l_mesg := substr(fnd_msg_pub.get(fnd_msg_pub.G_NEXT,
fnd_api.G_FALSE),
1,
512);
dbms_output.put_line(substr(l_mesg, 1, 255));
end loop;
fnd_msg_pub.delete_msg();
end if;
else
dbms_output.put_line('SUCCESS');
dbms_output.put_line('THID' ||
to_char(l_trans_rec.transaction_header_id));
end if;
end;
/
参考文件：Oracle Assets Adjustments API Documentation Supplement (文档 ID 206474.1)

系统层级、经验闲谈

Oracle EBS 取消“是否提交另一项请求”

2019年4月18日小潘留下评论

配置文件

中文：并发：提交每个请求后显示请求摘要

英文：Concurrent: ShowRequests Summary After Each Request Submission

说明：设置为“是”以使 SRS 表单 (FNDRSRUN) 在每次提交新请求时显示当前提交请求的摘要。

使用场景：

在使用EBS提交请求后，总要弹出“是否提交另一项请求”的提示，而我们往往选择“否”，这个提示就显得多余。

为了减轻这“多一步”的负担，取消“是否提交另一项请求”的提示，设置方法如下：默认：否(No)，修改为是(Yes)，可以在User Level上修改。

转载文章（档）

远程团队指南（二）

2019年3月21日小潘留下评论

作者托尼-施瓦茨的新书《我们的工作方式不起作用：被遗忘的四大促进表现的需求》一书在媒体上掀起了不小的轰动。最主要的是，他唤起了那些我们早已熟知的事情：这种现代化的时刻在线保持联络的久坐方式对我们的工作有多方面的损害。但是，对于远程团队，和我们这些劳心劳力为团队谋福利的管理者来说，这些问题非常棘手。针对他的文章《拿回你的项目》，我最近写过一篇评论。最近，我有机会向他请教一些有关管理远程团队的问题。很多人的公司都是虚拟的，他也在管理这样的公司。以下是他的一些观点：

管理者：要非常明确的跟你的远程员工们解释清楚什么叫做成功。重要的不是他们工作的时间（反正你也不能真正的核查这一点），最重要的是他们所产出的价值。关键是要像对待成年人那样对待他们：说清楚你的预期，给他们自由去决定去选择最好的方法，最后要保证他们对自己的工作成绩负责。管理者不同花时间和雇员们来讨论和交流，来界定成功的定义，这一点对远程工作人员意义尤其重大。

员工：需要找到一种方法，在缺乏外部监管组织的情况下进行自我管理。对于施瓦茨来说，这意味着要制定一个长期的时间表，每天一清早要开始做最重要的事情，不受干扰的工作90分钟，然后休息片刻。这样的话，每天的开始效率会非常高，可以帮助员工抵挡其他诱惑，去干那些不是很紧要的比较容易做的事情——例如答复电子邮件。

管理者：要承认那些远程上班的人，可能需要一些压力才能集中注意力。施瓦茨的书中勾画出一张非常清晰的蓝图，告诉你最有效的办法，同时照顾到你的长期需要。他说：“那些读我书的经理们首先需要从自己身上总结经验教训，然后，他们需要帮助大家来创造一种结构，使人们有可能从中取得成果——包括鼓励他们真的去重新安排时间顺序。如果你明确的定义什么是成功，而且规定好具体的办法定期检查远程工作人员的工作进度。那么，真的有人出现问题的时候，其标志就是他们什么也没贡献。你几乎可以肯定的是，其关键就是没有建立明确的责任界限，也没有明确的工作态度。记住要保持这样的对话。

管理者：不要低估经常接触的重要性。 “人类是群居动物，我们都渴望交流，”施瓦茨说，“如果你是在管理远程工作者，你必须投入额外的精力去和他们保持联系，并对他们出色的工作表示赞赏，因为那些单枪匹马干活的人很容易感到孤独和不被尊重。你不能只依靠电子邮件——这种形式太单一了，作为沟通方式很单调。重要的是要找到时间来和他们保持联络。”

有人苛责我说，我一直没有考虑过远程团队是可持续的，这不仅对企业不利，而且这也是不对的。我相信，和施瓦茨一样，我们必须考虑如何使人们最大程度的发挥潜能，然后有意识地创造一种环境，在这种环境下他们可以充分发展，而不是只靠运气。

转载自网络文件。

路路库