日期:2014-05-17 浏览次数:20752 次
CREATE OR REPLACE
PROCEDURE p_bctts_enterext_update
(var_id in number,
var_old_address varchar2,
var_new_address varchar2,
var_coperation varchar2,
var_bj_manager varchar2,
var_phone varchar2,
var_email varchar2,
var_consigner varchar2,
var_deputy varchar2,
var_accredit_content varchar2,
var_deputy_start_date date,
var_deputy_end_date date)
IS
var_errormsg varchar2(4000);
var_zyxt_enterprise_id varchar2(16);
BEGIN
var_errormsg := '';
var_zyxt_enterprise_id := '';
select zyxt_enterprise_id
into var_zyxt_enterprise_id
from t_enterprise_info
where id = var_id;
update bctts.t_enterprise_info
set bctts.t_enterprise_info.old_address = var_old_address,
bctts.t_enterprise_info.new_address = var_new_address,
bctts.t_enterprise_info.coperation = var_coperation,
bctts.t_enterprise_info.bj_manager = var_bj_manager,
bctts.t_enterprise_info.phone = var_phone,