Esempio n. 1
0
        private void btnKaydet_Click(object sender, EventArgs e)
        {
            ArsSQLQry qryEkranDizayn = new ArsSQLQry();

            qryEkranDizayn.SQLText = "SELECT * FROM [TBLEKRANDIZAYN] WHERE /*WS*/MENU_KODU = '" + menuKodu.Replace("'", "''") + "' " +
                                     "AND CONTROL_NAME = '" + compList[lbComps.SelectedIndex].name + "'/*WE*/";
            qryEkranDizayn.Open();
            if (qryEkranDizayn.Found())
            {
                qryEkranDizayn.Mode = EnmQryMode.Update;
            }
            else
            {
                qryEkranDizayn.Mode = EnmQryMode.Insert;
            }
            qryEkranDizayn.SetString("MENU_KODU", menuKodu.Replace("'", "''"));
            qryEkranDizayn.SetString("PANEL_NAME", compList[lbComps.SelectedIndex].pnlName);
            qryEkranDizayn.SetString("CONTROL_NAME", compList[lbComps.SelectedIndex].name);

            switch (compList[lbComps.SelectedIndex].type)
            {
            case 0:
                qryEkranDizayn.SetString("STR_DEGER", FullText.Text);
                qryEkranDizayn.SetString("PROPERTY", "FullText");
                break;

            case 1:
                qryEkranDizayn.SetBool("BOOL_DEGER", ArVisible.Checked);
                qryEkranDizayn.SetString("PROPERTY", "ArVisible");
                break;

            case 2:
                qryEkranDizayn.SetBool("BOOL_DEGER", ArVisible.Checked);
                qryEkranDizayn.SetString("PROPERTY", "ArVisible");
                break;

            case 3:
                qryEkranDizayn.SetBool("BOOL_DEGER", ArVisible.Checked);
                qryEkranDizayn.SetString("PROPERTY", "ArVisible");
                break;

            case 4:
                qryEkranDizayn.SetBool("BOOL_DEGER", ArVisible.Checked);
                qryEkranDizayn.SetString("PROPERTY", "ArVisible");
                break;

            case 5:
                qryEkranDizayn.SetBool("BOOL_DEGER", ArVisible.Checked);
                qryEkranDizayn.SetString("PROPERTY", "ArVisible");
                break;
            }
            qryEkranDizayn.Exec();

            if (qryEkranDizayn.errorCode == "0")
            {
                ArsMessage.ShowMessage("Bilgi", "Kayıt Başarıyla Gerçekleşti.");
                ArsEkranDizayn_Load(this, null);
            }
        }
Esempio n. 2
0
        public override void ProgressFinish(int processID)
        {
            switch (processID)
            {
            case 0:
                ArsSQLQry qryAdminKullanici = new ArsSQLQry();
                qryAdminKullanici.artezQry = true;
                qryAdminKullanici.SQLText  = "SELECT * FROM [TBLKULLANICI]";
                qryAdminKullanici.Open();
                qryAdminKullanici.Mode = EnmQryMode.Insert;
                qryAdminKullanici.SetInt("KULLANICI_NO", 1);
                qryAdminKullanici.SetString("KULLANICI_ADI", "ARTEZ");
                qryAdminKullanici.SetBool("ADMIN_MI", true);
                qryAdminKullanici.SetString("SIFRE", ArsLibrary.Encryption("2103"));
                qryAdminKullanici.Exec();
                break;

            case 1:
                ArsSQLQry qrySirket = new ArsSQLQry();
                qrySirket.artezQry = true;
                qrySirket.SQLText  = "SELECT * FROM [TBLSIRKET] WHERE /*WS*/SIRKET_ADI = '" + SIRKET_ADI.Text + "'/*WE*/";
                qrySirket.Open();
                if (qrySirket.Found())
                {
                    qrySirket.Mode = EnmQryMode.Update;
                }
                else
                {
                    qrySirket.Mode = EnmQryMode.Insert;
                }
                qrySirket.SetInt("APP_ID", ArsLibrary.appId);
                qrySirket.SetString("SIRKET_ADI", SIRKET_ADI.Text);
                qrySirket.SetInt("DBYIL", Convert.ToInt32(YIL.Text));
                qrySirket.SetInt("SIRKET_VERSION", ArsLibrary.dbVersion);
                qrySirket.Exec();

                ArsLibrary.SaveLineCFG("DBName", SIRKET_ADI.Text);
                ArsLibrary.SaveLineCFG("DBVersion", ArsLibrary.dbVersion.ToString());

                if (!guncelle)
                {
                    ArsMessage.ShowMessage("Bilgi", SIRKET_ADI.Text + " Veritabanı Oluşturuldu");
                }
                else
                {
                    ArsMessage.ShowMessage("Bilgi", SIRKET_ADI.Text + " Veritabanı Güncellendi");
                }
                if (girisForm != null)
                {
                    girisForm.Size = new Size(480, 300);
                }
                Close();

                break;
            }
        }
Esempio n. 3
0
        private void SatisFaturasi_ArsFatBelgeTamamla(object sender, EventArgs e)
        {
            BtnYazdir_Click(btnYazdir, null);

            ArsSQLQry qryCariTel = new ArsSQLQry();

            qryCariTel.SQLText = "SELECT CEP_TEL FROM [TBLCARI] WHERE /*WS*/CARI_KODU = '" + CARI_KODU.GetDataStr() + "'/*WE*/";
            qryCariTel.Open();
            if (qryCariTel.Found() && qryCariTel.GetString("CEP_TEL") != "")
            {
                if (ArsMessage.Question("Onay", "Mesaj Gönderilsin Mi?") == System.Windows.Forms.DialogResult.Yes)
                {
                    Mesajlar mesajlarForm = new Mesajlar();
                    mesajlarForm.parentForm  = this;
                    mesajlarForm.phoneNumber = qryCariTel.GetString("CEP_TEL");
                    mesajlarForm.ShowDialog();
                }
            }

            if (KARGO_FIRMASI.GetString() != "MNG")
            {
                return;
            }
            if (!KARGO_ILET.Checked)
            {
                return;
            }

            ArsSQLQry qryFatKontrol = new ArsSQLQry();

            qryFatKontrol.SQLText = "SELECT * FROM [TBLFATURA] WHERE /*WS*/BELGE_NO = '" + BELGE_NO.GetDataStr() + "'/*WE*/";
            qryFatKontrol.Open();
            if (qryFatKontrol.GetString("KARGO_ISLENDI") == "True")
            {
                return;
            }

            if (KARGO_FIRMASI.GetString() == "MNG")
            {
                int kapidaOdemeInt = 0;
                if (ODEME_TIPI.GetString() == "Kapıda Ödeme")
                {
                    kapidaOdemeInt = 1;
                }
                string odemeTipi = "P";
                if (ODEME_TIPI.SelectedIndex == 1 || ODEME_TIPI.SelectedIndex == 2)
                {
                    odemeTipi = "U";
                }

                ArsSQLQry qryCari = new ArsSQLQry();
                qryCari.SQLText = "SELECT * FROM [TBLCARI] WHERE /*WS*/CARI_KODU = '" + CARI_KODU.GetDataStr() + "'/*WE*/";
                qryCari.Open();

                ArsSQLQry qryCariAdres = new ArsSQLQry();
                if (KARGO_ADRES.IsNotEmpty())
                {
                    qryCariAdres.SQLText = "SELECT TOP 1 * FROM [TBLCARIADRES] WHERE /*WS*/CARI_KODU = '" + CARI_KODU.GetDataStr() + "' AND ADRES_BASLIGI = '" + KARGO_ADRES.GetDataStr() + "'/*WE*/";
                    qryCariAdres.Open();
                }
                else
                {
                    qryCariAdres.SQLText = "SELECT TOP 1 * FROM [TBLCARIADRES] WHERE /*WS*/CARI_KODU = '" + CARI_KODU.GetDataStr() + "' AND ISNULL(KARGO_ADRESI_MI, 0) = 1/*WE*/ ORDER BY REC_ID DESC";
                    qryCariAdres.Open();
                    if (!qryCariAdres.Found())
                    {
                        return;
                    }
                }

                string il   = qryCari.GetString("IL_ADI");
                string ilce = qryCari.GetString("ILCE_ADI");
                if (qryCariAdres.GetString("IL_ADI") != "")
                {
                    il = qryCariAdres.GetString("IL_ADI");
                }
                if (qryCariAdres.GetString("ILCE_ADI") != "")
                {
                    ilce = qryCariAdres.GetString("ILCE_ADI");
                }
                string adres = qryCariAdres.GetString("ADRES");

                ArsSQLQry qryKargo = new ArsSQLQry();
                qryKargo.SQLText = "SELECT * FROM [TBLKARGOBILGILERI] WHERE /*WS*/KARGO_ADI = '" + KARGO_FIRMASI.GetString() + "'/*WE*/";
                qryKargo.Open();
                if (!qryKargo.Found())
                {
                    return;
                }

                KargoKullanici      = qryKargo.GetString("KARGO_KULLANICI_ADI");
                KargoKullaniciSifre = qryKargo.GetString("KARGO_KULLANICI_SIFRE");

                var task = gonderiOlustur.SiparisGirisiDetayliV2Async(
                    "",                                            //pChIrsaliyeNo
                    TUTAR.GetDataStr(),                            //pPrKiymet
                    BELGE_NO.Text,                                 //pChBarkod
                    "Ürün",                                        //pChIcerik:
                    Convert.ToInt32("1"),                          //pFlAlSms:
                    Convert.ToInt32("1"),                          //pFlGnSms:
                    1 + ":" + 1 + ":" + 1 + ":" + 1 + ":" + "1:;", //pKargoParcaList
                    "",                                            //pAliciMusteriMngNo:
                    "",                                            //pAliciMusteriBayiNo
                    CARI_ADI.Text,                                 //pAliciMusteriAdi:
                    BELGE_NO.Text,                                 //pChSiparisNo:
                    odemeTipi,                                     //pLuOdemeSekli:
                    "1",                                           //pFlAdresFarkli:
                    il,                                            //pChIl:
                    ilce,                                          //pChIlce:
                    ilce,                                          //pChAdres:
                    ilce,                                          //pChSemt:
                    ilce,                                          //pChMahalle:
                    ilce,                                          //pChMeydanBulvar:
                    ilce,                                          //pChCadde:
                    ilce,                                          //pChSokak:
                    qryCari.GetString("TEL_NO"),                   //pChTelEv:
                    qryCari.GetString("CEP_TEL"),                  //pChTelCep:
                    "",                                            //pChTelIs:
                    "",                                            //pChFax:
                    qryCari.GetString("E_POSTA"),                  //pChEmail:
                    qryCari.GetString("VERGI_DAIRESI"),            //pChVergiDairesi:
                    qryCari.GetString("VERGI_NO"),                 //pChVergiNumarasi:
                    kapidaOdemeInt,                                //pFlKapidaOdeme:
                    KargoKullanici,                                //pKullaniciAdi:
                    KargoKullaniciSifre
                    );
                if (task.Result == "1")
                {
                    ArsSQLQry qryFat = new ArsSQLQry();
                    qryFat.SQLText = "SELECT * FROM [TBLFATURA] WHERE /*WS*/BELGE_NO = '" + BELGE_NO.GetDataStr() + "'/*WE*/";
                    qryFat.Open();
                    qryFat.Mode = EnmQryMode.Update;
                    qryFat.SetBool("KARGO_ISLENDI", true);
                    qryFat.Exec();
                }
                else
                {
                    ArsMessage.ShowMessage("UYARI", "Kayıt Oluşturulamadı..\n" + task.Result);
                }
            }
        }
Esempio n. 4
0
        private void OdemeClick(object sender, EventArgs e)
        {
            string btnTag    = (sender as SimpleButton).Tag.ToString();
            string modul     = "";
            string belgeNo   = "";
            string evrakNo   = "";
            string modulKodu = "";
            bool   acikHesap = btnTag == "ACIKHESAP";

            if (!acikHesap)
            {
                switch (btnTag.Substring(0, 3))
                {
                case "bn_":
                    modulKodu = "bn";
                    modul     = "BN";
                    break;

                case "ks_":
                    modulKodu = "ks";
                    modul     = "KS";
                    break;
                }

                string belgeNoKodu = DateTime.Now.ToString("yy") + DateTime.Now.Month.ToString("d2") + modul + "1" + ArsLibrary.userNo.ToString().ArsAddStart('0', 3);

                #region Modül Belge No
                ArsSQLQry qryBelgeNo = new ArsSQLQry();
                qryBelgeNo.SQLText = "SELECT * FROM [TBLOTONUM] WHERE /*WS*/NUMARA_KODU = '" + belgeNoKodu + "'/*WE*/";
                qryBelgeNo.Open();
                if (qryBelgeNo.Found())
                {
                    int sonNum = Convert.ToInt32(qryBelgeNo.GetString("SON_NUMARA").ArsLastDigits(5));
                    sonNum++;
                    belgeNo         = belgeNoKodu + sonNum.ToString().ArsAddStart('0', 5);
                    qryBelgeNo.Mode = EnmQryMode.Update;
                    qryBelgeNo.SetString("SON_NUMARA", belgeNo);
                }
                else
                {
                    belgeNo         = belgeNoKodu + "00001";
                    qryBelgeNo.Mode = EnmQryMode.Insert;
                    qryBelgeNo.SetString("NUMARA_KODU", belgeNoKodu);
                    qryBelgeNo.SetString("SON_NUMARA", belgeNo);
                }
                qryBelgeNo.Exec();
                #endregion

                #region Modül Evrak No
                ArsSQLQry qryEvrakNo = new ArsSQLQry();
                qryEvrakNo.SQLText = "SELECT * FROM [TBLMODULNUM] WHERE /*WS*/MODUL = '" + modul + "1" + "' AND SERI = ''/*WE*/";
                qryEvrakNo.Open();
                if (qryEvrakNo.Found())
                {
                    int sonNum = Convert.ToInt32(qryEvrakNo.GetString("SON_NUMARA").ArsLastDigits(5));
                    sonNum++;
                    evrakNo         = sonNum.ToString().ArsAddStart('0', 5);
                    qryEvrakNo.Mode = EnmQryMode.Update;
                    qryEvrakNo.SetString("SON_NUMARA", evrakNo);
                }
                else
                {
                    evrakNo         = "00001";
                    qryEvrakNo.Mode = EnmQryMode.Insert;
                    qryEvrakNo.SetString("MODUL", modul + "1");
                    qryEvrakNo.SetString("SERI", "", true);
                    qryEvrakNo.SetString("SON_NUMARA", evrakNo);
                }
                qryEvrakNo.Exec();
                #endregion
            }

            ArsSQLQry qryAdisyon = new ArsSQLQry();
            qryAdisyon.SQLText = "SELECT *, (SELECT COUNT(*) FROM TBLBLUEADISYONHAR HAR WHERE HAR.ADISYON_RECID = ADISYON.REC_ID " +
                                 "AND HAR.MIKTAR - ISNULL(HAR.ODENEN_MIKTAR, 0) > 0) AS KALEM_SAYISI " +
                                 "FROM [TBLBLUEADISYON] ADISYON WHERE /*WS*/REC_ID = " + adisyonRecID + "/*WE*/";
            qryAdisyon.Open();
            if (qryAdisyon.Found())
            {
                string fatBelgeNoKodu = DateTime.Now.ToString("yy") + DateTime.Now.Month.ToString("d2") + "001" + ArsLibrary.userNo.ToString().ArsAddStart('0', 3);
                string fatBelgeNo     = "";
                string fatEvrakNo     = "";
                int    fatRecID       = -1;

                #region FatBelgeNo
                ArsSQLQry qryFatBelgeNo = new ArsSQLQry();
                qryFatBelgeNo.SQLText = "SELECT * FROM [TBLOTONUM] WHERE /*WS*/NUMARA_KODU = '" + fatBelgeNoKodu + "'/*WE*/";
                qryFatBelgeNo.Open();
                if (qryFatBelgeNo.Found())
                {
                    int sonNum = Convert.ToInt32(qryFatBelgeNo.GetString("SON_NUMARA").ArsLastDigits(5));
                    sonNum++;
                    fatBelgeNo         = fatBelgeNoKodu + sonNum.ToString().ArsAddStart('0', 5);
                    qryFatBelgeNo.Mode = EnmQryMode.Update;
                    qryFatBelgeNo.SetString("NUMARA_KODU", fatBelgeNo.ArsFirstDigits(10));
                    qryFatBelgeNo.SetString("SON_NUMARA", fatBelgeNo.ArsLastDigits(5));
                }
                else
                {
                    fatBelgeNo         = fatBelgeNoKodu + "00001";
                    qryFatBelgeNo.Mode = EnmQryMode.Insert;
                    qryFatBelgeNo.SetString("NUMARA_KODU", fatBelgeNo.ArsFirstDigits(10));
                    qryFatBelgeNo.SetString("SON_NUMARA", fatBelgeNo.ArsLastDigits(5));
                }
                qryFatBelgeNo.Exec();
                #endregion

                #region FatEvrakNo
                ArsSQLQry qryEvrakNoUzunluk = new ArsSQLQry();
                qryEvrakNoUzunluk.SQLText = "SELECT EVRAK_NO_UZUNLUK FROM [TBLBELGETIP] WHERE /*WS*/BELGE_TIPI = 1/*WE*/";
                qryEvrakNoUzunluk.Open();
                int evrakNoUzunluk = qryEvrakNoUzunluk.GetInt("EVRAK_NO_UZUNLUK");

                ArsSQLQry qryFatEvrakNo = new ArsSQLQry();
                qryFatEvrakNo.SQLText = "SELECT * FROM [TBLMODULNUM] WHERE /*WS*/MODUL = 'F001' AND SERI = '" + blueParams.fatEvrakSeri + "'/*WE*/";
                qryFatEvrakNo.Open();
                if (qryFatEvrakNo.Found())
                {
                    qryFatEvrakNo.Mode = EnmQryMode.Update;
                    int sonNum = Convert.ToInt32(qryFatEvrakNo.GetString("SON_NUMARA").ArsLastDigits(5));
                    sonNum++;
                    fatEvrakNo = blueParams.fatEvrakSeri + sonNum.ToString().ArsAddStart('0', evrakNoUzunluk - blueParams.fatEvrakSeri.Length);
                    qryFatEvrakNo.SetString("SON_NUMARA", fatEvrakNo.ArsLastDigits(evrakNoUzunluk - blueParams.fatEvrakSeri.Length));
                }
                else
                {
                    qryFatEvrakNo.Mode = EnmQryMode.Insert;
                    fatEvrakNo         = blueParams.fatEvrakSeri + 1.ToString().ArsAddStart('0', evrakNoUzunluk - blueParams.fatEvrakSeri.Length);
                    qryFatEvrakNo.SetString("SON_NUMARA", fatEvrakNo.ArsLastDigits(evrakNoUzunluk - blueParams.fatEvrakSeri.Length));
                    qryFatEvrakNo.SetString("MODUL", "F001");
                    qryFatEvrakNo.SetString("SERI", blueParams.fatEvrakSeri);
                }
                qryFatEvrakNo.Exec();
                #endregion

                if (!acikHesap)
                {
                    switch (btnTag.Substring(0, 3))
                    {
                    case "bn_":
                        string hesapKodu = btnTag.Substring(3, btnTag.Length - 3);

                        BankaHar bankaHar = new BankaHar();
                        bankaHar.Clear();
                        bankaHar.bankaKodu    = hesapKodu;
                        bankaHar.belgeNo      = belgeNo;
                        bankaHar.evrakNo      = evrakNo;
                        bankaHar.kod          = qryAdisyon.GetString("CARI_KODU");
                        bankaHar.belgeTipi    = "1";
                        bankaHar.tarih        = DateTime.Now.ToString("dd.MM.yyyy");
                        bankaHar.islemTarihi  = DateTime.Now.ToString("dd.MM.yyyy");
                        bankaHar.modulKodu    = modulKodu;
                        bankaHar.tutar        = Convert.ToDouble(lblSecimTutar.Text.RemoveChar('.'));
                        bankaHar.aciklama     = qryAdisyon.GetString("ACIKLAMA");
                        bankaHar.ustBelgeTipi = "ft1";
                        bankaHar.ustBelgeNo   = fatBelgeNo;
                        ArBanka.BankaHarCreate(bankaHar);

                        break;

                    case "ks_":
                        string kasaKodu = btnTag.Substring(3, btnTag.Length - 3);

                        KasaHar kasaHar = new KasaHar();
                        kasaHar.Clear();
                        kasaHar.kasaKodu     = kasaKodu;
                        kasaHar.belgeNo      = belgeNo;
                        kasaHar.evrakNo      = evrakNo;
                        kasaHar.kod          = qryAdisyon.GetString("CARI_KODU");
                        kasaHar.belgeTipi    = "1";
                        kasaHar.tarih        = DateTime.Now.ToString("dd.MM.yyyy");
                        kasaHar.islemTarihi  = DateTime.Now.ToString("dd.MM.yyyy");
                        kasaHar.modulKodu    = modulKodu;
                        kasaHar.tutar        = Convert.ToDouble(lblSecimTutar.Text.RemoveChar('.'));
                        kasaHar.aciklama     = qryAdisyon.GetString("ACIKLAMA");
                        kasaHar.ustBelgeTipi = "ft1";
                        kasaHar.ustBelgeNo   = fatBelgeNo;
                        ArKasa.KasaHarCreate(kasaHar);
                        break;
                    }

                    #region CariHar
                    CariHar cariHar = new CariHar();
                    cariHar.Clear();
                    cariHar.cariKodu   = qryAdisyon.GetString("CARI_KODU");
                    cariHar.belgeNo    = belgeNo;
                    cariHar.evrakNo    = evrakNo;
                    cariHar.belgeTipi  = modulKodu + "1";
                    cariHar.modul      = modulKodu;
                    cariHar.tarih      = DateTime.Now.ToString("dd.MM.yyyy");
                    cariHar.vadeTarihi = DateTime.Now.ToString("dd.MM.yyyy");
                    cariHar.tutar      = Convert.ToDouble(lblSecimTutar.Text.RemoveChar('.'));
                    cariHar.borcAlacak = "A";
                    cariHar.aciklama   = qryAdisyon.GetString("ACIKLAMA");
                    ArCari.CariHarCreate(cariHar);
                    #endregion
                }

                #region Fatura İnsert
                ArsSQLQry qryFat = new ArsSQLQry();
                qryFat.SQLText = "SELECT * FROM [TBLFATURA] WHERE /*WS*/1=2/*WE*/";
                qryFat.Open();
                qryFat.Mode = EnmQryMode.Insert;
                qryFat.SetString("BELGE_NO", fatBelgeNo);
                qryFat.SetInt("BELGE_TIPI", 1);
                qryFat.SetString("EVRAK_NO", fatEvrakNo);
                qryFat.SetString("CARI_KODU", qryAdisyon.GetString("CARI_KODU"));
                qryFat.SetString("TARIH", DateTime.Now.ToString("yyyy-MM-dd"));
                qryFat.SetString("TESLIM_TARIHI", DateTime.Now.ToString("yyyy-MM-dd"));
                qryFat.SetString("VADE_TARIH", DateTime.Now.ToString("yyyy-MM-dd"));
                qryFat.SetBool("KDV_DAHIL_MI", true);
                qryFat.SetDouble("BRUT_TOPLAM", qryAdisyon.GetDouble("BRUT_TOPLAM"));
                qryFat.SetDouble("GENEL_TOPLAM", Convert.ToDouble(lblSecimTutar.Text.RemoveChar('.')));
                qryFat.SetDouble("ARA_TOPLAM", qryAdisyon.GetDouble("ARA_TOPLAM"));
                qryFat.SetDouble("KDV_TUTARI", qryAdisyon.GetDouble("KDV_TUTARI"));
                qryFat.SetDouble("KALEM_ISK1", qryAdisyon.GetDouble("KALEM_ISK1"));
                qryFat.SetDouble("KALEM_ISK2", qryAdisyon.GetDouble("KALEM_ISK2"));
                qryFat.SetDouble("KALEM_ISK3", qryAdisyon.GetDouble("KALEM_ISK3"));
                qryFat.SetDouble("KALEM_ISK4", qryAdisyon.GetDouble("KALEM_ISK4"));
                qryFat.SetDouble("KALEM_MIKTAR", qryAdisyon.GetDouble("KALEM_SAYISI"));
                qryFat.SetDouble("DIP_O_ISK1", qryAdisyon.GetDouble("DIP_O_ISK1"));
                qryFat.SetDouble("DIP_T_ISK1", qryAdisyon.GetDouble("DIP_T_ISK1"));
                qryFat.SetInt("ADISYON_RECID", adisyonRecID);
                qryFat.SetBool("DURUM", true);
                qryFat.Exec();
                fatRecID = qryFat.insertRecID;
                #endregion

                #region StokHar İnsert
                ArsSQLQry qryAdisyonHar = new ArsSQLQry();
                qryAdisyonHar.SQLText = "SELECT *, MIKTAR - ISNULL(ODENEN_MIKTAR, 0) AS KALEM_MIKTAR FROM [TBLBLUEADISYONHAR] WHERE " +
                                        "/*WS*/ADISYON_RECID = " + adisyonRecID + " " +
                                        "AND MIKTAR - ISNULL(ODENEN_MIKTAR, 0) > 0/*WE*/";
                qryAdisyonHar.Open();
                for (int i = 0; i < qryAdisyonHar.DataCount(); i++)
                {
                    ArsSQLQry qryKalem = new ArsSQLQry();
                    qryKalem.SQLText = "SELECT * FROM [TBLSTOKHAR] WHERE /*WS*/1=2/*WE*/";
                    qryKalem.Open();
                    qryKalem.Mode = EnmQryMode.Insert;
                    qryKalem.SetInt("BELGE_RECID", fatRecID);
                    qryKalem.SetString("BELGE_NO", fatBelgeNo);
                    qryKalem.SetInt("BELGE_TIPI", 1);
                    qryKalem.SetString("TARIH", DateTime.Now.ToString("yyyy-MM-dd"));
                    qryKalem.SetString("STOK_KODU", qryAdisyonHar.GetString("STOK_KODU"));
                    qryKalem.SetString("STOK_ISIM", qryAdisyonHar.GetString("STOK_ISIM"));
                    qryKalem.SetDouble("MIKTAR", qryAdisyonHar.GetDouble("KALEM_MIKTAR"));
                    qryKalem.SetDouble("BIRIM_FIYAT", qryAdisyonHar.GetDouble("BIRIM_FIYAT"));
                    qryKalem.SetString("KDV_KODU", qryAdisyonHar.GetString("KDV_KODU"));
                    qryKalem.SetDouble("KALEM_ISK", qryAdisyonHar.GetDouble("KALEM_ISK"));
                    qryKalem.SetString("GC", "C");
                    qryKalem.Exec();

                    ArsSQLQry qryStok = new ArsSQLQry();
                    qryStok.SQLText = "SELECT ISNULL(MENU_STOK, 0) AS MENU_STOK FROM [TBLSTOK] WHERE /*WS*/STOK_KODU = '" + qryAdisyonHar.GetString("STOK_KODU") + "' " +
                                      "AND ISNULL(MENU_STOK, 0) = 1/*WE*/";
                    qryStok.Open();
                    if (qryStok.Found())
                    {
                        ArsSQLQry qryAltStok = new ArsSQLQry();
                        qryAltStok.SQLText = "SELECT ALT_STOK_KODU, STOK_ADI, MIKTAR, STOK.SATIS_KDV_KODU FROM [TBLSTOKALTURUN] ALTURUN, TBLSTOK STOK " +
                                             "WHERE /*WS*/STOK.STOK_KODU = ALTURUN.ALT_STOK_KODU " +
                                             "AND ALTURUN.STOK_KODU = '" + qryAdisyonHar.GetString("STOK_KODU") + "'/*WE*/";
                        qryAltStok.Open();
                        if (qryAdisyon.Found())
                        {
                            for (int k = 0; k < qryAltStok.DataCount(); k++)
                            {
                                ArsSQLQry qryKalemAlt = new ArsSQLQry();
                                qryKalemAlt.SQLText = "SELECT * FROM [TBLSTOKHAR] WHERE /*WS*/1=2/*WE*/";
                                qryKalemAlt.Open();
                                qryKalemAlt.Mode = EnmQryMode.Insert;
                                qryKalemAlt.SetInt("BELGE_RECID", fatRecID);
                                qryKalemAlt.SetString("BELGE_NO", fatBelgeNo);
                                qryKalemAlt.SetInt("BELGE_TIPI", 1);
                                qryKalemAlt.SetString("TARIH", DateTime.Now.ToString("yyyy-MM-dd"));
                                qryKalemAlt.SetString("STOK_KODU", qryAltStok.GetString("ALT_STOK_KODU"));
                                qryKalemAlt.SetString("STOK_ISIM", qryAltStok.GetString("STOK_ADI"));
                                qryKalemAlt.SetDouble("MIKTAR", qryAdisyonHar.GetDouble("KALEM_MIKTAR") * qryAltStok.GetDouble("MIKTAR"));
                                qryKalemAlt.SetDouble("BIRIM_FIYAT", 0.0);
                                qryKalemAlt.SetString("KDV_KODU", qryAltStok.GetString("SATIS_KDV_KODU"));
                                qryKalemAlt.SetDouble("KALEM_ISK", 0.0);
                                qryKalemAlt.SetString("GC", "C");
                                qryKalemAlt.Exec();
                                qryAltStok.Next();
                            }
                        }
                    }

                    qryAdisyonHar.Next();
                }
                #endregion

                #region CariHar
                CariHar cariHarFat = new CariHar();
                cariHarFat.Clear();
                cariHarFat.cariKodu   = qryAdisyon.GetString("CARI_KODU");
                cariHarFat.belgeNo    = fatBelgeNo;
                cariHarFat.evrakNo    = fatEvrakNo;
                cariHarFat.belgeTipi  = "ft1";
                cariHarFat.modul      = "ft";
                cariHarFat.tarih      = DateTime.Now.ToString("dd.MM.yyyy");
                cariHarFat.vadeTarihi = DateTime.Now.ToString("dd.MM.yyyy");
                cariHarFat.tutar      = Convert.ToDouble(lblSecimTutar.Text.RemoveChar('.'));
                cariHarFat.borcAlacak = "B";
                cariHarFat.aciklama   = "";
                ArCari.CariHarCreate(cariHarFat);
                #endregion

                #region Adisyon Update
                qryAdisyon.Mode = EnmQryMode.Update;
                qryAdisyon.SetInt("FAT_RECID", fatRecID);
                qryAdisyon.SetInt("DURUM", 1);
                qryAdisyon.SetDouble("ODENEN_TUTAR", qryAdisyon.GetDouble("GENEL_TOPLAM"));
                qryAdisyon.Exec();
                #endregion

                if (anaForm != null)
                {
                    odemeTamamlandı = true;
                    anaForm.Masalar();
                    this.Close();
                }
            }
        }