create or replace procedure sp_t_array_over(i_date date)
/* @caption 判断活动是否过期，每天晚上定时任务
  * @version 1.0
  * @author zbn
  * @create-date 2013-11-25
  * @copyright huawei
  */
as
    v_stat_date            varchar2(10);        -- 定义统计时间
    v_task_name            varchar2(512);       -- 任务名称
    v_table_name           varchar2(40);        -- 表名称
    v_task_pos             varchar2(256);       -- 任务位置
    v_sqlerr               varchar2(200);       -- 错误信息编码
    v_sqlmsg               varchar2(200);       -- 错误信息详情
    v_curr_time            date;

    input_error            exception;           -- 程序出错返回自定义异常
    v_sql                  varchar2(2000);      -- 动态语句，执行truncate表

    v_a                    t_tmp_array_over.activity_code%type;               -- 临时变量，处理游标时用的活动编码
    v_b                    t_tmp_array_over.end_time%type;                    -- 临时变量，处理游标时用的活动结束时间
    v_c                    t_tmp_array_over.array_time%type;                  -- 临时变量，处理游标时用的排期最大时间
    cursor c_array_time is select t.activity_code,t.end_time,t.array_time
                         from t_tmp_array_over t
                        where t.activity_code is not null;
begin
  -- 初始化变量
  v_stat_date       := to_char(i_date,'yyyy-mm-dd');            -- 截取当前日期,转换成字符 yyyy-mm-dd
  v_task_name       := 'sp_t_array_over';
  v_table_name      := 't_tmp_array_over';                      -- 临时表名
  v_task_pos        := '程序开始';
  v_sqlerr          := null;
  v_sqlmsg          := null;
  v_curr_time       := sysdate;