$1 PROCEDURE [dbo].[FastSell_v2_SHAR_EKLE]
@user SmallInt,
@Tip TinyInt, 
@Cins TinyInt, 
@Normal_iade TinyInt, 
@Evrak_Tip TinyInt, 
@Evrak_Tarih DateTime, 
@Seri VarChar(5), 
@Sira int, 
@Satir Int, 
@Stok_kod VarChar(25), 
@barkod nvarchar(50),
@Cari_kod VarChar(25), 
@Miktar Float, 
@Miktar2 Float,
@GirisDepo int, 
@CikisDepo int, 
@odeme int, 
@plasiyer varchar(25), 
@srmerkez varchar(25), 
@kullanici varchar(25), 
@yekun Float, 
@isk1_tutar Float, 
@isk2_tutar Float, 
@isk3_tutar Float, 
@isk4_tutar Float, 
@isk5_tutar Float, 
@Kdv TinyInt, 
@Fiyat Float, 
@belge_no varchar(25), 
@firma_no int, 
@sube_no int,
@proje_kodu varchar(25),
@gider_kodu varchar(25),
@aciklama varchar(127)
AS 
DECLARE 
@Record_id int, 
@kdv_oran float, 
@kdv_tutar float, 
@sube_sip_rec int, 
@sube_sip_dbc int, 
@norm_sip_rec int, 
@norm_sip_dbc int ,
@tarihSaatsiz datetime

set @kdv_oran=dbo.fn_VergiYuzde(@Kdv) 
set @kdv_tutar = (@yekun - (@isk1_tutar+@isk2_tutar+@isk3_tutar+@isk4_tutar+@isk5_tutar)) * @kdv_oran / 100 
set @sube_sip_rec=0 
set @sube_sip_dbc=0 
set @norm_sip_rec=0
set @norm_sip_dbc=0 

declare @birimpntr tinyint
set @birimpntr=1
set @tarihSaatsiz=convert(varchar, @Evrak_Tarih, 23)

if(@Miktar2<=0)
set @Miktar2=@Miktar
 
if exists(SELECT     sth_evrakno_seri  FROM STOK_HAREKETLERI  WHERE     (sth_evrakno_seri = @Seri) AND (sth_evrakno_sira =@Sira) AND (sth_evraktip = @Evrak_Tip) AND (sth_tip=@Tip) AND (sth_cins=@Cins)and (sth_normal_iade=@Normal_iade) and sth_stok_kod=@Stok_kod and sth_belge_tarih=@tarihSaatsiz and sth_cari_kodu=@Cari_kod and sth_vergi_pntr=@Kdv and sth_cikis_depo_no=@CikisDepo )
	begin
		UPDATE STOK_HAREKETLERI SET
							  sth_miktar=sth_miktar+@miktar, sth_miktar2=sth_miktar2+@miktar, sth_birim_pntr=1, sth_tutar=+sth_tutar+@yekun, sth_iskonto1=sth_iskonto1+@isk1_tutar, 
		sth_iskonto2=sth_iskonto2+@isk2_tutar, sth_iskonto3=@isk3_tutar, sth_iskonto4=sth_iskonto4+@isk4_tutar, sth_iskonto5=sth_iskonto5+@isk5_tutar, sth_vergi=sth_vergi+@kdv_tutar,  
							 sth_maliyet_ana=sth_maliyet_ana+@yekun, sth_maliyet_alternatif=sth_maliyet_alternatif+@yekun, sth_maliyet_orjinal=sth_maliyet_orjinal+@yekun
		WHERE     (sth_evrakno_seri = @Seri) AND (sth_evrakno_sira =@Sira) AND (sth_evraktip = @Evrak_Tip) AND (sth_tip=@Tip) AND (sth_cins=@Cins)and (sth_normal_iade=@Normal_iade) and sth_stok_kod=@Stok_kod and sth_belge_tarih=@tarihSaatsiz and sth_cari_kodu=@Cari_kod and sth_vergi_pntr=@Kdv and sth_cikis_depo_no=@CikisDepo 
	end
	else
	begin
    if exists(SELECT     sth_evrakno_seri  FROM STOK_HAREKETLERI  WHERE     (sth_evrakno_seri = @Seri) AND (sth_evrakno_sira =@Sira) AND (sth_evraktip = @Evrak_Tip) AND (sth_tip=@Tip) AND (sth_cins=@Cins)and (sth_normal_iade=@Normal_iade) and sth_satirno=@Satir )
	begin
		SELECT  @satir   =MAX(sth_satirno)+1  FROM STOK_HAREKETLERI  WHERE     (sth_evrakno_seri = @Seri) AND (sth_evrakno_sira =@Sira) AND (sth_evraktip = @Evrak_Tip) AND (sth_tip=@Tip) AND (sth_cins=@Cins)and (sth_normal_iade=@Normal_iade) 
	end
INSERT INTO STOK_HAREKETLERI
                         (sth_RECid_DBCno, sth_RECid_RECno, sth_SpecRECno, sth_iptal, sth_fileid, sth_hidden, sth_kilitli, sth_degisti, sth_checksum, sth_create_user, sth_create_date, sth_lastup_user, sth_lastup_date, sth_special1, sth_special2, 
                         sth_special3, sth_firmano, sth_subeno, sth_tarih, sth_tip, sth_cins, sth_normal_iade, sth_evraktip, sth_evrakno_seri, sth_evrakno_sira, sth_satirno, sth_belge_no, sth_belge_tarih, sth_stok_kod, sth_isk_mas1, sth_isk_mas2, 
                         sth_isk_mas3, sth_isk_mas4, sth_isk_mas5, sth_isk_mas6, sth_isk_mas7, sth_isk_mas8, sth_isk_mas9, sth_isk_mas10, sth_sat_iskmas1, sth_sat_iskmas2, sth_sat_iskmas3, sth_sat_iskmas4, sth_sat_iskmas5, 
                         sth_sat_iskmas6, sth_sat_iskmas7, sth_sat_iskmas8, sth_sat_iskmas9, sth_sat_iskmas10, sth_pos_satis, sth_cari_cinsi, sth_cari_kodu, sth_cari_grup_no, sth_isemri_gider_kodu, sth_plasiyer_kodu, sth_har_doviz_cinsi, 
                         sth_har_doviz_kuru, sth_alt_doviz_kuru, sth_stok_doviz_cinsi, sth_stok_doviz_kuru, sth_miktar, sth_miktar2, sth_birim_pntr, sth_tutar, sth_iskonto1, sth_iskonto2, sth_iskonto3, sth_iskonto4, sth_iskonto5, sth_iskonto6, 
                         sth_masraf1, sth_masraf2, sth_masraf3, sth_masraf4, sth_vergi_pntr, sth_vergi, sth_masraf_vergi_pntr, sth_masraf_vergi, sth_netagirlik, sth_odeme_op, sth_aciklama, sth_sip_recid_dbcno, sth_sip_recid_recno, 
                         sth_fat_recid_dbcno, sth_fat_recid_recno, sth_giris_depo_no, sth_cikis_depo_no, sth_malkbl_sevk_tarihi, sth_cari_srm_merkezi, sth_stok_srm_merkezi, sth_fis_tarihi, sth_fis_sirano, sth_vergisiz_fl, sth_maliyet_ana, 
                         sth_maliyet_alternatif, sth_maliyet_orjinal, sth_adres_no, sth_parti_kodu, sth_lot_no, sth_kons_recid_dbcno, sth_kons_recid_recno, sth_proje_kodu, sth_exim_kodu, sth_otv_pntr, sth_otv_vergi, sth_brutagirlik, 
                         sth_disticaret_turu, sth_otvtutari, sth_otvvergisiz_fl, sth_oiv_pntr, sth_oiv_vergi, sth_oivvergisiz_fl, sth_promosyon_fl, sth_fiyat_liste_no, sth_oivtutari, sth_Tevkifat_turu, sth_nakliyedeposu, sth_nakliyedurumu, 
                         sth_yetkili_recid_dbcno, sth_yetkili_recid_recno, sth_taxfree_fl, sth_ilave_edilecek_kdv)
VALUES        (0, - 1, 0, 0, 16, 0, 0, 0, 0,@user,@Evrak_Tarih,@user,@Evrak_Tarih, '', '', N'FS',@firma_no,@sube_no,@Evrak_Tarih,@Tip,@Cins,@Normal_iade,@Evrak_Tip,@Seri,@Sira,@Satir,@belge_no,@Evrak_Tarih,@Stok_kod, 1, 1, 1, 
                         1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,@Cari_kod, 0,@gider_kodu,@plasiyer, 0, 1, 1, 0, 1,@Miktar,@Miktar2,@birimpntr,@yekun,@isk1_tutar,@isk2_tutar,@isk3_tutar,@isk4_tutar,@isk5_tutar, 0, 0, 0, 0, 
                         0,@Kdv,@kdv_tutar, 0, 0, 0,@odeme, '',@norm_sip_dbc,@norm_sip_rec, 0, 0,@GirisDepo,@CikisDepo,@Evrak_Tarih,@srmerkez,@srmerkez,@Evrak_Tarih, 0, 0,@Fiyat,@Fiyat,@Fiyat, 1, '', 0, 0, 0, '', '', 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                         0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
	end
UPDATE    STOK_HAREKETLERI  SET   sth_RECid_RECno = sth_RECno  WHERE    sth_RECid_RECno = -1 


IF(@aciklama!='' AND @Evrak_Tip=1 AND  NOT EXISTS(SELECT * FROM EVRAK_ACIKLAMALARI WHERE egk_dosyano=16 AND egk_hareket_tip=1 AND egk_evr_tip=1 AND egk_evr_seri=@Seri AND egk_evr_sira=@Sira AND egk_evr_ustkod=''))
BEGIN
INSERT INTO EVRAK_ACIKLAMALARI
                         (egk_RECid_DBCno, egk_RECid_RECno, egk_SpecRECno, egk_iptal, egk_fileid, egk_hidden, egk_kilitli, egk_degisti, egk_checksum, egk_create_user, egk_create_date, egk_lastup_user, egk_lastup_date, egk_special1, 
                         egk_special2, egk_special3, egk_dosyano, egk_hareket_tip, egk_evr_tip, egk_evr_seri, egk_evr_sira, egk_evr_ustkod, egk_evr_doksayisi, egk_evracik1, egk_evracik2, egk_evracik3, egk_evracik4, egk_evracik5, egk_evracik6, 
                         egk_evracik7, egk_evracik8, egk_evracik9, egk_evracik10, egk_sipgenkarorani, egk_kargokodu, egk_kargono, egk_tesaltarihi, egk_tesalkisi, egk_prevwiewsayisi, egk_emailsayisi, egk_Evrakopno_verildi_fl)
VALUES        (0, -1, 0, 0, 66, 0, 0, 0, 0, 1, GETDATE(), 1, GETDATE(), N'fs', N'', N'', 16, 1, 1,@seri,@sira, N'', 0,@aciklama, N'', N'', N'', N'', N'', N'', N'', N'', N'', 0, N'', N'', '18991230', N'', 0, 0, 0)
UPDATE EVRAK_ACIKLAMALARI SET egk_RECid_RECno=egk_RECno where egk_RECid_RECno=-1
END
