CREATE proc JMO_STR1_Upd (
@str_name char(65),
@str_qual char(5),
@str_avgtb int,
@str_ows varchar(21),
@str_ws varchar(21),
@str_wstyp char(1),
@str_any binary(1),
@str_erly int,
@str_must int,
@str_dedln int,
@str_mxtim int,
@str_avgt int,
@str_jcont int,
@str_flg1 binary(1),
@str_flg3 binary(1),
@str_bklog binary(1),
@str_histc smallint,
@str_desc varchar(255),
@str_newpr char(2),
@str_fordate int,
@str_erdt int,
@str_mudt int,
@str_dedt int,
@str_mxdt int,
@str_adate int,
@str_vdate int,
@str_sdate int,
@str_edate int,
@str_pdate int,
@str_atime int,
@str_vtime int,
@str_stime int,
@str_etime int,
@str_dprty int,
@str_cc varchar(9),
@str_hstat binary(1),
@str_rstat binary(1),
@str_flg5 binary(1),
@str_cmrun varchar(33),
@str_cmhld varchar(33),
@str_cmrls varchar(33),
@str_cmcnc varchar(33),
@str_cmfrc varchar(33),
@str_cal varchar(9),
@str_faill int,
@str_failh int,
@str_subu varchar(33),
@str_subp varchar(15),
@str_domain varchar(16),
@str_flg4 binary(1),
@str_sutyp binary(1),
@str_qname char(1),
@k_str_name char(65),
@k_str_qual char(5)
)
as
begin
Update jmo_str1
Set
str_name = @str_name,
str_qual = @str_qual,
str_avgtb = @str_avgtb,
str_ows = @str_ows,
str_ws = @str_ws,
str_wstyp = @str_wstyp,
str_any = @str_any,
str_erly = @str_erly,
str_must = @str_must,
str_dedln = @str_dedln,
str_mxtim = @str_mxtim,
str_avgt = @str_avgt,
str_jcont = @str_jcont,
str_flg1 = @str_flg1,
str_flg3 = @str_flg3,
str_bklog = @str_bklog,
str_histc = @str_histc,
str_desc = @str_desc,
str_newpr = @str_newpr,
str_fordate = @str_fordate,
str_erdt = @str_erdt,
str_mudt = @str_mudt,
str_dedt = @str_dedt,
str_mxdt = @str_mxdt,
str_adate = @str_adate,
str_vdate = @str_vdate,
str_sdate = @str_sdate,
str_edate = @str_edate,
str_pdate = @str_pdate,
str_atime = @str_atime,
str_vtime = @str_vtime,
str_stime = @str_stime,
str_etime = @str_etime,
str_dprty = @str_dprty,
str_cc = @str_cc,
str_hstat = @str_hstat,
str_rstat = @str_rstat,
str_flg5 = @str_flg5,
str_cmrun = @str_cmrun,
str_cmhld = @str_cmhld,
str_cmrls = @str_cmrls,
str_cmcnc = @str_cmcnc,
str_cmfrc = @str_cmfrc,
str_cal = @str_cal,
str_faill = @str_faill,
str_failh = @str_failh,
str_subu = @str_subu,
str_subp = @str_subp,
str_domain = @str_domain,
str_flg4 = @str_flg4,
str_sutyp = @str_sutyp,
str_qname = @str_qname
From jmo_str1 WITH (index=1)
Where
str_name = @k_str_name and
str_qual = @k_str_qual
end
GO
GRANT EXECUTE ON [dbo].[JMO_STR1_Upd] TO [emadmin]
GRANT EXECUTE ON [dbo].[JMO_STR1_Upd] TO [jmoadmin]
GRANT EXECUTE ON [dbo].[JMO_STR1_Upd] TO [uniadmin]
GO