CREATE proc JMO_PSRT_Upd (
@psr_scdn char(65),
@psr_name char(65),
@psr_jno char(5),
@psr_qual char(5),
@psr_pscd char(65),
@psr_pjob char(65),
@psr_pjno char(5),
@psr_pqua char(5),
@psr_flag binary(1),
@k_psr_scdn char(65),
@k_psr_name char(65),
@k_psr_jno char(5),
@k_psr_qual char(5),
@k_psr_pscd char(65),
@k_psr_pjob char(65),
@k_psr_pjno char(5),
@k_psr_pqua char(5)
)
as
begin
Update jmo_psrt
Set
psr_scdn = @psr_scdn,
psr_name = @psr_name,
psr_jno = @psr_jno,
psr_qual = @psr_qual,
psr_pscd = @psr_pscd,
psr_pjob = @psr_pjob,
psr_pjno = @psr_pjno,
psr_pqua = @psr_pqua,
psr_flag = @psr_flag
From jmo_psrt
Where
psr_scdn = @k_psr_scdn and
psr_name = @k_psr_name and
psr_jno = @k_psr_jno and
psr_qual = @k_psr_qual and
psr_pscd = @k_psr_pscd and
psr_pjob = @k_psr_pjob and
psr_pjno = @k_psr_pjno and
psr_pqua = @k_psr_pqua
end
GO
GRANT EXECUTE ON [dbo].[JMO_PSRT_Upd] TO [emadmin]
GRANT EXECUTE ON [dbo].[JMO_PSRT_Upd] TO [jmoadmin]
GRANT EXECUTE ON [dbo].[JMO_PSRT_Upd] TO [uniadmin]
GO