**********
CREATE Procedure S004IU01
@idPayed int output,
@dDatePay smallDatetime,
@sCustomer nvarchar(30),
@idCurrency tinyint,
@idPayType tinyint,
@Remark nvarchar(50)
As
If @idPayed=-1
Begin
insert into payed(DatePay,customer,idCurrency,idPayType,Remark)
values(@dDatePay,@sCustomer,@idCurrency,@idPayType,@Remark)
Select @idPayed=@@identity
End
else
Update Payed Set DatePay=@dDatePay,Customer=@sCustomer,idCurrency=@idCurrency,
idPayType=@idPayType,Remark=@Remark Where idPayed=@idPayed