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