写了个我感觉比较鸡肋的东东 ,只想鼠标点点点的时候可以用
create or replace procedure qj_qp.qy_qp_judge_if_exec_proc_y(update_date date,test_date date)
is
gengxin date; --选清单的数据要更新到的时间(周四)
ceshi date; --政企周报测试时间(周五)
t_sql varchar2(500);--数据是否更新语句
grant_sql varchar2(500);--授权用户语句
v_count number;
begin
gengxin := trunc(update_date);
ceshi :=trunc(test_date);
t_sql:='select count(1)
from qj_qp.QPZQ_CBT_MANAGER_SALE_MD_QD
where 统计日='''||gengxin||''' and rownum=1';
grant_sql:='grant all on qj_qp.QPZQ_CBT_MANAGER_SALE_MD_QD to u_qp_support,u_qiyun';
v_count:=0;
execute immediate grant_sql;
dbms_output.put_line('qj_qp.QPZQ_CBT_MANAGER_SALE_MD_QD 已授权用户');
dbms_output.put_line('政企周报数据更新(周四):'||to_char(gengxin,'yyyy-mm-dd'));
dbms_output.put_line('政企周报数据测试统计时间(周五):'||to_char(ceshi,'yyyy-mm-dd&