CREATE proc JMO_GBL_Upd (
@gbl_name char(8),
@gbl_adate int,
@gbl_atime int,
@gbl_ldate int,
@gbl_ltime int,
@gbl_ndate int,
@gbl_ntime int,
@gbl_fdate int,
@gbl_ftime int,
@next_rpt char(3),
@gbl_ltype binary(1),
@gbl_flag1 binary(1),
@act_trkset char (1),
@prescan_min int,
@prescan_max int,
@prescan_total int,
@prescan_cnt int,
@k_gbl_name char(8)
)
as
begin
Update jmo_gbl
Set
gbl_name = @gbl_name,
gbl_adate = @gbl_adate,
gbl_atime = @gbl_atime,
gbl_ldate = @gbl_ldate,
gbl_ltime = @gbl_ltime,
gbl_ndate = @gbl_ndate,
gbl_ntime = @gbl_ntime,
gbl_fdate = @gbl_fdate,
gbl_ftime = @gbl_ftime,
next_rpt = @next_rpt,
gbl_ltype = @gbl_ltype,
gbl_flag1 = @gbl_flag1,
act_trkset = @act_trkset,
prescan_min = @prescan_min,
prescan_max = @prescan_max,
prescan_total = @prescan_total,
prescan_cnt = @prescan_cnt
From jmo_gbl WITH (index=1)
Where
gbl_name = @k_gbl_name
end
GO
GRANT EXECUTE ON [dbo].[JMO_GBL_Upd] TO [emadmin]
GRANT EXECUTE ON [dbo].[JMO_GBL_Upd] TO [jmoadmin]
GRANT EXECUTE ON [dbo].[JMO_GBL_Upd] TO [uniadmin]
GO