CREATE proc [dbo].[sp_AlisStokKarti](@Kodu nvarchar(30),@UreticiKodu nvarchar(30),@Adi nvarchar(40),  
@Adi2 nvarchar(40),@Birim nvarchar(5),@Kdv decimal,@Deger nvarchar(max),@VergiNo nvarchar(50),@Barkod nvarchar(16))  
as  
begin  
declare @No int =0,@error nvarchar(50),@message nvarchar(500)  
begin try  
insert into STOKKARTI(Kodu,UreticiFirmaKodu,StokAdi,StokAdi2,AnaBirim,Barkodu,AlisKdv,KULNO)  
VALUES(@Kodu,@UreticiKodu,@Adi,@Adi2,@Birim,@Barkod,@Kdv,1)  
set @No=@@IDENTITY  
update STOKKARTI set StokNo=@No where NoId=@No  
end try  
begin catch  
  set @No=-1  
   select @error = ERROR_NUMBER(),  
                 @message = ERROR_MESSAGE()  
end catch  
if(@No>0)  
begin  
update InvoiceItemMap set OurCode=@Kodu  where SenderIndentifier= @VergiNo and  
   ( SenderItemValue =case SenderItemKey  
  when 'B' then @Deger  
  when 'S' then @Deger  
  when 'M' then @Deger  
  when 'D' then @Deger  
  when 'N' then @Deger  
  end )  
  
select StokNo,Kodu,StokAdi from STOKKARTI where StokNo=@No  
end  
else   
  select @error ,@message  
end