0

自从我试图从 .net 中的 pl/sql 过程中取出参数以来，我已经 2 天了。我使用 ODAC（ORACLE 数据访问客户端）。这是我的prevuouse问题。无法在.net中取出Oracle的参数

现在，我将程序更改为函数并尝试返回 varchar 2 值。

C# 代码

float cur_rate;
            decimal value;
            if (!String.IsNullOrEmpty(RateTxtBox.Text) && decimal.TryParse(RateTxtBox.Text, out value))
            {
            cur_rate = float.Parse(RateTxtBox.Text);
            con = new OracleConnection(conStr);
            con.Open();
            cmd = con.CreateCommand();
            cmd.BindByName = true;
            cmd.CommandType = CommandType.StoredProcedure;
            cmd.CommandText = schema_name + ".CACCRUEMENT_INS_FUNC";
            cmd.Parameters.Add("p_check_info_id", OracleDbType.Int32, header_id, ParameterDirection.Input);
            cmd.Parameters.Add("p_calculate_on", OracleDbType.Date, DateTime.Parse(dateTimePicker1.Text), ParameterDirection.Input);
            cmd.Parameters.Add("p_curr_id", OracleDbType.Decimal, CurrencyCombobox.SelectedValue, ParameterDirection.Input);
            cmd.Parameters.Add("p_cur_rate", OracleDbType.Decimal, Decimal.Parse(RateTxtBox.Text), ParameterDirection.Input);
            cmd.Parameters.Add("p_result", OracleDbType.Decimal,ParameterDirection.Output);
            cmd.Parameters.Add("RETURN_VAL", OracleDbType.Varchar2, ParameterDirection.ReturnValue);
            cmd.ExecuteNonQuery();
            int result = Int16.Parse(cmd.Parameters["RETURN_VAL"].Value.ToString());

它抛出一个{"ORA-06502: PL/SQL: numeric or value error: character string buffer too small\nORA-06512: at line 1"}

pl/sql 函数

create or replace function CACCRUEMENT_INS_FUNC(
      p_check_info_id in number,
      p_calculate_on in date,
      p_curr_id in number,
      p_cur_rate in number,
      p_result out number)return varchar2 is

  v_Accruemtnt number;
  v_rate number;
  v_cur_rate_in_check_info number;
  Last_accruemet_date date;
  monthes_bwn_last_adj_n_chck number;
  next_check date;
  check_info_rate number;
begin
  select c.next_check 
  into next_check 
  from check_info c 
  where c.id_check_info = p_check_info_id;
  begin 
        select max(c.calculate_on_date) 
        into Last_accruemet_date 
        from check_info_lines  c 
        where c.fk_check_info = p_check_info_id 
        group by c.fk_check_info;


        if Last_accruemet_date > p_calculate_on then 
          --p_result :=2;--'Accruement date must be between date of last adjustment and next C-Check date!';
          return 'Accruement date must be between date of last adjustment and next C-Check date!';
          goto l_EndOfLoop;
        end if;

        exception when no_data_found then
        --p_result:=0;--'Adjustment is not calculated!';
        return 'Adjustment is not calculated!';
        goto l_EndOfLoop;

        begin
          select max(c.calculate_on) 
          into Last_accruemet_date 
          from Caccruement c 
          where c.fk_check_info = p_check_info_id
          group by c.fk_check_info;

        exception when no_data_found then
          null;
        end;
      end;
    select ci.curency_rate 
    into check_info_rate 
    from check_info ci 
    where ci.id_check_info = p_check_info_id;

    select c.rate 
    into v_rate 
    from Check_Info c 
    where c.id_check_info = p_check_info_id;

    monthes_bwn_last_adj_n_chck:=MONTHS_BETWEEN(next_check,Last_accruemet_date);

    IF(monthes_bwn_last_adj_n_chck>round(MONTHS_BETWEEN(p_calculate_on,Last_accruemet_date),3))
    THEN
      select c.curency_rate 
      into v_cur_rate_in_check_info 
      from check_info c 
      where c.id_check_info = p_check_info_id;

    v_Accruemtnt := round(v_rate/check_info_rate * MONTHS_BETWEEN(p_calculate_on, Last_accruemet_date)*p_cur_rate,3) ;

    insert 
    into CAccruement(Id_Accruemtnt,Calculate_On,Accruemtnt,Fk_Check_Info,Cu_Id,Cu_Rate,Calculation_Date,Accruemtnt_Kzt) 
    values (accruement_seq.nextval,p_calculate_on,round(v_Accruemtnt/p_cur_rate,3),p_check_info_id,p_curr_id,p_cur_rate,Sysdate,v_Accruemtnt);

    update check_info c 
    set c.total_accumulated = c.total_accumulated+v_Accruemtnt 
    where c.id_check_info = p_check_info_id;
    END IF; 
     COMMIT; 

     --p_result:=1;--'Operation complited successfully';
     return 'Operation complited successfully';
     update_total_accumulated(p_check_info_id);

    <<l_EndOfLoop>>
      ROLLBACK;
      EXCEPTION
    WHEN OTHERS
    THEN

      --DBMS_OUTPUT.PUT_LINE(SQLERRM);
      p_result:=3;--'Oracle not handled exception!';
      ROLLBACK;    
end CACCRUEMENT_INS_FUNC;
4

0 回答 0