private void StokKodOtoKontrol()
{
bool stokOtoKod = ArsLibrary.GetParamFloat("STOK", "STOK_KODU_OTOMATIK_MI") == 1.0;
if (stokOtoKod)
{
string stokKodSeri = ArsLibrary.GetParamStr("STOK", "STOK_SERI");
int stokKodUzunluk = Convert.ToInt32(ArsLibrary.GetParamFloat("STOK", "STOK_KODU_UZUNLUK"));
ArsSQLQry qryStokKodu = new ArsSQLQry();
qryStokKodu.SQLText = "SELECT TOP 1 STOK_KODU FROM [TBLSTOK] WHERE STOK_KODU LIKE '" + stokKodSeri + "%' ORDER BY REC_ID DESC";
qryStokKodu.Open();
if (qryStokKodu.Found())
{
string lastNum = qryStokKodu.GetString("STOK_KODU").ArsLastNums();
if (lastNum == "")
{
STOK_KODU.SetDataStr(stokKodSeri + "1".ArsAddStart('0', stokKodUzunluk));
}
else
{
STOK_KODU.SetDataStr(stokKodSeri + (Convert.ToInt32(lastNum) + 1).ToString().ArsAddStart('0', stokKodUzunluk));
}
}
else
{
STOK_KODU.SetDataStr(stokKodSeri + "1".ArsAddStart('0', stokKodUzunluk));
}
STOK_KODU.ArEnable = false;
STOK_ADI.Focus();
}
}
private void CariKodOtoKontrol()
{
bool cariOtoKod = ArsLibrary.GetParamFloat("CARI", "CARI_KODU_OTOMATIK_MI") == 1.0;
cariBenzerlikKontrol = ArsLibrary.GetParamFloat("CARI", "CARI_BENZERLIK_KONTROL") == 1.0;
if (cariOtoKod)
{
string cariKodSeri = ArsLibrary.GetParamStr("CARI", "CARI_SERI");
int cariKodUzunluk = Convert.ToInt32(ArsLibrary.GetParamFloat("CARI", "CARI_KODU_UZUNLUK"));
ArsSQLQry qryCariKodu = new ArsSQLQry();
qryCariKodu.SQLText = "SELECT TOP 1 CARI_KODU FROM [TBLCARI] WHERE CARI_KODU LIKE '" + cariKodSeri + "%' ORDER BY REC_ID DESC";
qryCariKodu.Open();
if (qryCariKodu.Found())
{
string lastNum = qryCariKodu.GetString("CARI_KODU").ArsLastNums();
if (lastNum == "")
{
CARI_KODU.SetDataStr(cariKodSeri + "1".ArsAddStart('0', cariKodUzunluk));
}
else
{
CARI_KODU.SetDataStr(cariKodSeri + (Convert.ToInt32(lastNum) + 1).ToString().ArsAddStart('0', cariKodUzunluk));
}
}
else
{
CARI_KODU.SetDataStr(cariKodSeri + "1".ArsAddStart('0', cariKodUzunluk));
}
CARI_KODU.ArEnable = false;
CARI_ADI.Focus();
}
}
private void miFaturaYazdir_Click(object sender, EventArgs e)
{
ArsSQLQry qryBelge = new ArsSQLQry();
qryBelge.SQLText = "SELECT YAZDIRMA_DURUM FROM [" + UstBilgiTablo + "] WHERE /*WS*/BELGE_NO = '" + BELGE_NO.GetDataStr() + "' AND " +
"ISNULL(YAZDIRMA_DURUM, 0) <= 2/*WE*/";
qryBelge.Open();
if (qryBelge.Found())
{
qryBelge.Mode = EnmQryMode.Update;
qryBelge.SetInt("YAZDIRMA_DURUM", 3);
qryBelge.Exec();
}
string yazici = ArsLibrary.GetParamStr("FATURA", "FATURA_YAZICI");
double adet = ArsLibrary.GetParamFloat("FATURA", "FATURA_CIKTI_SAYISI");
ArsSQLQry qryFat = new ArsSQLQry();
qryFat.SQLText = "SELECT " +
" CASE WHEN ISNULL(C.CARI_ADI, '') <> '' THEN C.CARI_ADI ELSE C.TICARI_UNVAN END AS CARI_ADI " +
", ADRES.ADRES " +
", C.IL_ADI " +
", C.ILCE_ADI " +
", C.CEP_TEL " +
", C.TEL_NO " +
", C.KARGO_FIRMASI " +
", F.BELGE_NO " +
", F.TARIH " +
", SH.STOK_KODU " +
", S.STOK_ADI " +
", SH.MIKTAR " +
", SB.BIRIM_TANIMI " +
", SH.BIRIM_FIYAT " +
", KO.KDV_ORAN " +
", (SH.MIKTAR * SH.BIRIM_FIYAT) AS TOPLAM " +
"FROM TBLFATURA AS F, TBLSTOKHAR AS SH, TBLCARI AS C, TBLSTOK AS S, TBLSTOKBIRIM AS SB, TBLKDVORAN AS KO, TBLCARIADRES ADRES " +
"WHERE F.CARI_KODU = C.CARI_KODU AND F.BELGE_NO = '" + BELGE_NO.GetDataStr() + "' AND SH.BELGE_RECID = F.REC_ID AND SH.STOK_KODU = S.STOK_KODU AND S.BIRIM_KODU = SB.BIRIM_KODU AND KO.KDV_KODU = SH.KDV_KODU " +
"AND ADRES.ADRES_BASLIGI = F.KARGO_ADRES AND C.CARI_KODU = ADRES.CARI_KODU";
qryFat.Open();
xraporFaturaBilgi fatCikti = new xraporFaturaBilgi();
fatCikti.DataSource = qryFat.dataSet;
fatCikti.ShowRibbonPreview();
for (int i = 0; i < Convert.ToInt32(adet); i++)
{
fatCikti.Print(yazici);
}
ArsMessage.ShowMessage("Bilgi", "Fatura Yazıcıya İletildi");
}
private void miFisYazdir_Click(object sender, EventArgs e)
{
ArsSQLQry qryBelge = new ArsSQLQry();
qryBelge.SQLText = "SELECT YAZDIRMA_DURUM FROM [" + UstBilgiTablo + "] WHERE /*WS*/BELGE_NO = '" + BELGE_NO.GetDataStr() + "' AND " +
"ISNULL(YAZDIRMA_DURUM, 0) <= 1/*WE*/";
qryBelge.Open();
if (qryBelge.Found())
{
qryBelge.Mode = EnmQryMode.Update;
qryBelge.SetInt("YAZDIRMA_DURUM", 2);
qryBelge.Exec();
}
string yazici = ArsLibrary.GetParamStr("FATURA", "FIS_YAZICI");
double adet = ArsLibrary.GetParamFloat("FATURA", "FIS_CIKTI_SAYISI");
ArsSQLQry qryFis = new ArsSQLQry();
qryFis.SQLText = "SELECT STOK_KODU, STOK_ISIM, MIKTAR, 'AD' AS BIRIM, BIRIM_FIYAT, (MIKTAR * BIRIM_FIYAT) AS TOPLAM, AA.* " +
"FROM " +
"(SELECT TOP 1 FAT.BELGE_NO, CASE WHEN ISNULL(CARI.CARI_ADI, '') <> '' THEN CARI.CARI_ADI ELSE CARI.TICARI_UNVAN END AS CARI_ADI, CARI.CEP_TEL, CARI.TEL_NO, ADRES.ADRES, ADRES.IL_ADI, ADRES.ILCE_ADI, FAT.BELGE_NOT " +
"FROM TBLFATURA FAT, TBLCARI CARI, TBLCARIADRES ADRES " +
"WHERE FAT.BELGE_NO = '" + BELGE_NO.GetDataStr() + "' " +
"AND CARI.CARI_KODU = FAT.CARI_KODU " +
"AND CARI.CARI_KODU = ADRES.CARI_KODU " +
"AND ADRES.ADRES_BASLIGI = FAT.KARGO_ADRES) AS AA, TBLSTOKHAR HAR " +
"WHERE AA.BELGE_NO = HAR.BELGE_NO ";
qryFis.Open();
FisDizayn fisCikti = new FisDizayn();
fisCikti.DataSource = qryFis.dataSet;
fisCikti.odeme = ODEME_TIPI.Text;
fisCikti.kargo = KARGO_FIRMASI.Text;
fisCikti.tarih = TARIH.Text;
fisCikti.ad = qryFis.GetString("CARI_ADI");
fisCikti.adres = qryFis.GetString("ADRES");
fisCikti.il = qryFis.GetString("IL_ADI");
fisCikti.ilce = qryFis.GetString("ILCE_ADI");
fisCikti.tel = qryFis.GetString("CEP_TEL");
fisCikti.tel2 = qryFis.GetString("TEL_NO");
fisCikti.belgeNot = qryFis.GetString("BELGE_NOT");
for (int i = 0; i < Convert.ToInt32(adet); i++)
{
fisCikti.Print(yazici);
}
ArsMessage.ShowMessage("Bilgi", "Fiş Yazıcıya İletildi");
}
private void miAdresYazdir_Click(object sender, EventArgs e)
{
ArsSQLQry qryBelge = new ArsSQLQry();
qryBelge.SQLText = "SELECT YAZDIRMA_DURUM FROM [" + UstBilgiTablo + "] WHERE /*WS*/BELGE_NO = '" + BELGE_NO.GetDataStr() + "' AND " +
"ISNULL(YAZDIRMA_DURUM, 0) = 0/*WE*/";
qryBelge.Open();
if (qryBelge.Found())
{
qryBelge.Mode = EnmQryMode.Update;
qryBelge.SetInt("YAZDIRMA_DURUM", 1);
qryBelge.Exec();
}
string yazici = ArsLibrary.GetParamStr("FATURA", "ADRES_YAZICI");
double adet = ArsLibrary.GetParamFloat("FATURA", "ADRES_CIKTI_SAYISI");
ArsSQLQry qryAdres = new ArsSQLQry();
qryAdres.SQLText = "SELECT TOP 1 CASE WHEN ISNULL(CARI.CARI_ADI, '') <> '' THEN CARI.CARI_ADI ELSE CARI.TICARI_UNVAN END AS CARI_ADI, CARI.CEP_TEL, CARI.TEL_NO, ADRES.ADRES, ADRES.IL_ADI, ADRES.ILCE_ADI, FAT.BELGE_NOT " +
"FROM [" + UstBilgiTablo + "] FAT, TBLCARI CARI, TBLCARIADRES ADRES " +
"WHERE BELGE_NO = '" + BELGE_NO.GetDataStr() + "' " +
"AND FAT.CARI_KODU = CARI.CARI_KODU " +
"AND CARI.CARI_KODU = ADRES.CARI_KODU ";
if (KARGO_ADRES.GetDataStr() != "")
{
qryAdres.SQLText += "AND ADRES.ADRES_BASLIGI = FAT.KARGO_ADRES ";
}
qryAdres.Open();
AdresDizayn adresCikti = new AdresDizayn();
adresCikti.DataSource = qryAdres.dataSet;
adresCikti.odeme = ODEME_TIPI.Text;
adresCikti.kargo = KARGO_FIRMASI.Text;
adresCikti.tarih = TARIH.Text;
for (int i = 0; i < Convert.ToInt32(adet); i++)
{
adresCikti.Print(yazici);
}
ArsMessage.ShowMessage("Bilgi", "Adres Yazıcıya İletildi");
}
private void miBarkodYazdir_Click(object sender, EventArgs e)
{
ArsSQLQry qryBelge = new ArsSQLQry();
qryBelge.SQLText = "SELECT YAZDIRMA_DURUM FROM [" + UstBilgiTablo + "] WHERE /*WS*/BELGE_NO = '" + BELGE_NO.GetDataStr() + "' AND " +
"ISNULL(YAZDIRMA_DURUM, 0) <= 3/*WE*/";
qryBelge.Open();
if (qryBelge.Found())
{
qryBelge.Mode = EnmQryMode.Update;
qryBelge.SetInt("YAZDIRMA_DURUM", 4);
qryBelge.Exec();
}
string yazici = ArsLibrary.GetParamStr("FATURA", "BARKOD_YAZICI");
double adet = ArsLibrary.GetParamFloat("FATURA", "BARKOD_CIKTI_SAYISI");
ArsSQLQry qryCari = new ArsSQLQry();
qryCari.SQLText = "SELECT TOP 1 ADRES.IL_ADI, ADRES.ADRES FROM [TBLCARIADRES] ADRES, " + UstBilgiTablo + " FAT " +
"WHERE /*WS*/ADRES.CARI_KODU = '" + CARI_KODU.GetDataStr() + "' AND FAT.CARI_KODU = '" + CARI_KODU.GetDataStr() + "' AND ADRES.ADRES_BASLIGI = FAT.KARGO_ADRES AND FAT.BELGE_NO = '" + BELGE_NO.GetDataStr() + "'/*WE*/";
qryCari.Open();
BarkodDizayn barkodCikti = new BarkodDizayn();
barkodCikti.DataSource = qryCari.dataSet;
barkodCikti.barkodStr = KARGO_NO.Text;
barkodCikti.hat = qryCari.GetString("IL_ADI");
barkodCikti.aliciAd = qryCari.GetString("ADRES");
barkodCikti.gondAd = "Horozluhan, Okurlar Sk. No:9, 42110 Horozluhan Osb/Selçuklu/Konya";
barkodCikti.odemeTip = ODEME_TIPI.Text;
for (int i = 0; i < Convert.ToInt32(adet); i++)
{
barkodCikti.Print(yazici);
}
ArsMessage.ShowMessage("Bilgi", "Barkod Yazıcıya İletildi");
}
