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 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 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 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 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 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 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 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 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 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 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 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 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 Upload3(String FileName)
{
//for (int i = 0; i < dsResult.Tables[1].Rows.Count; i++)
//{
// string barangid = dsResult.Tables[1].Rows[i]["Id_Brg"].ToString();
// using (Database db = new Database())
// {
// db.Commands.Add(db.CreateCommand("usp_MasterStok_UploadDBF"));
// db.Commands[0].Parameters.Add(new Parameter("@barangid", SqlDbType.VarChar, barangid));
// dtUploadMaster = db.Commands[0].ExecuteDataTable();
// }
//}
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("BarangID", "Id_brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("RecordID", "Idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Bundle", "Bundle", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("NamaStok", "Nama_stok", Foxpro.enFoxproTypes.Char, 73));
fields.Add(new Foxpro.DataStruct("KodeSolo", "Kodesolo", Foxpro.enFoxproTypes.Char, 4));
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("Material", "Material", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("SatJual", "Sat_jual", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("SatSolo", "Sat_solo", Foxpro.enFoxproTypes.Char, 3));
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("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, 9));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[2], 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>();
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();
}
}
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>();
/*
* INSERT INTO Drbtemp (Idrec,Idretur,Idhtr,Iddtr,Kdretur,Nama_stok,Pemasok,Q_gudang,;
* Q_terima,Satuan,Klp,H_beli,H_net,H_pokok,Hpp_solo,Pot_rp,Id_disc,Disc_1,Disc_2,Disc_3,;
* Id_koreksi,Catatan,Tgl_keluar,Tgl_beli,Id_brg,Kd_gdg)
*/
fields.Add(new Foxpro.DataStruct("idrec", "idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Idretur", "Idretur", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Idhtr", "Idhtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Iddtr", "Iddtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Kdretur", "Kdretur", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Nama_stok", "Nama_stok", Foxpro.enFoxproTypes.Char, 73));
fields.Add(new Foxpro.DataStruct("Pemasok", "Pemasok", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("Q_gudang", "Q_gudang", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("Q_terima", "Q_terima", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("Satuan", "Satuan", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("Klp", "Klp", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("H_beli", "H_beli", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("H_net", "H_net", 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("Pot_rp", "Pot_rp", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("Id_disc", "Id_disc", Foxpro.enFoxproTypes.Char, 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("Catatan", "Catatan", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Tgl_keluar", "Tgl_keluar", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Tgl_beli", "Tgl_beli", Foxpro.enFoxproTypes.DateTime, 8));
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", "IDREC"));
index.Add(new Foxpro.IndexStruct("idretur", "IDRETUR"));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[1], DetailprogressBar, index);
}
private void UploadTokoToSales()
{
lblTableName.Text = "TokoToSales Is Uploading";
string Physical = GlobalVar.DbfUpload + "\\" + "TmpTk2.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
using (Database db = new Database(GlobalVar.DBName))
{
db.Commands.Add(db.CreateCommand("psp_PIUTANG_UPLOAD_TokoToSales"));
dt = db.Commands[0].ExecuteDataTable();
}
_countTable = _countTable + 1;
lblCountTable.Text = _countTable.ToString() + " of 5";
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("idrec", "idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("kd_toko", "kd_toko", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("kd_sales", "kd_sales", Foxpro.enFoxproTypes.Char, 11));
fields.Add(new Foxpro.DataStruct("piutang_b", "piutang_b", Foxpro.enFoxproTypes.Numeric, 13));
fields.Add(new Foxpro.DataStruct("piutang_j", "piutang_j", Foxpro.enFoxproTypes.Numeric, 13));
fields.Add(new Foxpro.DataStruct("id_match", "id_match", Foxpro.enFoxproTypes.Char, 1));
progressBar1.Minimum = 0;
progressBar1.Maximum = dt.Rows.Count;
progressBar1.Value = 0;
foreach (DataRow dr in dt.Rows)
{
_countRow++;
lblCountRow.Text = _countRow.ToString();
progressBar1.Increment(1);
this.Validate();
this.RefreshForm();
}
Foxpro.WriteFile(GlobalVar.DbfUpload, "TmpTk2", fields, dt);
}
private void Upload()
{
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("CabangID", "C1", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("Kodetoko", "kd_toko", Foxpro.enFoxproTypes.Varchar, 19));
fields.Add(new Foxpro.DataStruct("TglAktif", "tmt", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Status", "sts", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Keterangan", "ket", Foxpro.enFoxproTypes.Char, 30));
fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("KStatus", "ksts", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Roda", "rd", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("WilID", "idwil", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("tglPasif", "tmtpasif", Foxpro.enFoxproTypes.DateTime, 8));
Foxpro.WriteFile(GlobalVar.DbfUpload, "stsTokoUp", fields, dt, pbUpload);
}
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);
/*update syncflag*/
for (int i = 0; i < dsResult.Tables[1].Rows.Count; i++)
{
string _recordID = dsResult.Tables[1].Rows[i]["Iddkrmagud"].ToString();
using (Database db = new Database())
{
db.Commands.Add(db.CreateCommand("usp_AntarGudangDetailSyncFlag_UPDATE"));
db.Commands[0].Parameters.Add(new Parameter("@RecordID", SqlDbType.VarChar, _recordID));
db.Commands[0].ExecuteNonQuery();
}
}
}
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("HtrID", "Idhtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("RecordID", "Idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("BarangID", "Id_brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("NamaStok", "Nama_stok", Foxpro.enFoxproTypes.Char, 73));
fields.Add(new Foxpro.DataStruct("SatJual", "Satuan", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("Klp", "Klp", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("QtyRequest", "J_rq", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("QtyDO", "J_do", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("QtySJ", "J_sj", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("QtyNota", "J_nota", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("QtyRetur", "J_retur", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("HrgJual", "H_jual", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("Disc1", "Disc_1", Foxpro.enFoxproTypes.Numeric, 6));
fields.Add(new Foxpro.DataStruct("Disc2", "Disc_2", Foxpro.enFoxproTypes.Numeric, 6));
fields.Add(new Foxpro.DataStruct("Disc3", "Disc_3", Foxpro.enFoxproTypes.Numeric, 6));
fields.Add(new Foxpro.DataStruct("Pot", "pot_rp", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("DiscFormula", "Id_disc", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Hpokok", "H_pokok", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("HppSolo", "Hpp_solo", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("QtyKoli", "J_koli", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("KoliAwal", "Koli_awal", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("KoliAkhir", "Koli_akhir", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("NoKoli", "No_koli", Foxpro.enFoxproTypes.Char, 15));
fields.Add(new Foxpro.DataStruct("KetKoli", "Ket_koli", Foxpro.enFoxproTypes.Char, 20));
fields.Add(new Foxpro.DataStruct("NoDOBO", "No_bodo", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("NoACC", "No_acc", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Catatan", "Catatan", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Idmatch", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("NBOPrint", "Nprint", Foxpro.enFoxproTypes.Numeric, 1));
fields.Add(new Foxpro.DataStruct("KodeToko", "kd_toko", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("Idkoreksi", "id_koreksi", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("TglSJ", "tgl_sj", Foxpro.enFoxproTypes.DateTime, 8));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[1], pbUpload2);
}
private void Upload4(String FileName)
{
for (int i = 0; i < dsResult.Tables[1].Rows.Count; i++)
{
string barangid = dsResult.Tables[1].Rows[i]["Id_Brg"].ToString();
using (Database db = new Database())
{
db.Commands.Add(db.CreateCommand("usp_StokPart_UploadDBF"));
db.Commands[0].Parameters.Add(new Parameter("@barangid", SqlDbType.VarChar, barangid));
dtUploadPart = db.Commands[0].ExecuteDataTable();
}
}
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("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("idrec", "Idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("sat_jual", "Sat_jual", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("merek", "Merek", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("jenis", "Jenis", Foxpro.enFoxproTypes.Char, 20));
fields.Add(new Foxpro.DataStruct("kelompok", "Kelompok", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("supplier", "Supplier", Foxpro.enFoxproTypes.Char, 30));
fields.Add(new Foxpro.DataStruct("id_tr", "Id_tr", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("r1", "R1", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("r2", "R2", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("r3", "R3", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("r4", "R4", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("lpasif", "Lpasif", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("SyncFlag", "Id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("cash", "Cash", Foxpro.enFoxproTypes.Numeric, 6));
fields.Add(new Foxpro.DataStruct("top10", "Top10", Foxpro.enFoxproTypes.Numeric, 6));
fields.Add(new Foxpro.DataStruct("enduser", "Enduser", Foxpro.enFoxproTypes.Numeric, 6));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dtUploadPart, HeaderprogressBar);
}
private void Upload()
{
string Physical1 = GlobalVar.DbfUpload + "\\" + FileName1 + ".dbf";
if (File.Exists(Physical1))
{
File.Delete(Physical1);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("HtrID", "idhtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("Cabang1", "cab1", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("Cabang2", "cab2", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("NoDo", "no_do", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("TglDO", "tgl_do", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoACCPiutang", "no_nota", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("TglACCPiutang", "tgl_nota", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("KodeToko", "kd_toko", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("KodeSales", "kd_sales", Foxpro.enFoxproTypes.Char, 11));
fields.Add(new Foxpro.DataStruct("NamaToko", "nm_toko", Foxpro.enFoxproTypes.Char, 31));
fields.Add(new Foxpro.DataStruct("AlamatKirim", "al_kirim", Foxpro.enFoxproTypes.Char, 60));
fields.Add(new Foxpro.DataStruct("Kota", "kota", Foxpro.enFoxproTypes.Char, 20));
fields.Add(new Foxpro.DataStruct("rp_net", "rp_net", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("RpACCPiutang", "rp_net3", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("RpPlafonToko", "pot_rp2", Foxpro.enFoxproTypes.Numeric, 12));
fields.Add(new Foxpro.DataStruct("RpPiutangTerakhir", "pot_rp3", Foxpro.enFoxproTypes.Numeric, 12));
fields.Add(new Foxpro.DataStruct("RpGiroTolakTerakhir", "rp_fee1", Foxpro.enFoxproTypes.Numeric, 11));
fields.Add(new Foxpro.DataStruct("RpOverdue", "rp_fee2", Foxpro.enFoxproTypes.Numeric, 11));
fields.Add(new Foxpro.DataStruct("Catatan1", "catatan", Foxpro.enFoxproTypes.Memo, 4));
fields.Add(new Foxpro.DataStruct("Catatan5", "catatan5", Foxpro.enFoxproTypes.Char, 40));
fields.Add(new Foxpro.DataStruct("NoDOBO", "no_dobo", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("SyncFlag", "id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("LinkID", "id_link", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("ACCPiutangID", "checker_1", Foxpro.enFoxproTypes.Char, 11));
fields.Add(new Foxpro.DataStruct("TransactionType", "id_tr", Foxpro.enFoxproTypes.Char, 2));
Foxpro.WriteFile(GlobalVar.DbfUpload + "\\", FileName1, fields, dtResult, pbUpload1);
UpdateLinkID();
}
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);
}
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("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_retur", "J_retur", Foxpro.enFoxproTypes.Numeric, 5));
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_trm", "Tgl_trm", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("H_beli", "H_beli", 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("Id_disc", "Id_disc", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Pot_rp", "Pot_rp", Foxpro.enFoxproTypes.Numeric, 12));
fields.Add(new Foxpro.DataStruct("Ppn", "Ppn", Foxpro.enFoxproTypes.Numeric, 3));
fields.Add(new Foxpro.DataStruct("Pemasok", "Pemasok", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("Id_match", "id_match", Foxpro.enFoxproTypes.Char, 1));
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));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[1], DetailprogressBar);
}
private void Upload()
{
string Physical1 = GlobalVar.DbfUpload + "\\" + FileName1 + ".dbf";
if (File.Exists(Physical1))
{
File.Delete(Physical1);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
// fields.Add(new Foxpro.DataStruct("RowId", "RowId", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("IDKP", "IDKP", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("KodeToko", "KodeToko", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("KodeSales", "KodeSales", Foxpro.enFoxproTypes.Char, 11));
fields.Add(new Foxpro.DataStruct("TglTransaksi", "TglTrans", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoTransaksi", "NoTrans", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("JangkaWaktu", "JkWaktu", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("TglJatuhTempo", "TglJT", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Uraian", "Uraian", Foxpro.enFoxproTypes.Char, 43));
fields.Add(new Foxpro.DataStruct("RpJual", "RpJual", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("RpKredit", "RpKredit", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("RpSisa", "RpSisa", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("TransactionType", "TrType", Foxpro.enFoxproTypes.Char, 2));
fields.Add(new Foxpro.DataStruct("SyncFlag", "SyncFlag", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("HariKirim", "HariKirim", Foxpro.enFoxproTypes.Numeric, 3));
fields.Add(new Foxpro.DataStruct("HariSales", "HariSales", Foxpro.enFoxproTypes.Numeric, 3));
fields.Add(new Foxpro.DataStruct("subnota", "subnota", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("KeteranganTagih", "KetTagih", Foxpro.enFoxproTypes.Char, 15));
fields.Add(new Foxpro.DataStruct("NamaToko", "NamaToko", Foxpro.enFoxproTypes.Char, 31));
fields.Add(new Foxpro.DataStruct("Kota", "Kota", Foxpro.enFoxproTypes.Char, 20));
fields.Add(new Foxpro.DataStruct("KodeGudang", "KodeGudang", Foxpro.enFoxproTypes.Varchar, 4));
// fields.Add(new Foxpro.DataStruct("LastUpdatedBy", "LsUpdBy", Foxpro.enFoxproTypes.Varchar, 50));
// fields.Add(new Foxpro.DataStruct("LastUpdatedTime", "LsUpdTime", Foxpro.enFoxproTypes.DateTime , 8));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName1, fields, dsOverdouFU.Tables[0]);
}
private void cretaeFileDBF(DataTable dt)
{
try
{
this.Cursor = Cursors.WaitCursor;
string FileName = "pjlmin_" + GlobalVar.Gudang;
string hPhysical = GlobalVar.DbfUpload + "\\" + FileName + ".dbf";
if (File.Exists(hPhysical))
{
File.Delete(hPhysical);
}
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("HRecordID", "idtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("BarangID", "id_brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("NamaStok", "nama_stok", Foxpro.enFoxproTypes.Char, 73));
fields.Add(new Foxpro.DataStruct("QtySuratJalan", "j_sj", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("TglSuratJalan", "tgl_sj", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("HrgJual", "h_jual", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("NoSuratJalan", "no_sj", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("QtyMinus", "stok_min", Foxpro.enFoxproTypes.Numeric, 5));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dt);
MessageBox.Show("Eksport Data Sukses. File disimpan di " + hPhysical);
}
catch (Exception ex)
{
throw ex;
}
finally
{
this.Cursor = Cursors.Default;
}
}
private void Upload(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("idrec", "Idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("id_brg", "id_brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("tmt1", "tmt1", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("tmt2", "tmt2", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("qbuffer", "qbuffer", Foxpro.enFoxproTypes.Numeric, 10));
fields.Add(new Foxpro.DataStruct("catatan", "catatan", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("kd_gdg", "kd_gdg", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("avgjual", "avgjual", Foxpro.enFoxproTypes.Numeric, 10));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[0], progressBar1);
}
private void Upload(DataTable dt)
{
List <Foxpro.DataStruct> fields = new List <Foxpro.DataStruct>();
fields.Add(new Foxpro.DataStruct("TglRequest", "tgl_rq", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("NoRequest", "no_rq", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("NamaStok", "nama_stok", Foxpro.enFoxproTypes.Char, 73));
fields.Add(new Foxpro.DataStruct("BarangID", "id_brg", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("QtyRequest", "j_rq", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("C2", "c2", Foxpro.enFoxproTypes.Char, 4));
fields.Add(new Foxpro.DataStruct("RecordID", "idrec", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("QtyBO", "j_bo", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("QtyTambahan", "j_plus", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("QtyAkhir", "j_akhir", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("QtyJual", "j_jual", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("QtyMinimum", "Stok_min", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("QtyMaximum", "Stok_max", Foxpro.enFoxproTypes.Numeric, 7));
fields.Add(new Foxpro.DataStruct("Catatan", "catatan", Foxpro.enFoxproTypes.Char, 30));
fields.Add(new Foxpro.DataStruct("Keterangan", "Keterangan", Foxpro.enFoxproTypes.Char, 30));
Foxpro.WriteFile(GlobalVar.DbfUpload, "Po_tmp", fields, dt);
ZipFile("Po_tmp");
MessageBox.Show("File " + GlobalVar.DbfUpload + "\\dbfmatch.zip", "Succes");
}
private void UploadDesign()
{
DataTable dt = new DataTable();
string Physical = GlobalVar.DbfUpload + "\\" + "DesignTmp.DBF";
files.Add(Physical);
if (File.Exists(Physical))
{
File.Delete(Physical);
}
DataRowView drvCabang = (DataRowView)cboCabang.Items[cboCabang.SelectedIndex];
_CabangID = drvCabang.Row["CabangID"].ToString();
using (Database db = new Database(GlobalVar.DBHoldingName))
{
db.Commands.Add(db.CreateCommand("psp_GL_UPLOAD_Design"));
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("RowID", "RowID", Foxpro.enFoxproTypes.Char, 36));
fields.Add(new Foxpro.DataStruct("Report", "Report", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("Ref", "Ref", Foxpro.enFoxproTypes.Char, 3));
fields.Add(new Foxpro.DataStruct("NoUrut", "NoUrut", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("Tipe", "Tipe", Foxpro.enFoxproTypes.Char, 50));
fields.Add(new Foxpro.DataStruct("Keterangan", "Keterangan", Foxpro.enFoxproTypes.Char, 200));
fields.Add(new Foxpro.DataStruct("Catatan", "Catatan", Foxpro.enFoxproTypes.Char, 200));
fields.Add(new Foxpro.DataStruct("Formula", "Formula", Foxpro.enFoxproTypes.Char, 200));
fields.Add(new Foxpro.DataStruct("Lminus", "Lminus", Foxpro.enFoxproTypes.Numeric, 1));
fields.Add(new Foxpro.DataStruct("TUnderLine", "TUnderLine", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("DunderLine", "DUnderLine", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("Bold", "Bold", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("CabangID", "CabangID", Foxpro.enFoxproTypes.Char, 4));
Foxpro.WriteFile(GlobalVar.DbfUpload, "DesignTmp", fields, dt);
}
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("Idtr", "Idtr", Foxpro.enFoxproTypes.Char, 23));
fields.Add(new Foxpro.DataStruct("No_rq", "No_rq", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Tgl_rq", "Tgl_rq", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("No_do", "No_do", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Tgl_trans", "Tgl_trans", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("No_nota", "No_nota", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("Tgl_nota", "Tgl_nota", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("No_sj", "No_sj", Foxpro.enFoxproTypes.Char, 10));
fields.Add(new Foxpro.DataStruct("Tgl_sj", "Tgl_sj", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Tgl_trm", "Tgl_trm", Foxpro.enFoxproTypes.DateTime, 8));
fields.Add(new Foxpro.DataStruct("Pemasok", "Pemasok", Foxpro.enFoxproTypes.Char, 19));
fields.Add(new Foxpro.DataStruct("Rp_beli", "Rp_beli", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("Rp_net", "Rp_net", Foxpro.enFoxproTypes.Numeric, 14));
fields.Add(new Foxpro.DataStruct("Disc_1", "Disc_1", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("Disc_2", "Disc_2", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("Disc_3", "Disc_3", Foxpro.enFoxproTypes.Numeric, 5));
fields.Add(new Foxpro.DataStruct("Expedisi", "Expedisi", Foxpro.enFoxproTypes.Char, 9));
fields.Add(new Foxpro.DataStruct("Laudit", "Laudit", Foxpro.enFoxproTypes.Logical, 1));
fields.Add(new Foxpro.DataStruct("Id_disc", "Id_disc", Foxpro.enFoxproTypes.Char, 7));
fields.Add(new Foxpro.DataStruct("Ppn", "Ppn", Foxpro.enFoxproTypes.Numeric, 3));
fields.Add(new Foxpro.DataStruct("Id_match", "Id_match", Foxpro.enFoxproTypes.Char, 1));
fields.Add(new Foxpro.DataStruct("Cab", "Cab", Foxpro.enFoxproTypes.Char, 2));
Foxpro.WriteFile(GlobalVar.DbfUpload, FileName, fields, dsResult.Tables[0], HeaderprogressBar);
}
