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