Пример #1
0
        private void SERI_ArsExit(object sender, EventArgs e)
        {
            string seri = "";

            foreach (char chr in SERI.Text)
            {
                if (!char.IsDigit(chr))
                {
                    seri += chr.ToString();
                }
                else
                {
                    break;
                }
            }

            if (seri.Length > 3)
            {
                seri = seri.Substring(0, 3);
            }
            SERI.Text = seri.ToUpper();

            ArsSQLQry qryEvrakNo = new ArsSQLQry();

            qryEvrakNo.SQLText = "SELECT SON_NUMARA FROM [TBLMODULNUM] WHERE /*WS*/MODUL = 'F" + BELGE_TIPI.GetString().ArsAddStart('0', 3) + "' AND SERI = '" + SERI.Text + "' /*WE*/";
            qryEvrakNo.Open();

            if (qryEvrakNo.Found())
            {
                SON_NUMARA.SetDataStr(qryEvrakNo.GetInt("SON_NUMARA").ToString());
            }
            else
            {
                SON_NUMARA.Clear();
            }

            ArsSQLQry qryEvrakNoUzunluk = new ArsSQLQry();

            qryEvrakNoUzunluk.SQLText = "SELECT EVRAK_NO_UZUNLUK FROM TBLBELGETIP WHERE BELGE_TIPI = " + BELGE_TIPI.GetString();
            qryEvrakNoUzunluk.Open();
            if (qryEvrakNoUzunluk.Found())
            {
                EVRAK_NO_UZUNLUK.SetDataStr(qryEvrakNoUzunluk.GetInt("EVRAK_NO_UZUNLUK").ToString());
            }

            SON_NUMARA_TEXT.Text = SERI.Text + SON_NUMARA.GetIntData().ToString().ArsAddStart('0', EVRAK_NO_UZUNLUK.GetIntData() - SERI.Text.Length);
        }
Пример #2
0
        private void BtnKaydet_Click(object sender, EventArgs e)
        {
            if (SON_NUMARA_TEXT.Text != "")
            {
                ArsSQLQry qryModulNum = new ArsSQLQry();
                qryModulNum.SQLText = "SELECT * FROM [TBLMODULNUM] WHERE /*WS*/MODUL = 'F" + BELGE_TIPI.GetString().ArsAddStart('0', 3) + "' AND SERI = '" + SERI.Text + "'/*WE*/";
                qryModulNum.Open();
                if (qryModulNum.Found())
                {
                    qryModulNum.Mode = EnmQryMode.Update;
                }
                else
                {
                    qryModulNum.Mode = EnmQryMode.Insert;
                }
                qryModulNum.SetString("SERI", SERI.Text);
                qryModulNum.SetString("MODUL", "F" + BELGE_TIPI.GetString().ArsAddStart('0', 3));
                qryModulNum.SetString("SON_NUMARA", SON_NUMARA.GetIntData().ToString().ArsAddStart('0', EVRAK_NO_UZUNLUK.GetIntData() - SERI.Text.Length));
                qryModulNum.Exec();

                ArsSQLQry qryBelgeTip = new ArsSQLQry();
                qryBelgeTip.SQLText = "SELECT * FROM [TBLBELGETIP] WHERE /*WS*/BELGE_TIPI = " + BELGE_TIPI.GetString() + "/*WE*/";
                qryBelgeTip.Open();
                qryBelgeTip.Mode = EnmQryMode.Update;
                qryBelgeTip.SetInt("EVRAK_NO_UZUNLUK", EVRAK_NO_UZUNLUK.GetIntData());
                qryBelgeTip.Exec();

                if (qryBelgeTip.errorCode == "0" && qryModulNum.errorCode == "0")
                {
                    ArsMessage.ShowMessage("Bilgi", "Kayıt Başarıyla Yapıldı");
                    grdModulNum.RefreshGrid();
                    BtnTemizle_Click(BtnTemizle, null);
                }
            }
            else
            {
                ArsMessage.ShowMessage("Hata", "Son Numara Text Boş Olamaz");
            }
        }
Пример #3
0
 private void EVRAK_NO_UZUNLUK_ArsExit(object sender, EventArgs e)
 {
     if (EVRAK_NO_UZUNLUK.Text != "")
     {
         SON_NUMARA_TEXT.Text = SERI.Text + SON_NUMARA.GetIntData().ToString().ArsAddStart('0', EVRAK_NO_UZUNLUK.GetIntData() - SERI.Text.Length);
     }
     else
     {
         SON_NUMARA_TEXT.Text = "";
     }
 }