datetmp2=`date +%d`
$logininfo <
call sp_lzw_ZJ201101300004();
exit;
EOF
date
exit
cat login.sql
SET NEWPAGE NONE HEADING OFF SPACE 0 PAGESIZE 0 TRIMOUT ON TRIMSPOOL ON LINESIZE 2500 colsep | feedback off termout off pages 0
set colsep |
alter session set nls_date_format='yyyy-mm-dd hh24:mi:ss';
set feedback on
select text from user_source where name='SP_LZW_ZJ201101300004';
create or replace PROCEDURE sp_lzw_ZJ201101300004
/** HEAD
* @name sp_lzw_ZJ201101300004
* @caption 处理表
* @type 日处理
* @parameter iv_month in varchar2 统计日期，格式：YYYYMMDD
* @parameter oi_return out integer 执行状态码，0 正常，其它 出错
* @description 处理表
* @middle <无>
* @version <版本号：1.0>
* @author
* @create-date <2011-3-23 9:08>
* @TODO <工作计划>
* @version <1.0>
* @mender <修改人>
* @modify_date
* @modify_desc <修改原因>
* @copyright TDS
*/
is
vi_task_id integer; -- 任务日志ID
vv_task_name varchar2(30); -- 任务名
vv_table_name varchar2(30); -- 表名
vv_task_pos varchar2(50); -- 任务位置
vv_return varchar2(255); --记录过程的返回值
vv_err_msg varchar2(200); -- 出错信息
vi_err_code integer; -- 出错代码
vi_result integer; -- 临时结果
vd_date date; -- 日期类型的统计日期,
vd_now_month date; -- vd_date 的当月1日
vd_pre_month date; -- vd_date 的上一个月1号
vv_date1 varchar2(10); --转换为字符的日期： yyyymm
vv_date2 varchar2(10); --转换为字符的日期： yyyymm
vv_date_now varchar2(10); --转换为字符的日期： yyyymm
vv_date_pre varchar2(10); --转换为字符的日期： yyyymm
vv_date_now4 varchar2(10); --转换为字符的日期： yymm
vv_date_pre4 varchar2(10); --转换为字符的日期： yymm
exc_return exception; -- 程序中间返回自定义异常
exc_error exception; -- 程序出错返回自定义异常
vv_datacnt integer; --临时变量
FileName varchar2(128); --临时文件名
BEGIN
execute immediate 'alter session enable parallel dml';
/**
* @description 变量初始化
* @field-mapping vv_task_name = ('<不带用户名的程序名>')
* @field-mapping vv_table_name = ('<不带用户名的表名>')
*/
vd_date := sysdate ; --取当月
vd_now_month := trunc(sysdate,'mm'); --取本月1日
vd_pre_month := add_months(trunc(vd_date,'mm'), -1); --取上月1日
vv_date_pre := to_char(vd_pre_month,'yyyymm'); --上月月份 yyyymm
vv_date_now := to_char(vd_now_month,'yyyymm'); --本月月份 yyyymm
vv_date_pre4 := to_char(vd_pre_month,'yymm'); --上月月份 yymm
vv_date_now4 := to_char(vd_now_month,'yymm'); --本月月份 yymm
--vv_task_name := '';
--vv_table_name := '';
execute immediate 'select count(1) from user_tables where table_name = upper('''||'tmp_lzw_ZJ201101300004_'||vv_date_pre||''')' into vv_datacnt;
if ( vv_datacnt >0 ) then
execute immediate 'drop table tmp_lzw_ZJ201101300004_'||vv_date_pre||' purge';
end if;
---手机报扣费
execute immediate '
create table tmp_lzw_ZJ201101300004_'||vv_date_pre||' nologging as
select /*+ parallel(a,16) */
subno
,out_route
,in_route
,CALL_Date
,CALL_time
,case when ROLLBACK_FLAG = ''0'' then AFTER_MOB_FEE else 0-AFTER_MOB_FEE end AFTER_MOB_FEE_0
,case when ROLLBACK_FLAG = ''0'' then AFTER_TOLL_FEE else 0-AFTER_TOLL_FEE end AFTER_TOLL_FEE_0
,case when ROLLBACK_FLAG = ''0'' then AFTER_INF_FEE else 0-AFTER_INF_FEE end AFTER_INF_FEE_0,
msrn
from DGDM_DW.TB_DW_LS_CDR_data_day a
where a.CALL_Date >= '''||vv_date_pre4||'01''
and a.CALL_Date < '''||vv_date_now4||'01''
and a.msrn in
(
''110301'',
''112335'',
''110334'',
''113135'',
''113140'',
''113141'',
''113138'',
''112319'',
''113149'',
''112384'',
''110303'',
''110304'',
''110361'',
''11036