Re: Data is not getting updated to databse, please help!!!!

qbernard — Tue, 16 Jun 2009 12:53:47 GMT

Output the query syntax and execute it directly at db server.
without error msgs, it would be hard to trace.

Re: Data is not getting updated to databse, please help!!!!

tomkmvp — Mon, 15 Jun 2009 14:53:31 GMT

What happens? You have not given us that detail. What happens if you comment out the err line?

Re: Data is not getting updated to databse, please help!!!!

bappa001 — Mon, 15 Jun 2009 09:37:15 GMT

No i am not getting any error msg.while executing the stored procedure on db itself, it is working, but It is not getting ececuted from the ASP code.

I have taken trace to see that if procedure is getting ececuted or not, but not getting any thing.it seems to be NewCommandx1.Execute is not working.

Re: Data is not getting updated to databse, please help!!!!

qbernard — Mon, 15 Jun 2009 07:23:06 GMT

This is coding issue, right? any error msgs? have you try it out directly on the db itself? any error msgs?

Data is not getting updated to databse, please help!!!!

bappa001 — Mon, 15 Jun 2009 07:21:13 GMT

I have the following code ,but data is not getting updated to database.please help

set NewConnx = server.CreateObject("ADODB.Connection")
NewConnx.Open Session("MyConnection")

set NewCommandx1 = server.CreateObject ("ADODB.Command")

set NewCommandx1.ActiveConnection = NewConnx
'set rsNewCommandx = Server.CreateObject("ADODB.Recordset")
NewCommandx1.CommandText = "pr_save_re_setup"
NewCommandx1.CommandType = 4

NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_in_ivr_plan_num",adVarChar,adParamInput)
NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_in_activate_re_dt_calc",adChar,adParamInput)
NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_in_re_elig_dt_criteria",adInteger,adParamInput)
NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_in_re_elig_yrs_service",adInteger,adParamInput)
NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_in_re_rt_opt_grnt_level",adChar,adParamInput)
NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_in_activate_re_tax_calc",adChar,adParamInput)
NewCommandx1.Parameters.Append NewCommandx1.CreateParameter("p_out_error_cur",adVariant,adParamOutput)

NewCommandx1("p_in_ivr_plan_num") = txtPlan
NewCommandx1("p_in_activate_re_dt_calc") = chkRetEligDateCal
NewCommandx1("p_in_re_elig_dt_criteria") = 1
NewCommandx1("p_in_re_elig_yrs_service") = 1
NewCommandx1("p_in_re_rt_opt_grnt_level") = radO2andO3Record
NewCommandx1("p_in_activate_re_tax_calc") = chkRetEligTaxCal

NewConnx.BeginTrans()

NewCommandx1.Execute
if Err.number > 0 then
NewConnx.RollbackTrans()

else
NewConnx.CommitTrans()
end if

NewConnx.close
set NewConnx = nothing
set NewCommandx1 = nothing

Stored procedure >>

PROCEDURE PR_SAVE_RE_SETUP(p_in_ivr_plan_num VARCHAR2,

p_in_activate_re_dt_calc tb_fc_compy_ext.activate_re_dt_calc%TYPE DEFAULT 'N',

-- p_in_activate_re_dt tb_fc_compy_ext.activate_re_dt%TYPE,

p_in_re_elig_dt_criteria tb_fc_compy_ext.re_elig_dt_criteria%TYPE,

p_in_re_elig_yrs_service tb_fc_compy_ext.re_elig_yrs_service%TYPE,

p_in_re_rt_opt_grnt_level tb_fc_compy_ext.re_rt_opt_grnt_level%TYPE,

p_in_activate_re_tax_calc tb_fc_compy_ext.activate_re_tax_calc%TYPE DEFAULT 'N',

p_out_error_cur OUT err_cursor) IS

v_err_cd NUMBER(12) := 0;

v_err_msg VARCHAR2(4000);

BEGIN

Pr_Xop_Log_Re_Errors('Before update tb_fc_compy_ext');

UPDATE TB_FC_COMPY_EXT SET activate_re_dt_calc = p_in_activate_re_dt_calc,

activate_re_dt = sysdate,

re_elig_dt_criteria = p_in_re_elig_dt_criteria,

re_elig_yrs_service = p_in_re_elig_yrs_service,

re_rt_opt_grnt_level = p_in_re_rt_opt_grnt_level,

activate_re_tax_calc = p_in_activate_re_tax_calc

WHERE ivr_plan_num = p_in_ivr_plan_num;COMMIT;

Pr_Xop_Log_Re_Errors('Updated in Tb_fc_compy_ext');

OPEN p_out_error_cur FOR SELECT 0 code, 'SUCCESS' message FROM dual;

EXCEPTION

WHEN OTHERS THEN

v_err_cd := SQLCODE;

v_err_msg := SQLERRM;

OPEN p_out_error_cur FOR SELECT v_err_cd code, v_err_msg message FROM DUAL;

Pr_Xop_Log_Re_Errors('CRITICAL ERROR!Code'||SQLCODE||':'||

SQLERRM||' AT '||USER||

'.PK_XOP_RE.PR_SAVE_RE_SETUP');

END PR_SAVE_RE_SETUP;

Classic ASP

Re: Data is not getting updated to databse, please help!!!!

Re: Data is not getting updated to databse, please help!!!!

Re: Data is not getting updated to databse, please help!!!!

Re: Data is not getting updated to databse, please help!!!!

Data is not getting updated to databse, please help!!!!