private void UploadBankDetail() { lblTableName.Text = "BankDetail Is Uploading"; string Physical = GlobalVar.DbfUpload + "\\" + "TMPDBANK.DBF"; files.Add(Physical); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_BankDetail")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); dt = db.Commands[0].ExecuteDataTable(); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idbank", "idbank", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("iddbank", "iddbank", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("id_reg", "id_reg", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("tgl_tran", "tgl_tran", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_bbk", "no_bbk", Foxpro.enFoxproTypes.Char, 17)); fields.Add(new Foxpro.DataStruct("jns_tran", "jns_tran", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("nobgch", "nobgch", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("keterangan", "keterangan", Foxpro.enFoxproTypes.Char, 70)); fields.Add(new Foxpro.DataStruct("vta", "vta", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("debet", "debet", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("kredit", "kredit", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("tgl_bank", "tgl_bank", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_rk", "tgl_rk", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("saldo", "saldo", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("link_rk", "link_rk", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("kode", "kode", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("sub", "sub", Foxpro.enFoxproTypes.Char, 11)); //fields.Add(new Foxpro.DataStruct("catatan", "catatan", Foxpro.enFoxproTypes.Char, 20)); //fields.Add(new Foxpro.DataStruct("no_perk", "no_perk", Foxpro.enFoxproTypes.Char, 12)); progressBar1.Minimum = 0; progressBar1.Maximum = dt.Rows.Count; progressBar1.Value = 0; _countTable = _countTable + 1; lblCountTable.Text = _countTable.ToString() + " of 11"; foreach (DataRow dr in dt.Rows) { _countRow++; progressBar1.Increment(1); lblCountRow.Text = _countRow.ToString(); this.RefreshForm(); } Foxpro.WriteData(GlobalVar.DbfUpload, "TMPDBANK", fields, dt, progressBar1); }
private void UploadInden() { SqlDataReader dr; lblTableName.Text = "Inden Is Uploading"; string TableName = "Inden"; string FileName = "TMPHIND"; string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Physical); files.Add(Indexing); List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idtr", "idtr", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("no_bukti", "no_bukti", Foxpro.enFoxproTypes.Char, 17)); fields.Add(new Foxpro.DataStruct("collector", "collector", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("nm_coll", "nm_coll", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("rp_cash", "rp_cash", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_giro", "rp_giro", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_trf", "rp_trf", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("lbr_giro", "lbr_giro", Foxpro.enFoxproTypes.Numeric, 4)); fields.Add(new Foxpro.DataStruct("tgl_kasir", "tgl_kasir", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("kasir", "kasir", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("acc", "acc", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); //fields.Add(new Foxpro.DataStruct("rp_crd", "rp_crd", Foxpro.enFoxproTypes.Numeric, 14)); //fields.Add(new Foxpro.DataStruct("rp_dbt", "rp_dbt", Foxpro.enFoxproTypes.Numeric, 14)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("idtr", "IDTR")); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_Inden")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteData(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, progressBar1, lblCountRow, true); db.Close(); lblTableName.Text = ""; } using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, TableName)); db.Commands[0].Parameters.Add(new Parameter("@syncFlag", SqlDbType.Int, 0)); DataTable dt = db.Commands[0].ExecuteDataTable(); Foxpro.InsertDeletedRecord(GlobalVar.DbfUpload + "\\", FileName, fields, dt, "idtr"); } }
private void UploadTransferBankDetail() { lblTableName.Text = "TransferBankDetail Is Uploading"; string Physical = GlobalVar.DbfUpload + "\\" + "TMPTRMT.DBF"; files.Add(Physical); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_TransferBankDetail")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); dt = db.Commands[0].ExecuteDataTable(); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idtrm", "idtrm", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("idbbm", "idbbm", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("asaltrf", "asaltrf", Foxpro.enFoxproTypes.Char, 30)); fields.Add(new Foxpro.DataStruct("namabank", "namabank", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("lokasi", "lokasi", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("nomor", "nomor", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("tgl_trf", "tgl_trf", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_bank", "tgl_bank", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("nominal", "nominal", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("maintitip", "maintitip", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("subtitip", "subtitip", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("mainpiut", "mainpiut", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("subpiut", "subpiut", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("idbank", "idbank", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("nm_banki", "nm_banki", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("no_perk", "no_perk", Foxpro.enFoxproTypes.Char, 6)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); //fields.Add(new Foxpro.DataStruct("titiperk", "titiperk", Foxpro.enFoxproTypes.Char, 12)); progressBar1.Minimum = 0; progressBar1.Maximum = dt.Rows.Count; progressBar1.Value = 0; _countTable = _countTable + 1; lblCountTable.Text = _countTable.ToString() + " of 11"; foreach (DataRow dr in dt.Rows) { _countRow++; progressBar1.Increment(1); lblCountRow.Text = _countRow.ToString(); this.RefreshForm(); } Foxpro.WriteData(GlobalVar.DbfUpload, "TMPTRMT", fields, dt, progressBar1); }
private void UploadBukti() { lblTableName.Text = "Bukti Is Uploading"; string Physical = GlobalVar.DbfUpload + "\\" + "TMPHBUK.DBF"; files.Add(Physical); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_Bukti")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); dt = db.Commands[0].ExecuteDataTable(); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idtr", "idtr", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("mk", "mk", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("jns_bukti", "jns_bukti", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("no_bukti", "no_bukti", Foxpro.enFoxproTypes.Char, 17)); fields.Add(new Foxpro.DataStruct("tgl_bukti", "tgl_bukti", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("kepada", "kepada", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("lampiran", "lampiran", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("pembukuan", "pembukuan", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("acc", "acc", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("kasir", "kasir", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("penerima", "penerima", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("jml_kas", "jml_kas", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("jml_bg", "jml_bg", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("lbr_bg", "lbr_bg", Foxpro.enFoxproTypes.Numeric, 3)); fields.Add(new Foxpro.DataStruct("jml_bs", "jml_bs", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); progressBar1.Minimum = 0; progressBar1.Maximum = dt.Rows.Count; progressBar1.Value = 0; _countTable = _countTable + 1; lblCountTable.Text = _countTable.ToString() + " of 11"; foreach (DataRow dr in dt.Rows) { _countRow++; progressBar1.Increment(1); lblCountRow.Text = _countRow.ToString(); this.RefreshForm(); } Foxpro.WriteData(GlobalVar.DbfUpload, "TMPHBUK", fields, dt, progressBar1); }
private void UploadVoucherJournal() { lblTableName.Text = "VoucherJournal Is Uploading"; string Physical = GlobalVar.DbfUpload + "\\" + "TMPHVOUC.DBF"; files.Add(Physical); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_VoucherJournal")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); dt = db.Commands[0].ExecuteDataTable(); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idvoucher", "idvoucher", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("tipe", "tipe", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("tgl_vch", "tgl_vch", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_vch", "no_vch", Foxpro.enFoxproTypes.Char, 17)); fields.Add(new Foxpro.DataStruct("uraian1", "uraian1", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("uraian2", "uraian2", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("uraian3", "uraian3", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("nilai", "nilai", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("dibuat", "dibuat", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("dibukukan", "dibukukan", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("mengetahui", "mengetahui", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("idbank", "idbank", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("nama_bank", "nama_bank", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); progressBar1.Minimum = 0; progressBar1.Maximum = dt.Rows.Count; progressBar1.Value = 0; _countTable = _countTable + 1; lblCountTable.Text = _countTable.ToString() + " of 11"; foreach (DataRow dr in dt.Rows) { _countRow++; progressBar1.Increment(1); lblCountRow.Text = _countRow.ToString(); this.RefreshForm(); } Foxpro.WriteData(GlobalVar.DbfUpload, "TMPHVOUC", fields, dt, progressBar1); }
private void UploadTransferBank() { lblTableName.Text = "TransferBank Is Uploading"; string Physical = GlobalVar.DbfUpload + "\\" + "TMPHTRF.DBF"; files.Add(Physical); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_TransferBank")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); dt = db.Commands[0].ExecuteDataTable(); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idbbm", "idbbm", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("tgl_bbm", "tgl_bbm", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_bbm", "no_bbm", Foxpro.enFoxproTypes.Char, 17)); fields.Add(new Foxpro.DataStruct("mk", "mk", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("id_bank", "id_bank", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("nm_bank", "nm_bank", Foxpro.enFoxproTypes.Char, 30)); fields.Add(new Foxpro.DataStruct("rp_trf", "rp_trf", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("dibukuan", "dibukuan", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("diketahui", "diketahui", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("kasir", "kasir", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("penyetor", "penyetor", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); progressBar1.Minimum = 0; progressBar1.Maximum = dt.Rows.Count; progressBar1.Value = 0; _countTable = _countTable + 1; lblCountTable.Text = _countTable.ToString() + " of 11"; foreach (DataRow dr in dt.Rows) { _countRow++; progressBar1.Increment(1); lblCountRow.Text = _countRow.ToString(); this.RefreshForm(); } Foxpro.WriteData(GlobalVar.DbfUpload, "TMPHTRF", fields, dt, progressBar1); }
private void UploadBuktiDetail() { lblTableName.Text = "BuktiDetail Is Uploading"; string Physical = GlobalVar.DbfUpload + "\\" + "TMPDBUK.DBF"; files.Add(Physical); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_BuktiDetail")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); dt = db.Commands[0].ExecuteDataTable(); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idrec", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("idtr", "idtr", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("idbs", "idbs", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("kode", "kode", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("sub", "sub", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("no_perk", "no_perk", Foxpro.enFoxproTypes.Char, 12)); fields.Add(new Foxpro.DataStruct("uraian", "uraian", Foxpro.enFoxproTypes.Char, 73)); fields.Add(new Foxpro.DataStruct("jumlah", "jumlah", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("ch_gb_no", "ch_gb_no", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("bank", "bank", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("tgl_jt", "tgl_jt", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); progressBar1.Minimum = 0; progressBar1.Maximum = dt.Rows.Count; progressBar1.Value = 0; _countTable = _countTable + 1; lblCountTable.Text = _countTable.ToString() + " of 11"; foreach (DataRow dr in dt.Rows) { _countRow++; progressBar1.Increment(1); lblCountRow.Text = _countRow.ToString(); this.RefreshForm(); } Foxpro.WriteData(GlobalVar.DbfUpload, "TMPDBUK", fields, dt, progressBar1); }
private void UploadIndenSubDetail() { SqlDataReader dr; lblTableName.Text = "IndenSubDetail Is Uploading"; string TableName = "IndenSubDetail"; string FileName = "TMPTAGIH"; string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; string Fpt = GlobalVar.DbfUpload + "\\" + FileName + ".fpt"; files.Add(Physical); files.Add(Indexing); files.Add(Fpt); List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idrec", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("id_coltoko", "id_coltoko", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("idwil", "idwil", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("Namatoko", "Namatoko", Foxpro.enFoxproTypes.Char, 31)); fields.Add(new Foxpro.DataStruct("no_reg", "no_reg", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("no_bpp", "no_bpp", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("tgl_bpp", "tgl_bpp", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_kasir", "tgl_kasir", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("rp_nota", "rp_nota", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_bayar", "rp_bayar", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_tagih", "rp_tagih", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_nominal", "rp_nominal", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("nota", "nota", Foxpro.enFoxproTypes.Memo, 4)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("idrec", "IDREC")); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_UPLIND_IndenSubDetail")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@initCabang", SqlDbType.VarChar, txtInitCabang.Text)); db.Commands[0].Parameters.Add(new Parameter("@bankID", SqlDbType.VarChar, lookupBank1.BankID)); db.Commands[0].Parameters.Add(new Parameter("@WilID", SqlDbType.VarChar, txtWilID.Text)); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteData(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, progressBar1, lblCountRow, true); db.Close(); lblTableName.Text = ""; } using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, TableName)); db.Commands[0].Parameters.Add(new Parameter("@syncFlag", SqlDbType.Int, 0)); DataTable dt = db.Commands[0].ExecuteDataTable(); Foxpro.InsertDeletedRecord(GlobalVar.DbfUpload + "\\", FileName, fields, dt, "idrec"); } }