private void ExtractData(String FileName)
{
// string fileNameH = txtFileName.Text; // "datahi.dbf";
// fileNameH = GlobalVar.DbfDownload + "\\" + fileNameH;
if (File.Exists(FileName))
{
try
{
tblHeader = Foxpro.ReadFile(FileName);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
tblHeader.Columns.Add(newcol);
dataGridView1.DataSource = tblHeader;
dataGridView1.Columns["jumlah"].DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight; // ADP
dataGridView1.Columns["jumlah"].DefaultCellStyle.Format = "N2"; // ADP
label3.Text = "0/" + tblHeader.Rows.Count.ToString("#,##0");
progressBar1.Minimum = 0;
progressBar1.Maximum = tblHeader.Rows.Count;
//this.Title = fileNameH;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
}
private void Upload()
{
string Physical = GlobalVar.DbfUpload + "\\" + "datahi.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("Tanggal", "tanggal", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoDKN", "no_dkn", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("DK", "dk", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Cabang", "cabang", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("HRecordID", "idhead", Foxpro.enFoxproTypes.Char, 25));
fields.Add(new Foxpro.DataStruct("CD", "cd", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Src", "src", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("RecordID", "iddetail", Foxpro.enFoxproTypes.Char, 25));
fields.Add(new Foxpro.DataStruct("NoPerkiraan", "no_perk", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("Uraian", "uraian", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("Jumlah", "jumlah", Foxpro.enFoxproTypes.Numeric, 15));
fields.Add(new Foxpro.DataStruct("Dari", "dari", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("Tolak", "ltolak", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("Alasan", "alasan", Foxpro.enFoxproTypes.Char, 30));
fields.Add(new Foxpro.DataStruct("HrowID", "HrowID", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("dtRowID", "dtRowID", Foxpro.enFoxproTypes.Char, 50));
Foxpro.WriteFile(GlobalVar.DbfUpload, "datahi", fields, dt, pbUpload);
}
private void fill_Click(object sender, EventArgs e)
{
try
{
fpconn = new Foxpro(fpcondata);
periodo = periodotb.Text;
DataTable dt = fpconn.getMatriculas(periodo);
dt.Columns[0].ColumnName = "Matricula";
dt.Columns.Add(new DataColumn("Informacion"));
dt.Columns.Add(new DataColumn("Calificaciones"));
dt.Columns.Add(new DataColumn("Horario"));
dt.Columns.Add(new DataColumn("Kardex"));
Alumnos.DataSource = dt;
foreach (DataGridViewRow row in Alumnos.Rows)
{
row.HeaderCell.Value = String.Format("{0}", row.Index + 1);
}
//inicializar valores para el worker
cantAlumnos = Alumnos.Rows.Count;
aluTotal.Text = cantAlumnos.ToString();
upload.Enabled = true;
}
catch (Exception exc) {
MessageBox.Show(null, exc.Message, "Error");
}
}
private void UploadClosingGL()
{
DataTable dt = new DataTable();
string Physical = GlobalVar.DbfUpload + "\\" + "TutupTmp.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
string FromPeriode = rangeDateBox1.FromDate.Value.Year.ToString() + rangeDateBox1.FromDate.Value.Month.ToString().PadLeft(2, '0');
string ToPeriode = rangeDateBox1.ToDate.Value.Year.ToString() + rangeDateBox1.ToDate.Value.Month.ToString().PadLeft(2, '0');
using (Database db = new Database(GlobalVar.DBHoldingName))
{
db.Commands.Add(db.CreateCommand("psp_GL_UPLOAD_ClosingGL"));
db.Commands[0].Parameters.Add(new Parameter("@FromPeriode", SqlDbType.VarChar, FromPeriode));
db.Commands[0].Parameters.Add(new Parameter("@ToPeriode", SqlDbType.VarChar, ToPeriode));
db.Commands[0].Parameters.Add(new Parameter("@KodeGudang", SqlDbType.VarChar, GlobalVar.Gudang));
dt = db.Commands[0].ExecuteDataTable();
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("periode", "periode", Foxpro.enFoxproTypes.Char, 6));
fields.Add(new Foxpro.DataStruct("idcompany", "idcompany", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("kode", "kode", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("akhir", "akhir", Foxpro.enFoxproTypes.Numeric, 17));
fields.Add(new Foxpro.DataStruct("tgl_proses", "tgl_proses", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("hapus", "hapus", Foxpro.enFoxproTypes.Numeric, 1));
Foxpro.WriteFile(GlobalVar.DbfUpload, "TutupTmp", fields, dt);
}
private void ExtractData()
{
if (File.Exists(GlobalVar.DbfDownload + "\\ACCBNS11.zip"))
{
ExtractFile(GlobalVar.DbfDownload + "\\ACCBNS11.zip");
}
string fileName = GlobalVar.DbfDownload + "\\Bnstmp.dbf";
if (File.Exists(fileName))
{
try
{
dt = new DataTable();
dt = Foxpro.ReadFile(fileName);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
dt.Columns.Add(newcol);
dataGridView1.DataSource = dt;
lblDownloadStatus.Text = "0/" + dt.Rows.Count.ToString("#,##0");
progressBar1.Minimum = 0;
progressBar1.Maximum = dt.Rows.Count;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
}
private void Upload()
{
if (dtResult.Rows.Count == 0)
{
return;
}
pbUpload.Value = 0;
string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf";
if (File.Exists(Physical))
{
File.Delete(Physical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("HistoryID", "id_hist", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("RecordID", "id_stok", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("KodeBarang", "id_brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("TglAktif", "tmt", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("HPP", "hpp", Foxpro.enFoxproTypes.Numeric, 9));
fields.Add(new Foxpro.DataStruct("HPPAverage", "hpp_ave", Foxpro.enFoxproTypes.Numeric, 9));
fields.Add(new Foxpro.DataStruct("Satuan", "satuan", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("Keterangan", "keterangan", Foxpro.enFoxproTypes.Char, 43));
fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1));
//Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dtResult);
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dtResult, pbUpload);
}
private void cmdUPLOAD_Click(object sender, EventArgs e)
{
DataTable dt = new DataTable();
string Physical = GlobalVar.DbfUpload + "\\" + "BiayaTmp.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
using (Database db = new Database(GlobalVar.DBHoldingName))
{
db.Commands.Add(db.CreateCommand("psp_AccBy_UPLOAD_Perkiraan"));
dt = db.Commands[0].ExecuteDataTable();
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("no_perk", "No_perk", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("uraian", "Uraian", Foxpro.enFoxproTypes.Char, 70));
fields.Add(new Foxpro.DataStruct("rowid", "RowID", Foxpro.enFoxproTypes.Char, 36));
Foxpro.WriteFile(GlobalVar.DbfUpload, "BiayaTmp", fields, dt);
ZipFile(files);
MessageBox.Show(Messages.Confirm.ProcessFinished + ". Lokasi file: " + GlobalVar.DbfUpload + "\\tbKodePerkiraanACCBiaya.zip");
}
private void ExtractData()
{
if (File.Exists(GlobalVar.DbfDownload + "\\dbfmatch.zip"))
{
ExtractFile(GlobalVar.DbfDownload + "\\dbfmatch.zip");
}
string fileNameH = "POT" + GlobalVar.Gudang + ".dbf";
fileNameH = GlobalVar.DbfDownload + "\\" + fileNameH;
if (File.Exists(fileNameH))
{
try
{
tblHeader = Foxpro.ReadFile(fileNameH);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
tblHeader.Columns.Add(newcol);
dataGridView1.DataSource = tblHeader;
lblDownloadStatus1.Text = "0/" + tblHeader.Rows.Count.ToString("#,##0");
progressBar1.Minimum = 0;
progressBar1.Maximum = tblHeader.Rows.Count;
this.Title = fileNameH;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
}
private void UploadJournalDetail()
{
DataTable dt = new DataTable();
string Physical = GlobalVar.DbfUpload + "\\" + "TransactTmp.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
using (Database db = new Database(GlobalVar.DBName))
{
db.Commands.Add(db.CreateCommand("psp_GL_UPLOAD_JournalDetail"));
db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, rangeDateBox1.FromDate));
db.Commands[0].Parameters.Add(new Parameter("@toDate", SqlDbType.DateTime, rangeDateBox1.ToDate));
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("idtrans", "idtrans", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("no_perk", "no_perk", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("uraian", "uraian", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("debet", "debet", Foxpro.enFoxproTypes.Numeric, 15));
fields.Add(new Foxpro.DataStruct("kredit", "kredit", Foxpro.enFoxproTypes.Numeric, 15));
fields.Add(new Foxpro.DataStruct("dk", "dk", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("tanggal", "tanggal", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("lsub", "lsub", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("hapus", "hapus", Foxpro.enFoxproTypes.Numeric, 1));
Foxpro.WriteFile(GlobalVar.DbfUpload, "TransactTmp", fields, dt);
}
private void UploadPerkiraan()
{
DataTable dt = new DataTable();
string Physical = GlobalVar.DbfUpload + "\\" + "NoPerkTmp.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
using (Database db = new Database(GlobalVar.DBHoldingName))
{
db.Commands.Add(db.CreateCommand("psp_GL_UPLOAD_Perkiraan"));
if (rbChanged.Checked)
{
db.Commands[0].Parameters.Add(new Parameter("@fromDate", SqlDbType.DateTime, dateStart.DateValue));
}
db.Commands[0].Parameters.Add(new Parameter("@CabangID", SqlDbType.VarChar, _CabangID));
dt = db.Commands[0].ExecuteDataTable();
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("ref", "ref", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("no_perk", "no_perk", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("uraian", "uraian", Foxpro.enFoxproTypes.Char, 70));
fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("hapus", "hapus", Foxpro.enFoxproTypes.Numeric, 1));
fields.Add(new Foxpro.DataStruct("rowid", "rowid", Foxpro.enFoxproTypes.Char, 36));
fields.Add(new Foxpro.DataStruct("old_perk", "old_perk", Foxpro.enFoxproTypes.Char, 12));
Foxpro.WriteFile(GlobalVar.DbfUpload, "NoPerkTmp", fields, dt);
}
private void TableDeleteKor(string fileName, string isaColName, string foxproColName)
{
string tableName = "";
DataTable dt = Foxpro.ReadDeletedFile(_fileName);
using (Database db = new Database())
{
db.Commands.Add(db.CreateCommand("psp_POS_DELETE_TABLE"));
foreach (DataRow dr in dt.Rows)
{
if (Tools.isNull(dr["Sumber"], "").ToString().Trim() == "NPJ")
{
tableName = "KoreksiPenjualan";
}
if (Tools.isNull(dr["Sumber"], "").ToString().Trim() == "NRJ")
{
tableName = "KoreksiReturPenjualan";
}
if (Tools.isNull(dr["Sumber"], "").ToString().Trim() == "NPB")
{
tableName = "KoreksiPembelian";
}
if (Tools.isNull(dr["Sumber"], "").ToString().Trim() == "NRB")
{
tableName = "KoreksiReturPembelian";
}
db.Commands[0].Parameters.Clear();
db.Commands[0].Parameters.Add(new Parameter("@tableName", SqlDbType.VarChar, tableName));
db.Commands[0].Parameters.Add(new Parameter("@columnKeyName", SqlDbType.VarChar, isaColName));
db.Commands[0].Parameters.Add(new Parameter("@columnKeyValue", SqlDbType.VarChar, Tools.isNull(dr[foxproColName], "").ToString().Trim()));
db.Commands[0].ExecuteNonQuery();
}
}
}
private void UploadDBF()
{
string dbfFile = GlobalVar.DbfUpload + "\\" + _dbfName + ".dbf";
if (File.Exists(dbfFile))
{
File.Delete(dbfFile);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("KodeSales", "kd_sales", Foxpro.enFoxproTypes.Char, 11));
fields.Add(new Foxpro.DataStruct("Periode", "periode", Foxpro.enFoxproTypes.Char, 15));
fields.Add(new Foxpro.DataStruct("Tanggal", "tanggal", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoACC", "no_acc", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("TglACC", "tgl_acc", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("RpBonus", "rp_bonus", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("RpACC", "rp_acc", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("nPrint", "nprint", Foxpro.enFoxproTypes.Numeric, 1));
fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("LinkID", "id_link", Foxpro.enFoxproTypes.Char, 1));
Foxpro.WriteFile(GlobalVar.DbfUpload, _dbfName, fields, dt, progressBar1);
}
private void Upload2(String FileName)
{
string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf";
if (File.Exists(Physical))
{
File.Delete(Physical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("Iddkrmagud", "Iddkrmagud", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Idhkrmagud", "Idhkrmagud", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Id_Brg", "Id_Brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Nama_stok", "Nama_stok", Foxpro.enFoxproTypes.Char, 73));
fields.Add(new Foxpro.DataStruct("Qty_krm", "Qty_krm", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("Qty_trm", "Qty_trm", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("Catatan", "Catatan", Foxpro.enFoxproTypes.Char, 20));
fields.Add(new Foxpro.DataStruct("HPP", "hpp", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("Ongkos", "Ongkos", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("drGud", "Drgud", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("keGud", "Kegud", 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("Id_match", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Qty_do", "Qty_do", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("No_bodo", "No_bodo", Foxpro.enFoxproTypes.Char, 7));
List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>();
index.Add(new Foxpro.IndexStruct("idhkrmagud", "IDHKRMAGUD"));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[1], DetailprogressBar, index);
}
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 Upload1(String FileName)
{
string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf";
if (File.Exists(Physical))
{
File.Delete(Physical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("TrID", "Idtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("PotID", "Idpot", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Nopot", "Nopot", Foxpro.enFoxproTypes.Char, 11));
fields.Add(new Foxpro.DataStruct("TglPot", "Tgl_pot", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Dil", "Dil", Foxpro.enFoxproTypes.Numeric, 8));
fields.Add(new Foxpro.DataStruct("Disc", "Disc", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("TglACC", "Tgl_acc", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("RpNet", "Rp_net", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("Catatan", "Catatan", Foxpro.enFoxproTypes.Char, 17));
fields.Add(new Foxpro.DataStruct("DilACC", "Dil_acc", Foxpro.enFoxproTypes.Numeric, 11));
fields.Add(new Foxpro.DataStruct("CatACC", "Cat_acc", Foxpro.enFoxproTypes.Char, 17));
fields.Add(new Foxpro.DataStruct("DiscACC", "Disc_acc", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("Dib", "Dib", Foxpro.enFoxproTypes.Numeric, 8));
fields.Add(new Foxpro.DataStruct("Dib_ACC", "Dib_acc", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("IdLink", "Id_link", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("KodeToko", "Kd_toko", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("StatusACC", "Acc", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("SyncFlag", "Id_match", Foxpro.enFoxproTypes.Char, 1));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[0], HeaderprogressBar);
}
private void Upload1(String FileName)
{
string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf";
if (File.Exists(Physical))
{
File.Delete(Physical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
/*
* HrbTemp (Idretur,No_mpr,No_retur,Tgl_retur,Pemasok,Penerima,Tgl_keluar,;
* Rp_nilai,Pengirim,Id_match,Laudit,Nprint)
*
*/
fields.Add(new Foxpro.DataStruct("Idretur", "Idretur", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("No_mpr", "No_mpr", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("No_retur", "No_retur", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Tgl_retur", "Tgl_retur", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Pemasok", "Pemasok", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("Penerima", "Penerima", Foxpro.enFoxproTypes.Char, 17));
fields.Add(new Foxpro.DataStruct("Tgl_keluar", "Tgl_keluar", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Rp_nilai", "Rp_nilai", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("Pengirim", "Pengirim", Foxpro.enFoxproTypes.Char, 17));
fields.Add(new Foxpro.DataStruct("Id_match", "Id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Laudit", "Laudit", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("Nprint", "Nprint", Foxpro.enFoxproTypes.Numeric, 1));
List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>();
index.Add(new Foxpro.IndexStruct("Idretur", "IDRETUR"));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[0], HeaderprogressBar, index);
}
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 frmDODownload11_Load(object sender, EventArgs e)
{
string fileNameH = "htjtmp.DBF";
string fileNameD = "dtjtmp.DBF";
string fileZIPName = "DBFMATCH";
fileNameH = GlobalVar.DbfDownload + "\\" + fileNameH;
fileNameD = GlobalVar.DbfDownload + "\\" + fileNameD;
if (UnzipFile(fileZIPName, fileNameH, fileNameD))
{
if (File.Exists(fileNameH))
{
try
{
tblHeader = Foxpro.ReadFile(fileNameH);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
tblHeader.Columns.Add(newcol);
dataGridView1.DataSource = tblHeader;
lblDownloadStatus1.Text = "0/" + tblHeader.Rows.Count.ToString("#,##0");
progressBar1.Minimum = 0;
progressBar1.Maximum = tblHeader.Rows.Count;
this.Title = fileNameH;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
if (File.Exists(fileNameD))
{
try
{
tblDetail = Foxpro.ReadFile(fileNameD);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
tblDetail.Columns.Add(newcol);
dataGridView2.DataSource = tblDetail;
lblDownloadStatus2.Text = "0/" + tblDetail.Rows.Count.ToString("#,##0");
progressBar2.Minimum = 0;
progressBar2.Maximum = tblDetail.Rows.Count;
this.Title = fileNameD;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
dataGridView1.AutoGenerateColumns = true;
dataGridView2.AutoGenerateColumns = true;
}
}
private void LoadFile()
{
string fileName = lookupGudang.GudangID + GlobalVar.Gudang;
string fileName1 = fileName + "\\Htjtmp.dbf";
string fileName2 = fileName + "\\Dtjtmp.dbf";
string fileZIPName = fileName + ".zip";
fileName1 = GlobalVar.DbfDownload + "\\" + fileName1;
fileName2 = GlobalVar.DbfDownload + "\\" + fileName2;
fileZIPName = GlobalVar.DbfDownload + "\\" + fileZIPName;
if (UnzipFile(fileName, fileName1, fileName2))
{
if (File.Exists(fileName1) && File.Exists(fileName2))
{
try
{
dt1 = Foxpro.ReadFile(fileName1);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
dt1.Columns.Add(newcol);
gvDownload1.DataSource = dt1;
lblDownloadCount1.Text = "0/" + dt1.Rows.Count.ToString("#,##0");
pbDownload1.Minimum = 0;
pbDownload1.Maximum = dt1.Rows.Count;
lblInfo1.Text = fileName1;
dt2 = Foxpro.ReadFile(fileName2);
DataColumn newcol2 = new DataColumn("cUploaded");
newcol2.DataType = Type.GetType("System.Boolean");
dt2.Columns.Add(newcol2);
gvDownload2.DataSource = dt2;
lblDownloadCount2.Text = "0/" + dt2.Rows.Count.ToString("#,##0");
pbDownload2.Minimum = 0;
pbDownload2.Maximum = dt2.Rows.Count;
lblInfo2.Text = fileName2;
pbDownload1.Value = 0;
pbDownload2.Value = 0;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
else
{
lblInfo1.Text = "File " + fileName1 + " tidak ada.";
lblInfo2.Text = "File " + fileName2 + " tidak ada.";
cmdDownload.Enabled = false;
MessageBox.Show("File: " + fileName1 + " / " + fileName2 + " tidak ada. Mohon cek kembali file tersebut apakah sudah ada dilokasi file yang sudah ditentukan.", "Download", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
}
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 frmOrderSheetDownload_Load(object sender, EventArgs e)
{
string headerFileName = "hostmp.dbf";
string detailFileName = "dostmp.dbf";
string zipFileName = "DataOS00";
headerFileName = GlobalVar.DbfDownload + "\\" + headerFileName;
detailFileName = GlobalVar.DbfDownload + "\\" + detailFileName;
if (UnzipFile(zipFileName, headerFileName, detailFileName))
{
if (File.Exists(headerFileName))
{
try
{
_dtHeader = Foxpro.ReadFile(headerFileName);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
_dtHeader.Columns.Add(newcol);
dgvHeader.DataSource = _dtHeader;
progressBar1.Minimum = 0;
progressBar1.Maximum = _dtHeader.Rows.Count;
this.Title = headerFileName;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
if (File.Exists(detailFileName))
{
try
{
_dtDetail = Foxpro.ReadFile(detailFileName);
DataColumn newcol = new DataColumn("cUploaded");
newcol.DataType = Type.GetType("System.Boolean");
_dtDetail.Columns.Add(newcol);
dgvDetail.DataSource = _dtDetail;
progressBar2.Minimum = 0;
progressBar2.Maximum = _dtDetail.Rows.Count;
this.Title = detailFileName;
this.DialogResult = DialogResult.OK;
}
catch (Exception ex)
{
Error.LogError(ex);
}
}
dgvHeader.AutoGenerateColumns = true;
dgvDetail.AutoGenerateColumns = true;
}
}
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 Upload()
{
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("Tanggal", "tanggal", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoDKN", "no_dkn", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("DK", "dk", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Cabang", "cabang", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("HRecordID", "idhead", Foxpro.enFoxproTypes.Char, 25));
fields.Add(new Foxpro.DataStruct("CD", "cd", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Src", "src", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("RecordID", "iddetail", Foxpro.enFoxproTypes.Char, 25));
fields.Add(new Foxpro.DataStruct("NoPerkiraan", "no_perk", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("Uraian", "uraian", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("Jumlah", "jumlah", Foxpro.enFoxproTypes.Numeric, 15));
fields.Add(new Foxpro.DataStruct("Dari", "dari", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("Tolak", "ltolak", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("Alasan", "alasan", Foxpro.enFoxproTypes.Char, 30));
fields.Add(new Foxpro.DataStruct("HeaderRowID", "HRowID", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("RowID", "DtRowID", Foxpro.enFoxproTypes.Char, 50));
var dataRows =
from dataRows1 in dtH.AsEnumerable()
join dataRows2 in dt.AsEnumerable()
on dataRows1.Field <Guid>("GroupRowID") equals dataRows2.Field <Guid>("HeaderRowID")
where ((bool)Tools.isNull(dataRows1["UploadKe00"], false) == true)
select dataRows2; // + dataRows2;
if (dataRows.Count() > 0)
{
dtUpload = dataRows.CopyToDataTable();
DataTable dt1 = new DataTable();
string fileDbf = txtFolder.Text.Trim() + "\\datahi.dbf";
string fileZip;
var _cabang = (from r in dtUpload.AsEnumerable() select r["Cabang"]).Distinct().ToList();
foreach (var c in _cabang)
{
IEnumerable <DataRow> dr = dtUpload.Select("Cabang='" + c + "'");
dt1 = dr.CopyToDataTable();
if (File.Exists(fileDbf))
{
File.Delete(fileDbf);
}
fileZip = txtFolder.Text.Trim() + "\\dkn_" + c + ".zip";
if (File.Exists(fileZip))
{
File.Delete(fileZip);
}
Foxpro.WriteFile(txtFolder.Text.Trim(), "datahi", fields, dt1, pbUpload);
Zip.ZipFiles(fileDbf, fileZip);
File.Delete(fileDbf);
}
}
}
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 Upload()
{
if (dtResult.Rows.Count == 0)
{
return;
}
pbUpload.Value = 0;
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("BarangID", "idmain", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("FromDate", "Tmt", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("ToDate", "Tmt1", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("QtyAwal", "Awal", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyBeli", "Beli", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyReturBeli", "Rbeli", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyKoreksiBeli", "Kbeli", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyJual", "Jual", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyReturJual", "Rjual", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyJualAntarCab", "Jualcab", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyReturJualAntarCab", "Rjualcab", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyKoreksiJual", "Kjual", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtySelisih", "Selisih", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyMutasi", "Mutasi", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyAkhir", "Akhir", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("KodeGudang", "Kd_toko", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Syncflag", "Id_match", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Hpp", "Hpp", Foxpro.enFoxproTypes.Numeric, 15));
fields.Add(new Foxpro.DataStruct("NKorJual", "Korpj", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("NKorRetJual", "Korrj", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("NKorBeli", "Korpb", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("NKorRetBeli", "Korrb", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("NAG", "Ag", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyADJOpname", "Adjopnm", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("QtyAdjClosing", "Adjstok", Foxpro.enFoxproTypes.Numeric, 10));
//Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dtResult);
List <Foxpro.IndexStruct> index = new List <Foxpro.IndexStruct>();
index.Add(new Foxpro.IndexStruct("idmain", "IDMAIN"));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dtResult, pbUpload, index);
}
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 cmdUPLOAD_Click(object sender, EventArgs e)
{
DataTable dt = new DataTable();
string Physical = GlobalVar.DbfUpload + "\\" + "TransAccTmp.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
using (Database db = new Database(GlobalVar.DBName))
{
db.Commands.Add(db.CreateCommand("usp_AccBy_Ajuan_UPLOAD"));
db.Commands[0].Parameters.Add(new Parameter("@FromDate", SqlDbType.Date, rangeDateBox1.FromDate));
db.Commands[0].Parameters.Add(new Parameter("@ToDate", SqlDbType.Date, rangeDateBox1.ToDate));
db.Commands[0].Parameters.Add(new Parameter("@GudangID", SqlDbType.VarChar, GlobalVar.Gudang));
db.Commands[0].Parameters.Add(new Parameter("@UploadKe11", SqlDbType.Date, DateTime.Today));
dt = db.Commands[0].ExecuteDataTable();
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("RowID", "RowID", Foxpro.enFoxproTypes.Char, 36));
fields.Add(new Foxpro.DataStruct("CabangID", "CabangID", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("TglAjuan", "TglAjuan", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Transaksi", "Transaksi", Foxpro.enFoxproTypes.Char, 5));
fields.Add(new Foxpro.DataStruct("NoPerk", "NoPerk", Foxpro.enFoxproTypes.Char, 12));
fields.Add(new Foxpro.DataStruct("NoBukti", "NoBukti", Foxpro.enFoxproTypes.Char, 15));
fields.Add(new Foxpro.DataStruct("Uraian", "Uraian", Foxpro.enFoxproTypes.Char, 55));
fields.Add(new Foxpro.DataStruct("Rp", "Rp", Foxpro.enFoxproTypes.Numeric, 17));
fields.Add(new Foxpro.DataStruct("NoAcc", "NoAcc", Foxpro.enFoxproTypes.Char, 15));
fields.Add(new Foxpro.DataStruct("TglAcc", "TglAcc", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Keterangan", "Keterangan", Foxpro.enFoxproTypes.Char, 55));
fields.Add(new Foxpro.DataStruct("UploadKe11", "UploadKe11", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("UploadKe00", "UploadKe00", Foxpro.enFoxproTypes.DateTime, 8));
Foxpro.WriteFile(GlobalVar.DbfUpload, "TransAccTmp", fields, dt);
ZipFile(files);
MessageBox.Show(Messages.Confirm.ProcessFinished + ". Lokasi file: " + GlobalVar.DbfUpload + "\\ISA-AjuanACCBiaya.zip");
using (Database db = new Database(GlobalVar.DBName))
{
db.Commands.Add(db.CreateCommand("usp_AccBy_Ajuan_UPLOAD"));
db.Commands[0].Parameters.Add(new Parameter("@FromDate", SqlDbType.Date, rangeDateBox1.FromDate));
db.Commands[0].Parameters.Add(new Parameter("@ToDate", SqlDbType.Date, rangeDateBox1.ToDate));
db.Commands[0].Parameters.Add(new Parameter("@GudangID", SqlDbType.VarChar, GlobalVar.Gudang));
db.Commands[0].Parameters.Add(new Parameter("@UploadKe11", SqlDbType.Date, DateTime.Today));
db.Commands[0].Parameters.Add(new Parameter("@IsUpdate", SqlDbType.Bit, true));
db.Commands[0].ExecuteNonQuery();
}
Modus = enumModus.Clear;
RefreshGrid();
}
private void Upload1(String FileName)
{
string Physical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf";
if (File.Exists(Physical))
{
File.Delete(Physical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("RecordID", "Idhkrmagud", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("DrGudang", "Dr_gud", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("KeGudang", "Ke_gud", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("TglKirim", "Tgl_krm", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("TglTerima", "Tgl_trm", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoAG", "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("expedisi", "Exp", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("NoKendaraan", "No_kend", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("NamaSopir", "Nm_sopir", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("KirimTerimaID", "Id_krmtrm", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("No_dobo", "No_dobo", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Lbo", "Lbo", Foxpro.enFoxproTypes.Char, 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)); //tglkirim
fields.Add(new Foxpro.DataStruct("No_do", "No_do", Foxpro.enFoxproTypes.Char, 7)); //nomer ag
fields.Add(new Foxpro.DataStruct("Tgl_do", "Tgl_do", Foxpro.enFoxproTypes.DateTime, 8)); //tgl_kirim
fields.Add(new Foxpro.DataStruct("Tgl_sj", "Tgl_sj", Foxpro.enFoxproTypes.DateTime, 8));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[0], HeaderprogressBar);
/*update syncflag*/
using (Database db = new Database())
{
string _recordID = dsResult.Tables[0].Rows[0]["RecordID"].ToString();
db.Commands.Add(db.CreateCommand("usp_AntarGudangSyncFlag_UPDATE"));
db.Commands[0].Parameters.Add(new Parameter("@RecordID", SqlDbType.VarChar, _recordID));
db.Commands[0].ExecuteNonQuery();
}
}
