private void UploadReIDWil() { SqlDataReader dr; lblTableName.Text = "ReWilID Is Uploading"; string TableName = "ReIDWil"; string FileName = "wiltmp"; string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Physical); files.Add(Indexing); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("id_rec", "id_rec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("tanggal", "tanggal", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("idwil", "idwil", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("oldwil", "oldwil", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("keterangan", "keterangan", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("lrefresh", "lrefresh", Foxpro.enFoxproTypes.Char, 1)); 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("id_rec", "id_rec")); using (Database db = new Database(GlobalVar.DBName)) { db.Commands.Add(db.CreateCommand("psp_VWIL_Upload")); db.Commands[0].Parameters.Add(new Parameter("@initPerusahaan", SqlDbType.VarChar, txtInitPerusahaan.Text)); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, progressBar1, lblCountRow); 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 UploadBO() { SqlDataReader dr; string FileName = "Hhbotmp"; string FileName2 = "Dhbotmp"; try { this.Cursor = Cursors.WaitCursor; refreshForm(); #region Header BO string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; string Fpt = GlobalVar.DbfUpload + "\\" + FileName + ".fpt"; files.Add(Indexing); files.Add(Physical); files.Add(Fpt); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idhtr", "idhtr", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("cab1", "cab1", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("cab2", "cab2", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("cab3", "cab3", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("no_rq", "no_rq", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_rq", "tgl_rq", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_do", "no_do", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_do", "tgl_do", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_nota", "no_nota", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_nota", "tgl_nota", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_sj", "no_sj", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_sj", "tgl_sj", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_trm", "tgl_trm", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("hr_krdt", "hr_krdt", Foxpro.enFoxproTypes.Numeric, 3)); fields.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("kd_sales", "kd_sales", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("nm_toko", "nm_toko", Foxpro.enFoxproTypes.Char, 31)); fields.Add(new Foxpro.DataStruct("al_kirim", "al_kirim", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("kota", "kota", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("rp_jual", "rp_jual", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_jual2", "rp_jual2", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_jual3", "rp_jual3", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_net", "rp_net", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_net2", "rp_net2", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("rp_net3", "rp_net3", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("disc_1", "disc_1", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("disc_2", "disc_2", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("disc_3", "disc_3", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("pot_rp", "pot_rp", Foxpro.enFoxproTypes.Numeric, 12)); fields.Add(new Foxpro.DataStruct("pot_rp2", "pot_rp2", Foxpro.enFoxproTypes.Numeric, 12)); fields.Add(new Foxpro.DataStruct("pot_rp3", "pot_rp3", Foxpro.enFoxproTypes.Numeric, 12)); fields.Add(new Foxpro.DataStruct("rp_fee1", "rp_fee1", Foxpro.enFoxproTypes.Numeric, 11)); fields.Add(new Foxpro.DataStruct("rp_fee2", "rp_fee2", Foxpro.enFoxproTypes.Numeric, 11)); fields.Add(new Foxpro.DataStruct("expedisi", "expedisi", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("laudit", "laudit", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("id_disc", "id_disc", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("catatan", "catatan", Foxpro.enFoxproTypes.Memo, 4)); fields.Add(new Foxpro.DataStruct("catatan1", "catatan1", Foxpro.enFoxproTypes.Char, 40)); fields.Add(new Foxpro.DataStruct("catatan2", "catatan2", Foxpro.enFoxproTypes.Char, 40)); fields.Add(new Foxpro.DataStruct("catatan3", "catatan3", Foxpro.enFoxproTypes.Char, 40)); fields.Add(new Foxpro.DataStruct("catatan4", "catatan4", Foxpro.enFoxproTypes.Char, 40)); fields.Add(new Foxpro.DataStruct("catatan5", "catatan5", Foxpro.enFoxproTypes.Char, 40)); fields.Add(new Foxpro.DataStruct("no_dobo", "no_dobo", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_reord", "tgl_reord", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("lbo", "lbo", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("id_link", "id_link", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("id_tr", "id_tr", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("hari_krm", "hari_krm", Foxpro.enFoxproTypes.Numeric, 3)); fields.Add(new Foxpro.DataStruct("hari_sls", "hari_sls", Foxpro.enFoxproTypes.Numeric, 3)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("no_acc", "no_acc", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("shift", "shift", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("checker_1", "checker_1", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("checker_2", "checker_2", Foxpro.enFoxproTypes.Char, 11)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("idhtr", "IDHTR")); #endregion #region Detail BO string Physical2 = GlobalVar.DbfUpload + "\\" + FileName2 + ".dbf"; string Indexing2 = GlobalVar.DbfUpload + "\\" + FileName2 + ".cdx"; files.Add(Indexing2); files.Add(Physical2); if (File.Exists(Physical2)) { File.Delete(Physical2); } List <Foxpro.DataStruct> fields2 = new List <Foxpro.DataStruct>(); fields2.Add(new Foxpro.DataStruct("idrec", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("idhtr", "idhtr", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("id_brg", "id_brg", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("nama_stok", "nama_stok", Foxpro.enFoxproTypes.Char, 73)); fields2.Add(new Foxpro.DataStruct("klp", "klp", Foxpro.enFoxproTypes.Char, 3)); fields2.Add(new Foxpro.DataStruct("j_rq", "j_rq", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("j_do", "j_do", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("j_sj", "j_sj", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("j_nota", "j_nota", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("j_retur", "j_retur", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("j_koli", "j_koli", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("koli_awal", "koli_awal", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("koli_akhir", "koli_akhir", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("no_koli", "no_koli", Foxpro.enFoxproTypes.Char, 15)); fields2.Add(new Foxpro.DataStruct("satuan", "satuan", Foxpro.enFoxproTypes.Char, 3)); fields2.Add(new Foxpro.DataStruct("catatan", "catatan", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("tgl_sj", "tgl_sj", Foxpro.enFoxproTypes.DateTime, 8)); fields2.Add(new Foxpro.DataStruct("h_jual", "h_jual", Foxpro.enFoxproTypes.Numeric, 7)); fields2.Add(new Foxpro.DataStruct("h_pokok", "h_pokok", Foxpro.enFoxproTypes.Numeric, 7)); fields2.Add(new Foxpro.DataStruct("hpp_solo", "hpp_solo", Foxpro.enFoxproTypes.Numeric, 7)); fields2.Add(new Foxpro.DataStruct("disc_1", "disc_1", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("disc_2", "disc_2", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("disc_3", "disc_3", Foxpro.enFoxproTypes.Numeric, 5)); fields2.Add(new Foxpro.DataStruct("pot_rp", "pot_rp", Foxpro.enFoxproTypes.Numeric, 12)); fields2.Add(new Foxpro.DataStruct("id_disc", "id_disc", Foxpro.enFoxproTypes.Char, 7)); fields2.Add(new Foxpro.DataStruct("id_koreksi", "id_koreksi", Foxpro.enFoxproTypes.Char, 19)); fields2.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields2.Add(new Foxpro.DataStruct("no_bodo", "no_bodo", Foxpro.enFoxproTypes.Char, 7)); fields2.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields2.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 1)); fields2.Add(new Foxpro.DataStruct("no_acc", "no_acc", Foxpro.enFoxproTypes.Char, 7)); fields2.Add(new Foxpro.DataStruct("ket_koli", "ket_koli", Foxpro.enFoxproTypes.Char, 20)); List <Foxpro.IndexStruct> index2 = new List <Foxpro.IndexStruct>(); index2.Add(new Foxpro.IndexStruct("idhtr", "IDHTR")); #endregion using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_OrderPenjualan_UPLOAD_BO")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, txTglBO.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, txTglBO.ToDate)); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbUpload1, lblUploadCount, false); if (dr.NextResult()) { Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName2, fields2, dr, index2, this, pbUpload2, lblUploadCount, false); } dr.Close(); db.Close(); } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadTagihanDetail() { SqlDataReader dr; string FileName = "Dtagihan"; string TableName = "TagihanDetail"; label2.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; //lblProgress.Text = "Data 'Stok' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields2 = new List <Foxpro.DataStruct>(); fields2.Add(new Foxpro.DataStruct("idrec", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("id_reg", "id_reg", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("idkp", "idkp", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("idwil", "idwil", Foxpro.enFoxproTypes.Char, 7)); fields2.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields2.Add(new Foxpro.DataStruct("nama_toko", "nama_toko", Foxpro.enFoxproTypes.Char, 31)); fields2.Add(new Foxpro.DataStruct("kd_sales", "kd_sales", Foxpro.enFoxproTypes.Char, 11)); fields2.Add(new Foxpro.DataStruct("tgl_tr", "tgl_tr", Foxpro.enFoxproTypes.DateTime, 8)); fields2.Add(new Foxpro.DataStruct("no_tr", "no_tr", Foxpro.enFoxproTypes.Char, 7)); fields2.Add(new Foxpro.DataStruct("tgl_jt", "tgl_jt", Foxpro.enFoxproTypes.DateTime, 8)); fields2.Add(new Foxpro.DataStruct("rp_nota", "rp_nota", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_bayar", "rp_bayar", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_tagih", "rp_tagih", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("p_lama", "p_lama", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_giro", "rp_giro", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_cash", "rp_cash", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_trf", "rp_trf", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_mutasi", "rp_mutasi", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_pot", "rp_pot", Foxpro.enFoxproTypes.Numeric, 10)); fields2.Add(new Foxpro.DataStruct("rp_disc", "rp_disc", Foxpro.enFoxproTypes.Numeric, 10)); fields2.Add(new Foxpro.DataStruct("rp_retur", "rp_retur", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("no_bpp", "no_bpp", Foxpro.enFoxproTypes.Char, 10)); fields2.Add(new Foxpro.DataStruct("rp_only", "rp_only", Foxpro.enFoxproTypes.Numeric, 14)); fields2.Add(new Foxpro.DataStruct("rp_exp", "rp_exp", Foxpro.enFoxproTypes.Numeric, 12)); fields2.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields2.Add(new Foxpro.DataStruct("tgl_tagih", "tgl_tagih", Foxpro.enFoxproTypes.DateTime, 8)); fields2.Add(new Foxpro.DataStruct("flag", "flag", Foxpro.enFoxproTypes.Logical, 1)); fields2.Add(new Foxpro.DataStruct("ket", "ket", Foxpro.enFoxproTypes.Char, 30)); fields2.Add(new Foxpro.DataStruct("idtagih", "idtagih", Foxpro.enFoxproTypes.Char, 23)); fields2.Add(new Foxpro.DataStruct("nm_coll", "nm_coll", Foxpro.enFoxproTypes.Numeric, 10)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("id_reg", "ID_REG")); index.Add(new Foxpro.IndexStruct("kd_sales", "KD_SALES")); index.Add(new Foxpro.IndexStruct("idrec", "IDREC")); index.Add(new Foxpro.IndexStruct("idkp", "IDKP")); index.Add(new Foxpro.IndexStruct("kd_toko+id_reg", "KD_TOKO")); index.Add(new Foxpro.IndexStruct("id_match", "ID_MATCH")); index.Add(new Foxpro.IndexStruct("idkp+id_reg", "IDKPREG")); index.Add(new Foxpro.IndexStruct("idwil", "IDWIL")); index.Add(new Foxpro.IndexStruct("idtagih", "IDTAGIH")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_DATAPENUNJANG_UPLOAD_TagihanDetail")); 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.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields2, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); //lblProgress.Text = ""; } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadToko() { SqlDataReader dr; string FileName = "Toko"; string TableName = "Toko"; label2.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; //lblProgress.Text = "Data 'Toko' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("TokoID", "idtoko", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("NamaToko", "namatoko", Foxpro.enFoxproTypes.Char, 31)); fields.Add(new Foxpro.DataStruct("Alamat", "alamat", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("Kota", "kota", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("Telp", "notelp", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("WilID", "idwil", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("PenanggungJawab", "pngjwb", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("KodeToko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("PiutangB", "piutang_b", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("PiutangJ", "piutang_j", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("Plafon", "plafon", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("ToJual", "to_jual", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("ToRetPot", "to_retpot", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("JangkaWaktuKredit", "jkw_kredit", Foxpro.enFoxproTypes.Numeric, 3)); fields.Add(new Foxpro.DataStruct("Cab", "Cab", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("Cab1", "Cab1", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("Cabang2", "cab2", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("Tgl1st", "tgl1st", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("Exist", "exist", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("ClassID", "idclass", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("Catatan", "catatan", Foxpro.enFoxproTypes.Char, 73)); fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("HariKirim", "hari_krm", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("KodePos", "kd_pos", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("Grade", "grade", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("Plafon1st", "plafon_1st", Foxpro.enFoxproTypes.Numeric, 10)); fields.Add(new Foxpro.DataStruct("Flag", "flag", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("Bentrok", "bentrok", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("StatusAktif", "lpasif", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("HariSales", "hari_sls", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("Daerah", "daerah", Foxpro.enFoxproTypes.Char, 25)); fields.Add(new Foxpro.DataStruct("Propinsi", "propinsi", Foxpro.enFoxproTypes.Char, 30)); fields.Add(new Foxpro.DataStruct("AlamatRumah", "alm_rumah", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("Pengelola", "pengelola", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("TglLahir", "tgl_lahir", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("HP", "hp", Foxpro.enFoxproTypes.Char, 30)); fields.Add(new Foxpro.DataStruct("Status", "status", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("ThnBerdiri", "th_berdiri", Foxpro.enFoxproTypes.Char, 4)); fields.Add(new Foxpro.DataStruct("StatusRuko", "lruko", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("JmlCabang", "jml_cabang", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("JmlSales", "jml_sales", Foxpro.enFoxproTypes.Numeric, 2)); fields.Add(new Foxpro.DataStruct("Kinerja", "kinerja", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("BidangUsaha", "bdg_usaha", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("RefSales", "reff_sls", Foxpro.enFoxproTypes.Char, 35)); fields.Add(new Foxpro.DataStruct("RefCollector", "reff_col", Foxpro.enFoxproTypes.Char, 35)); fields.Add(new Foxpro.DataStruct("RefSupervisor", "reff_spv", Foxpro.enFoxproTypes.Char, 35)); fields.Add(new Foxpro.DataStruct("PlafonSurvey", "plf_survey", Foxpro.enFoxproTypes.Numeric, 13)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("kd_toko", "KD_TOKO")); index.Add(new Foxpro.IndexStruct("namatoko", "NAMATOKO")); index.Add(new Foxpro.IndexStruct("id_match", "ID_MATCH")); index.Add(new Foxpro.IndexStruct("idtoko", "IDTOKO")); index.Add(new Foxpro.IndexStruct("idwil", "IDWIL")); index.Add(new Foxpro.IndexStruct("kota", "KOTA")); index.Add(new Foxpro.IndexStruct("namatoko FOR .NOT.Toko.lpasif.AND..NOT.EMPTY(Toko.idwil)", "NAMATOKO0")); index.Add(new Foxpro.IndexStruct("namatoko FOR .NOT.Toko.lpasif", "NAMATOKO1")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_DATAPENUNJANG_UPLOAD_Toko")); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); //lblProgress.Text = ""; } using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, "Toko")); db.Commands[0].Parameters.Add(new Parameter("@syncFlag", SqlDbType.Int, 0)); DataTable dt = db.Commands[0].ExecuteDataTable(); Foxpro.InsertDeletedRecord(GlobalVar.DbfUpload + "\\", FileName, fields, dt, "kd_toko"); } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadStok() { SqlDataReader dr; string FileName = "sasstok"; string TableName = "Stok"; label2.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; //lblProgress.Text = "Data 'Stok' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("BarangID", "id_brg", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("Bundle", "bundel", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("NamaStok", "nama_stok", Foxpro.enFoxproTypes.Char, 73)); fields.Add(new Foxpro.DataStruct("KodeSolo", "kodesolo", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("HrgJual", "hjual", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("Hpp", "hpp", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("Kendaraan", "kendaraan", Foxpro.enFoxproTypes.Char, 43)); fields.Add(new Foxpro.DataStruct("NamaTertera", "nm_tertera", Foxpro.enFoxproTypes.Char, 43)); fields.Add(new Foxpro.DataStruct("PartNo", "partno", Foxpro.enFoxproTypes.Char, 21)); fields.Add(new Foxpro.DataStruct("Merek", "merek", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("Dibungkus", "dibungkus", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("SumberDr", "sumber_dr", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("ProsesID", "idproses", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("SatSolo", "sat_solo", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("Material", "material", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("SatJual", "sat_jual", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("HPPSolo", "hpp_solo", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("HPPSas", "hpp_sas", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("HPPSolo", "hppsolo", Foxpro.enFoxproTypes.Numeric, 8)); fields.Add(new Foxpro.DataStruct("KodeRak", "kd_rak", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("KodeRak1", "kd_rak1", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("KodeRak2", "kd_rak2", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("JB", "jb", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("StatusPasif", "lpasif", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("Flag1", "flag1", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("TglOpname", "tgl_opnm", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("TglAwal", "tgl_awal", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("QAwal", "q_awal", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("HariRataRata", "q_opnm", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("RppAwal", "rpp_awal", Foxpro.enFoxproTypes.Numeric, 12)); fields.Add(new Foxpro.DataStruct("QJual", "q_jual", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QBeli", "q_beli", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QReturJual", "q_retj", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QReturBeli", "q_retb", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QOrderJual", "q_ordj", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("PrediksiLamaKirim", "q_ordb", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QMutasi", "q_mutasi", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QKrsi", "q_krsi", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QAngd", "q_angd", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QSelisih", "q_slsh", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("QAkhir", "q_akhir", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("StokMin", "stokmin", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("StokMax", "stokmax", Foxpro.enFoxproTypes.Numeric, 9)); fields.Add(new Foxpro.DataStruct("IsiKoli", "isi_koli", Foxpro.enFoxproTypes.Numeric, 4)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("id_match", "ID_MATCH")); index.Add(new Foxpro.IndexStruct("idrec", "ID_REC")); index.Add(new Foxpro.IndexStruct("kodesolo", "KODESOLO")); index.Add(new Foxpro.IndexStruct("id_brg", "ID_BRG")); index.Add(new Foxpro.IndexStruct("nama_stok", "NAMA_STOK")); index.Add(new Foxpro.IndexStruct("kd_rak", "KD_RAK")); index.Add(new Foxpro.IndexStruct("kd_rak1", "KD_RAK1")); index.Add(new Foxpro.IndexStruct("kd_rak2", "KD_RAK2")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_DATAPENUNJANG_UPLOAD_Stok")); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); //lblProgress.Text = ""; } using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, "Stok")); db.Commands[0].Parameters.Add(new Parameter("@syncFlag", SqlDbType.Int, 0)); DataTable dt = db.Commands[0].ExecuteDataTable(); Foxpro.InsertDeletedRecord(GlobalVar.DbfUpload + "\\", FileName, fields, dt, "id_brg"); } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadTagihanHeader() { SqlDataReader dr; string FileName = "htagihan"; string TableName = "TagihanHeader"; label2.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; //lblProgress.Text = "Data 'Stok' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("id_reg", "id_reg", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("no_reg", "no_reg", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("spasi", "spasi", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_reg", "tgl_reg", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("colector", "colector", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("nm_coll", "nm_coll", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("n_nota", "n_nota", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("n_bayar", "n_bayar", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("n_tagih", "n_tagih", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("wilayah", "wilayah", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("periode_1", "periode_1", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("periode_2", "periode_2", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("t_lama", "t_lama", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("nm_kasir", "nm_kasir", Foxpro.enFoxproTypes.Char, 10)); 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("rp_tunai", "rp_tunai", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("lbr_giro", "lbr_giro", Foxpro.enFoxproTypes.Numeric, 4)); fields.Add(new Foxpro.DataStruct("ntoko1", "ntoko1", Foxpro.enFoxproTypes.Numeric, 4)); fields.Add(new Foxpro.DataStruct("ntoko2", "ntoko2", Foxpro.enFoxproTypes.Numeric, 4)); fields.Add(new Foxpro.DataStruct("lbr_nota", "lbr_nota", Foxpro.enFoxproTypes.Numeric, 4)); fields.Add(new Foxpro.DataStruct("rp_only", "rp_only", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("tgl_kbl", "tgl_kbl", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 3)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("id_reg", "ID_REG")); index.Add(new Foxpro.IndexStruct("no_reg", "NO_REG")); index.Add(new Foxpro.IndexStruct("spasi + DTOS(tgl_reg)", "TGL_REG")); index.Add(new Foxpro.IndexStruct("id_match", "ID_MATCH")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_DATAPENUNJANG_UPLOAD_Tagihan_Header")); 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.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); //lblProgress.Text = ""; } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadSales() { SqlDataReader dr; string FileName = "sales"; string TableName = "Sales"; label2.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; //lblProgress.Text = "Data 'Sales' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("SalesID", "kd_sales", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("NamaSales", "nm_sales", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("RecID", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("TglLahir", "tgl_lahir", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("Alamat", "alamat", Foxpro.enFoxproTypes.Char, 30)); fields.Add(new Foxpro.DataStruct("Target", "target", Foxpro.enFoxproTypes.Numeric, 16)); fields.Add(new Foxpro.DataStruct("BatasOD", "batas_od", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("TglMasuk", "tgl_masuk", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("TglKeluar", "tgl_keluar", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("SalesID", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("NamaSales", "namatoko", Foxpro.enFoxproTypes.Char, 31)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("kd_sales", "KD_SALES")); index.Add(new Foxpro.IndexStruct("id_match", "ID_MATCH")); index.Add(new Foxpro.IndexStruct("nm_sales", "NM_SALES")); index.Add(new Foxpro.IndexStruct("idrec", "IDREC")); index.Add(new Foxpro.IndexStruct("kd_sales FOR EMPTY(Sales.tgl_keluar)", "KD_SALES1")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_DATAPENUNJANG_UPLOAD_Sales")); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); //lblProgress.Text = ""; } using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, "Sales")); db.Commands[0].Parameters.Add(new Parameter("@syncFlag", SqlDbType.Int, 0)); DataTable dt = db.Commands[0].ExecuteDataTable(); Foxpro.InsertDeletedRecord(GlobalVar.DbfUpload + "\\", FileName, fields, dt, "kd_sales"); } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadCollector() { SqlDataReader dr; string FileName = "colector"; string TableName = "Collector"; label2.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; //lblProgress.Text = "Data 'NotaPenjualanDetail' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("id_colect", "id_colect", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("kd_colec", "kd_colec", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("nm_colec", "nm_colec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("tgl_lahir", "tgl_lahir", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("alamat", "alamat", Foxpro.enFoxproTypes.Char, 30)); fields.Add(new Foxpro.DataStruct("target", "target", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("batas_od", "batas_od", Foxpro.enFoxproTypes.Numeric, 14)); fields.Add(new Foxpro.DataStruct("tgl_masuk", "tgl_masuk", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_keluar", "tgl_keluar", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("barang_a", "barang_a", Foxpro.enFoxproTypes.Numeric, 10)); fields.Add(new Foxpro.DataStruct("barang_b", "barang_b", Foxpro.enFoxproTypes.Numeric, 10)); fields.Add(new Foxpro.DataStruct("barang_c", "barang_c", Foxpro.enFoxproTypes.Numeric, 10)); fields.Add(new Foxpro.DataStruct("barang_e", "barang_e", Foxpro.enFoxproTypes.Numeric, 10)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("id_colect", "ID_COLECT")); index.Add(new Foxpro.IndexStruct("kd_colec", "KD_COLEC")); index.Add(new Foxpro.IndexStruct("nm_colec + kd_colec", "NM_COLEC")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_DATAPENUNJANG_UPLOAD_Collector")); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); //lblProgress.Text = ""; } using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, "Collector")); db.Commands[0].Parameters.Add(new Parameter("@syncFlag", SqlDbType.Int, 0)); DataTable dt = db.Commands[0].ExecuteDataTable(); Foxpro.InsertDeletedRecord(GlobalVar.DbfUpload + "\\", FileName, fields, dt, "id_colect"); } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadNotaPenjualanDetail() { ProgressBar pbSyncUpload = new ProgressBar(); TextBox lblProgress = new TextBox(); Label lbll = new Label(); lbll.Text = ""; SqlDataReader dr; DataRow[] drr = dsResult.Tables[1].Select("kategori='1' AND iddtr<>''"); pbSyncUpload.Value = 0; pbSyncUpload.Maximum = drr.Length; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; lblProgress.Text = "Data 'NotaPenjualanDetail' is Uploading..."; // refreshForm(); string Physical = FileName + ".dbf"; string Indexing = FileName + ".cdx"; if (File.Exists(Physical)) { File.Delete(Physical); } 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("nama_stok", "nama_stok", Foxpro.enFoxproTypes.Char, 73)); fields.Add(new Foxpro.DataStruct("klp", "Klp", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("j_rq", "j_rq", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("j_do", "j_do", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("j_sj", "j_sj", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("j_nota", "j_nota", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("j_koli", "j_koli", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("j_retur", "j_retur", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("koli_awal", "koli_awal", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("koli_akhir", "koli_akhir", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("no_koli", "no_koli", Foxpro.enFoxproTypes.Char, 15)); fields.Add(new Foxpro.DataStruct("satuan", "satuan", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("catatan", "catatan", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("tgl_sj", "tgl_sj", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("h_jual", "h_jual", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("h_pokok", "h_pokok", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("hpp_solo", "hpp_solo", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("disc_1", "disc_1", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("disc_2", "disc_2", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("disc_3", "disc_3", Foxpro.enFoxproTypes.Numeric, 5)); fields.Add(new Foxpro.DataStruct("pot_rp", "pot_rp", Foxpro.enFoxproTypes.Numeric, 12)); fields.Add(new Foxpro.DataStruct("id_disc", "id_disc", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("id_koreksi", "id_koreksi", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("no_bodo", "no_bodo", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("NPrint", "nprint", Foxpro.enFoxproTypes.Numeric, 1)); fields.Add(new Foxpro.DataStruct("no_acc", "no_acc", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("ket_koli", "ket_koli", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("id_brg", "id_brg", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("kd_gdg", "kd_gdg", Foxpro.enFoxproTypes.Char, 4)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); index.Add(new Foxpro.IndexStruct("idrec", "ID_REC")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("[psp_RSOPAC_UPLOAD_Retur_NotaPenjualanDetail]")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeNota.FromDate)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeNota.ToDate)); db.Commands[0].Parameters.Add(new Parameter("@Cabang", SqlDbType.Char, GlobalVar.CabangID)); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, progressBar1, lbll); db.Close(); } using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("usp_DeletedHistory_LIST")); db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, "NotaPenjualanDetail")); 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"); } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadTagihanDetail() { SqlDataReader dr; string FileName = "DTagihan" + GlobalVar.CabangID; string TableName = "TagihanDetail"; label1.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; lblProgress.Text = "Data 'TagihanDetail' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; //string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; //files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("HRecordID", "id_reg", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("KPRecID", "idkp", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("Flag", "flag", Foxpro.enFoxproTypes.Char, 73)); fields.Add(new Foxpro.DataStruct("TglInden", "tgl_tagih", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("RpNota", "rp_nota", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("RpBayar", "rp_bayar", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("RpTagih", "rp_tagih", Foxpro.enFoxproTypes.Char, 43)); fields.Add(new Foxpro.DataStruct("Keterangan", "ket", Foxpro.enFoxproTypes.Char, 43)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); //index.Add(new Foxpro.IndexStruct("idrec", "ID_REC")); using (Database db = new Database(GlobalVar.DBFinance)) { db.Commands.Add(db.CreateCommand("psp_POS_UPLOAD_TagihanDetail")); 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.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); lblProgress.Text = ""; } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadTagihan() { SqlDataReader dr; string FileName = "HTagihan" + GlobalVar.CabangID; string TableName = "Tagihan"; label1.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; lblProgress.Text = "Data 'Tagihan' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; //string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; //files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("RecordID", "id_reg", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("NoReg", "no_reg", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("TglReg", "tgl_reg", Foxpro.enFoxproTypes.Char, 73)); fields.Add(new Foxpro.DataStruct("TglKembali", "tgl_kbl", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("CollectorID", "nm_coll", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("Wilayah", "wilayah", Foxpro.enFoxproTypes.Numeric, 7)); fields.Add(new Foxpro.DataStruct("Periode1", "periode_1", Foxpro.enFoxproTypes.Char, 43)); fields.Add(new Foxpro.DataStruct("Periode2", "periode_2", Foxpro.enFoxproTypes.Char, 43)); fields.Add(new Foxpro.DataStruct("TLama", "t_lama", Foxpro.enFoxproTypes.Char, 21)); fields.Add(new Foxpro.DataStruct("Kasir", "nm_kasir", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("NPrint", "nprint", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 3)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); //index.Add(new Foxpro.IndexStruct("idrec", "ID_REC")); using (Database db = new Database(GlobalVar.DBFinance)) { db.Commands.Add(db.CreateCommand("psp_POS_UPLOAD_Tagihan")); 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.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); lblProgress.Text = ""; } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadCollector() { SqlDataReader dr; string FileName = "TmpCol" + GlobalVar.CabangID; string TableName = "Collector"; label1.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; lblProgress.Text = "Data 'Collector' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; //string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; //files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("CollectorID", "id_colect", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("Kode", "kd_colec", Foxpro.enFoxproTypes.Char, 31)); fields.Add(new Foxpro.DataStruct("Nama", "nm_colec", Foxpro.enFoxproTypes.Char, 60)); fields.Add(new Foxpro.DataStruct("TglLahir", "tgl_lahir", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("Alamat", "alamat", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("Target", "target", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("BatasOD", "batas_od", Foxpro.enFoxproTypes.Char, 20)); fields.Add(new Foxpro.DataStruct("TglMasuk", "tgl_masuk", Foxpro.enFoxproTypes.Char, 19)); fields.Add(new Foxpro.DataStruct("TglKeluar", "tgl_keluar", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("BarangA", "barang_a", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("BarangB", "barang_b", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("BarangC", "barang_c", Foxpro.enFoxproTypes.Numeric, 13)); fields.Add(new Foxpro.DataStruct("BarangE", "barang_e", Foxpro.enFoxproTypes.Numeric, 3)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); //index.Add(new Foxpro.IndexStruct("kd_toko", "KODE_TOKO")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_POS_UPLOAD_Collector")); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); lblProgress.Text = ""; } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }
private void UploadAntarGudang() { SqlDataReader dr; string FileName = "Hagtmp"; string TableName = "Antar Gudang"; label1.Text = TableName; try { this.Cursor = Cursors.WaitCursor; pbSyncUpload.Value = 0; lblProgress.Text = "Data 'Antar Gudang' is Uploading..."; refreshForm(); string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf"; //string Indexing = GlobalVar.DbfUpload + "\\" + FileName + ".cdx"; //files.Add(Indexing); files.Add(Physical); if (File.Exists(Physical)) { File.Delete(Physical); } List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>(); fields.Add(new Foxpro.DataStruct("idhkrmagud", "idhkrmagud", Foxpro.enFoxproTypes.Char, 23)); fields.Add(new Foxpro.DataStruct("dr_gud", "dr_gud", Foxpro.enFoxproTypes.Char, 4)); fields.Add(new Foxpro.DataStruct("ke_gud", "ke_gud", Foxpro.enFoxproTypes.Char, 4)); fields.Add(new Foxpro.DataStruct("tgl_krm", "tgl_krm", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_trm", "tgl_trm", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_ag", "no_ag", Foxpro.enFoxproTypes.Char, 11)); fields.Add(new Foxpro.DataStruct("pengirim", "pengirim", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("penerima", "penerima", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("drcheck1", "drcheck1", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("drcheck2", "drcheck2", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("kecheck1", "kecheck1", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("kecheck2", "kecheck2", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("catatan", "catatan", Foxpro.enFoxproTypes.Char, 43)); fields.Add(new Foxpro.DataStruct("exp", "exp", Foxpro.enFoxproTypes.Char, 3)); fields.Add(new Foxpro.DataStruct("no_kend", "no_kend", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("nm_sopir", "nm_sopir", Foxpro.enFoxproTypes.Char, 10)); fields.Add(new Foxpro.DataStruct("id_krmtrm", "id_krmtrm", Foxpro.enFoxproTypes.Char, 2)); fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1)); fields.Add(new Foxpro.DataStruct("no_bodo", "no_dobo", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("lbo", "lbo", Foxpro.enFoxproTypes.Logical, 1)); fields.Add(new Foxpro.DataStruct("nprint", "nprint", Foxpro.enFoxproTypes.Numeric, 1)); fields.Add(new Foxpro.DataStruct("no_rq", "no_rq", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_rq", "tgl_rq", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("no_do", "no_do", Foxpro.enFoxproTypes.Char, 7)); fields.Add(new Foxpro.DataStruct("tgl_do", "tgl_do", Foxpro.enFoxproTypes.DateTime, 8)); fields.Add(new Foxpro.DataStruct("tgl_sj", "tgl_sj", Foxpro.enFoxproTypes.DateTime, 8)); List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>(); //index.Add(new Foxpro.IndexStruct("idhkrmagud", "IDHKRMAGUD")); using (Database db = new Database()) { db.Commands.Add(db.CreateCommand("psp_POS_UPLOAD_AntarGudang")); db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, dt1)); db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, dt2)); db.Open(); dr = db.Commands[0].ExecuteReader(); Foxpro.WriteReaderToFile(GlobalVar.DbfUpload + "\\", FileName, fields, dr, index, this, pbSyncUpload, lblUploadCount); db.Close(); lblProgress.Text = ""; } } catch (Exception ex) { Error.LogError(ex); } finally { this.Cursor = Cursors.Default; } }