proc_pltcald_upd.sql

工厂采购系统,DELPHI+SQL SERVER,三层技术

if object_id('dbo.Proc_PltCald_Upd') is not null
drop procedure Proc_PltCald_Upd
go

Create procedure Proc_PltCald_Upd
@FYear	int = null,
@FMonth int = null,
@FDay   int = null,
@Holiday_Flag bit = null,
@Holiday_Type char(2) = null,
@Remark varchar(120) = null
as
begin
	if  exists(select Fdate from Plant_Calendar where FYear = @Fyear
	and Fmonth = @Fmonth  and Fday = @Fday) 
	begin
		update Plant_Calendar
			set Holiday_flag =@Holiday_flag,
			    Holiday_type = @Holiday_Type,
			    Remark = @Remark
	where FYear = @Fyear
	and Fmonth = @Fmonth  and Fday = @Fday
	end
end