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 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 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"); } }
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 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 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 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; } }