private void Save()
{
if (valid())
{
DataTable rsBef = Db.Rs("SELECT "
+ "NamaGrouping"
+ ",Project"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_followup "
+ " WHERE No= '" + No + "'");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_FOLLOWUP SET NamaGrouping='" + Cf.Str(lokasi.Text) + "', Project = '" + project.SelectedValue + "' WHERE No='" + No + "'");
DataTable rsAft = Db.Rs("SELECT "
+ "NamaGrouping"
+ ",Project"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_followup "
+ " WHERE No= '" + No + "'");
//Logfile
string Ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogGrouping"
+ " 'Edit'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + No + "'"
);
}
}
protected bool Save()
{
DataTable rs = Db.Rs("SELECT * FROM HtmlEditor WHERE Halaman = '" + Halaman + "' AND Project = '" + Project + "'");
if (rs.Rows.Count == 0)
Response.Redirect("/CustomError/Deleted.html");
DataTable rsBef = Capture;
string isi = HttpUtility.HtmlDecode(html.Text);
// Update data
Db.Execute("UPDATE HtmlEditor SET Html = '" + isi + "'"
+ " WHERE Halaman = '" + Halaman + "' AND Project = '" + Project + "'"
);
DataTable rsAft = Capture;
//Log File
string Ket = "Halaman : " + Halaman + "<br />"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogHtmlEditor"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + Halaman + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM HTMLEDITOR_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE HTMLEDITOR_LOG SET Project = '" + project.Text + "' WHERE LogID = " + LogID);
return true;
}
protected void ok_Click(object sender, System.EventArgs e)
{
if (filevalid())
{
if (file.PostedFile.FileName.Length != 0)
{
DataTable rsBef = Db.Rs("SELECT "
+ " Foto"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
string path = Request.PhysicalApplicationPath + "Foto\\" + UserID + ".png";
string save = "security\\Foto\\" + UserID + ".png";
Dfc.UploadFile(".jpg", path, file);
Db.Execute("UPDATE USERNAME SET Foto ='" + save + "' WHERE UserID = '" + UserID + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " Foto"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
string Ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogUsername "
+ " 'EDU'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + UserID + "'"
);
}
Js.Close(this);
}
}
private void SaveLok()
{
string strSql = "SELECT * FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_LOKASI_KONTRAK WHERE SN = '" + NoLokasi + "'";
DataTable rs = Db.Rs(strSql);
DataTable rsBef = Db.Rs("SELECT "
+ " Lokasi"
+ ",Nama"
+ ",SN"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_LOKASI_KONTRAK "
+ " WHERE SN = '" + NoLokasi + "'");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_LOKASI_KONTRAK SET Lokasi='" + lokasi.Text + "', Nama='" + namalokasi.Text + "' WHERE SN = '" + NoLokasi + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " Lokasi"
+ ",Nama"
+ ",SN"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_LOKASI_KONTRAK "
+ " WHERE SN = '" + NoLokasi + "'");
//Logfile
string Ket = "Lokasi: " + lokasi.Text + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogLokasiKontrak"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoLokasi + "'"
);
//}
}
protected void ok_Click(object sender, System.EventArgs e)
{
string Bank = bank.SelectedValue;
DataTable rsBef = Db.Rs("SELECT "
+ "BankKPR AS [Bank KPR]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
Db.Execute("UPDATE MS_KONTRAK"
+ " SET BankKPR = '" + Bank + "'"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
DataTable rsAft = Db.Rs("SELECT "
+ "BankKPR AS [Bank KPR]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
string Ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKontrak"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoKontrak + "'"
);
Response.Redirect("KontrakProses.aspx?NoKontrak=" + NoKontrak + "&done=1");
}
protected void save_Click(object sender, System.EventArgs e)
{
// if (Save()) Response.Redirect("JenisEdit.aspx?done=1&NoJenis=" + NoJenis);
if (valid())
{
int ada = Db.SingleInteger("SELECT COUNT(*) FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE WHERE Tipe ='" + tipe.Text + "' AND ID != " + NoTipe);
if (ada > 0)
{
string s = "";
Js.Alert(
this
, "Input Tidak Valid.\\n\\n"
+ "Aturan Proses :\\n"
+ "1. Tipe Sales tidak boleh kosong.\\n"
+ "2. Tipe Sales Duplikat.\\n"
, "document.getElementById('" + s + "').focus();"
+ "document.getElementById('" + s + "').select();"
);
}
else
{
string strSql = "SELECT * FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE WHERE ID = '" + NoTipe + "'";
DataTable rs = Db.Rs(strSql);
DataTable rsBef = Db.Rs("SELECT "
+ " Tipe"
+ ",Project"
+ ",ID"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE "
+ " WHERE ID = '" + NoTipe + "'");
//relasi
//Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..MS_UNIT SET Jenis='" + jenis.Text + "' WHERE Jenis='" + rs.Rows[0]["Jenis"] + "'");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE SET Tipe='" + tipe.Text + "' WHERE ID = '" + NoTipe + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " Tipe"
+ ",Project"
+ ",ID"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE "
+ " WHERE ID = '" + NoTipe + "'");
//Logfile
string Ket = "Tipe: " + tipe.Text + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogTipeSales"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoTipe + "'"
);
Response.Redirect("TipeSalesEdit.aspx?done=1&NoTipe=" + NoTipe);
}
}
}
protected void btnbaru_ServerClick(object sender, System.EventArgs e)
{
if (validbaru())
{
DataTable rs = Db.Rs("SELECT "
+ " NoTTS AS [No. TTS]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Total AS [Nilai TTS]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
DataTable rsBef = Db.Rs("SELECT "
+ " NoSlip AS [No. Slip]"
+ ",CONVERT(varchar, TglSetoran, 106) AS [Tanggal Setoran]"
+ ",Bank AS [Rekening]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
int NoSlip = Db.SingleInteger("SELECT ISNULL(MAX(NoSlip),0)+1 FROM MS_TTS");
DateTime TglSetoran = Convert.ToDateTime(tglsetoran.Text);
string Bank = Cf.Str(bank.Text);
Db.Execute("UPDATE MS_TTS SET "
+ " NoSlip = " + NoSlip
+ ",TglSetoran = CONVERT(datetime, '" + TglSetoran + "', 101)"
+ ",Bank = '" + Bank + "'"
+ " WHERE NoTTS = " + NoTTS);
DataTable rsAft = Db.Rs("SELECT "
+ " NoSlip AS [No. Slip]"
+ ",CONVERT(varchar, TglSetoran, 106) AS [Tanggal Setoran]"
+ ",Bank AS [Rekening]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
//Logfile
string ketlog = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogTTS"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ketlog + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("TTSEdit.aspx?done=1&NoTTS=" + NoTTS);
}
}
private bool Save()
{
if (valid())
{
string Nama = Cf.Str(nama.Text);
int RotasiPass = Convert.ToInt32(rotasipass.Text);
string Email = Cf.Str(email.Text);
string SecLevel = seclevel.SelectedValue;
int NoAgent = Convert.ToInt32(agent.SelectedValue);
DataTable rsBef = Db.Rs("SELECT "
+ " Nama AS [Nama Lengkap]"
+ ",Email"
+ ",SecLevel AS [Security Level]"
+ ",GantiPass AS [Rubah Password di Login Pertama]"
+ ",RotasiPass AS [Frekuensi Rotasi Password (Bulanan)]"
+ ",NoAgent AS [Kode Sales]"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
Db.Execute("EXEC spUserEdit "
+ " '" + UserID + "'"
+ ",'" + Nama + "'"
+ ",'" + SecLevel + "'"
+ ", " + Cf.BoolToSql(gantipass.Checked)
+ ", " + RotasiPass
);
//Db.Execute("UPDATE USERNAME SET NoAgent = " + NoAgent + " WHERE UserID = '" + UserID + "'");
Db.Execute("UPDATE USERNAME SET Email = '" + Email + "' WHERE UserID = '" + UserID + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " Nama AS [Nama Lengkap]"
+ ",Email"
+ ",SecLevel AS [Security Level]"
+ ",GantiPass AS [Rubah Password di Login Pertama]"
+ ",RotasiPass AS [Frekuensi Rotasi Password (Bulanan)]"
+ ",NoAgent AS [Kode Sales]"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
//Logfile
string Ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogUsername "
+ " 'EDU'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + UserID + "'"
);
return(true);
}
else
{
return(false);
}
}
protected void save_Click(object sender, System.EventArgs e)
{
for (int i = 0; i < rs.Rows.Count; i++)
{
if (!Response.IsClientConnected)
{
break;
}
string seclevel = "";
for (int j = 2; j <= head.Cells.Count - 1; j++)
{
string s = head.Cells[j].InnerHtml;
RadioButton r = (RadioButton)list.FindControl(s + i);
if (r.Checked)
{
seclevel = s;
}
}
string UserID = rs.Rows[i]["UserID"].ToString();
DataTable rsDetail = Db.Rs("SELECT "
+ " UserID AS [Kode / Username]"
+ ",Nama AS [Nama Lengkap]"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
DataTable rsBef = Db.Rs("SELECT "
+ " SecLevel AS [Security Level]"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
Db.Execute("EXEC spUserAkses"
+ " '" + UserID + "'"
+ ",'" + seclevel + "'"
);
DataTable rsAft = Db.Rs("SELECT "
+ " SecLevel AS [Security Level]"
+ " FROM USERNAME WHERE UserID = '" + UserID + "'");
if (seclevel != rs.Rows[i]["SecLevel"].ToString())
{
string Ket = Cf.LogCapture(rsDetail)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogUsername "
+ " 'MKA'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + UserID + "'"
);
}
}
feed.Text = "<img src='/Media/db.gif' align=absmiddle> Edit MKA Berhasil...";
}
private bool Save()
{
if (valid())
{
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglSKL, 106) AS [Tanggal]"
+ ",NoSKL"
+ ",Ref AS [Ref.]"
+ ",NoSKLManual"
+ ",Used AS [No.YgDigunakan]"
+ " FROM MS_SKL WHERE NoSKL = '" + NoSKL + "'");
DataTable rsBef = Db.Rs("SELECT "
+ " CONVERT(varchar, TglSKL, 106) AS [Tanggal]"
+ ",NoSKL"
+ ",Ref AS [Ref.]"
+ ",NoSKLManual"
+ ",Used AS [No.YgDigunakan]"
+ " FROM MS_SKL WHERE NoSKL = '" + NoSKL + "'");
DateTime Tgl = Convert.ToDateTime(tgl.Text);
Db.Execute("EXEC spSKLEdit"
+ " '" + NoSKL + "'"
+ ",'" + Tgl + "'"
+ ",'" + nom.Text + "'"
+ "," + nod.SelectedValue
);
DataTable rsAft = Db.Rs("SELECT "
+ " CONVERT(varchar, TglSKL, 106) AS [Tanggal]"
+ ",NoSKL"
+ ",Ref AS [Ref.]"
+ ",NoSKLManual"
+ ",Used AS [No.YgDigunakan]"
+ " FROM MS_SKL WHERE NoSKL = '" + NoSKL + "'");
string ketlog = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogSKL "
+ " '" + DateTime.Now + "'"
+ ",'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + NoSKL + "'"
+ ",'" + ketlog + "'"
);
return(true);
}
else
{
return(false);
}
}
private void Save()
{
int NoNota = Convert.ToInt32(tbNota.Text);
DateTime TglBayar = Convert.ToDateTime(tbTglBayar.Text);
decimal NilaiBayar = Convert.ToDecimal(tbNilai.Text);
DataTable rsBef = Db.Rs("SELECT * FROM MS_KOMISI_DETAIL WHERE NoKontrak = '" + NoKontrak + "' AND Baris = '" + NoUrut + "' AND BarisTermin = '" + Baris + "'");
string strSql = "UPDATE MS_KOMISI_DETAIL"
+ " SET NoNota = " + NoNota
+ ", TglBayar = '" + TglBayar + "'"
+ ", NilaiBayar = " + NilaiBayar
+ ", SudahBayar = 1"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
+ " AND Baris = " + NoUrut
+ " AND BarisTermin = " + Baris
;
Db.Execute(strSql);
DataTable rsAft = Db.Rs("SELECT * FROM MS_KOMISI_DETAIL WHERE NoKontrak = '" + NoKontrak + "' AND Baris = '" + NoUrut + "' AND BarisTermin = '" + Baris + "'");
string Ket = "";
if (!cbStatus.Checked)
{
Ket = "---BAYAR KOMISI---<br>"
+ Cf.LogCapture(Db.Rs("SELECT * FROM MS_KOMISI_DETAIL WHERE NoKontrak = '" + NoKontrak + "' AND Baris = '" + NoUrut + "' AND BarisTermin = '" + Baris + "'"));
}
else
{
Ket = "---EDIT KOMISI---<br>"
+ Cf.LogCompare(rsBef, rsAft);
}
Db.Execute("EXEC spLogKontrak"
+ " 'BAYAR KOMISI'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoKontrak + "'"
);
this.RegisterStartupScript(
"closeScript"
, "<script language='javascript' type='text/javascript'>"
+ "dialogArguments.location.href = 'KontrakJadwalKomisi.aspx?NoKontrak=" + NoKontrak + "&done=2';"
+ "window.close();"
+ "</script>"
);
Response.Redirect("KontrakJadwalKomisi.aspx?Nokontrak=" + NoKontrak);
}
private bool Save()
{
if (valid())
{
DataTable rs = Db.Rs("SELECT * FROM MS_KOMISIR WHERE NoKomisiR = '" + Nomor + "'");
if (rs.Rows.Count > 0)
{
DataTable rsBef = Db.Rs("SELECT [Tgl] as [Tgl. Realisasi] "
+ " ,[Ket] as [Keterangan]"
+ " FROM MS_KOMISIR where NoKomisiR = '" + Nomor + "'");
DateTime Tgl = Convert.ToDateTime(tgl.Text);
Db.Execute("EXEC spKomisiREdit"
+ " '" + Nomor + "'"
+ ",'" + Tgl + "'"
+ ",'" + ket.Text + "'"
);
DataTable rsAft = Db.Rs("SELECT [Tgl] as [Tgl. Realisasi] "
+ " ,[Ket] as [Keterangan]"
+ " FROM MS_KOMISIR WHERE NoKomisiR = '" + Nomor + "'");
string Ket = "Kode Realisasi : " + Nomor + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKomisiR"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + Nomor + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KOMISIR_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM MS_KOMISIR_LOG WHERE NoKomisiP = " + rs.Rows[0]["NoKomisiR"].ToString());
Db.Execute("UPDATE MS_KOMISIR_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Js.Close(this);
return(true);
}
else
{
return(false);
}
}
else
{
return(false);
}
}
private bool Save()
{
if (valid())
{
string Jabatan = jabatan.Text;
decimal Project = (overpro.Text != "") ? Convert.ToDecimal(overpro.Text) : 0;
decimal Cross = (overcross.Text != "") ? Convert.ToDecimal(overcross.Text) : 0;
DataTable rsBef = Db.Rs("SELECT "
+ " SN AS [No. Urut]"
+ ",Jabatan"
+ ",Project AS [Nilai Overriding Project]"
+ ",CrossSelling AS [Nilai Overriding Cross Selling]"
+ " FROM REF_KOMISI_OVER"
+ " WHERE SN = " + SN
);
Db.Execute("EXEC spKomisiOverEdit"
+ " " + SN
+ ",'" + Jabatan + "'"
+ "," + Project
+ "," + Cross
);
DataTable rsAft = Db.Rs("SELECT "
+ " SN AS [No. Urut]"
+ ",Jabatan"
+ ",Project AS [Nilai Overriding Project]"
+ ",CrossSelling AS [Nilai Overriding Cross Selling]"
+ " FROM REF_KOMISI_OVER"
+ " WHERE SN = " + SN
);
//Logfile
string Ket = "Jabatan : " + Jabatan + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKomisiOver"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + SN + "'"
);
return(true);
}
else
{
return(false);
}
}
private void Save(string NoTTS, string NoFP, CheckBox cb)
{
if (cb.Checked)
{
DataTable rs = Db.Rs("SELECT "
+ " NoTTS AS [No. TTS]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Total AS [Nilai TTS]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
DataTable rsBef = Db.Rs("SELECT "
+ " NoFPS AS [No. Faktur Pajak]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
Db.Execute("UPDATE MS_TTS SET "
+ " NoFPS = '" + NoFP + "'"
+ " WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE REF_FP SET "
+ " Status = 1"
+ " WHERE NoFPS = '" + NoFP + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " NoFPS AS [No. Faktur Pajak]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
//Logfile
string ketlog = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogTTS"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ketlog + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
Act.NoCache();
string strSql = "SELECT * FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'";
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count == 0)
{
Response.Redirect("/CustomError/Deleted.html");
}
else
{
DataTable rsBef = Db.Rs("SELECT "
+ " NoKontrak AS [No. Kontrak]"
+ ",CONVERT(varchar,TglKontrak,106) AS [Tanggal Kontrak]"
+ ",MS_AGENT.Nama + ' ' + MS_AGENT.Principal AS [Agent]"
+ ",CONVERT(varchar,MS_KONTRAK.TargetST,106) AS [Jadwal Serah Terima]"
+ ",FlagKomisi AS [Flag Komisi]"
+ " FROM MS_KONTRAK INNER JOIN MS_AGENT ON MS_KONTRAK.NoAgent = MS_AGENT.NoAgent"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
Db.Execute("UPDATE MS_KONTRAK SET FlagKomisi = 1 WHERE NoKontrak = '" + NoKontrak + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " NoKontrak AS [No. Kontrak]"
+ ",CONVERT(varchar,TglKontrak,106) AS [Tanggal Kontrak]"
+ ",MS_AGENT.Nama + ' ' + MS_AGENT.Principal AS [Agent]"
+ ",CONVERT(varchar,MS_KONTRAK.TargetST,106) AS [Jadwal Serah Terima]"
+ ",FlagKomisi AS [Flag Komisi]"
+ " FROM MS_KONTRAK INNER JOIN MS_AGENT ON MS_KONTRAK.NoAgent = MS_AGENT.NoAgent"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
//Logfile
string Ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKontrak"
+ " 'SK'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoKontrak + "'"
);
Response.Redirect("KontrakJadwalKomisi.aspx?NoKontrak=" + NoKontrak + "&done=3");
}
}
protected void save_Click(object sender, System.EventArgs e)
{
DataTable rsBef = Db.Rs("SELECT"
+ " PemutihanDendaST AS [Pemutihan Denda BAST]"
+ " FROM MS_KONTRAK"
+ " WHERE MS_KONTRAK.NoKontrak = '" + NoKontrak + "'");
decimal Putih = Convert.ToDecimal(dendabast.Text) - Convert.ToDecimal(realisasi.Text);
Db.Execute("UPDATE MS_KONTRAK"
+ " SET PemutihanDendaST = " + Putih
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
DataTable rsAft = Db.Rs("SELECT"
+ " PemutihanDendaST AS [Pemutihan Denda BAST]"
+ " FROM MS_KONTRAK"
+ " WHERE MS_KONTRAK.NoKontrak = '" + NoKontrak + "'");
DataTable rs = Db.Rs("SELECT"
+ " MS_KONTRAK.NoKontrak AS [No. Kontrak]"
+ ",MS_KONTRAK.NoUnit AS [Unit]"
+ ",MS_CUSTOMER.Nama AS [Customer]"
+ ",DendaST AS [Denda BAST]"
+ ",RealisasiDendaST AS [Realisasi Denda BAST]"
+ " FROM MS_KONTRAK INNER JOIN MS_CUSTOMER"
+ " ON MS_KONTRAK.NoCustomer = MS_CUSTOMER.NoCustomer"
+ " WHERE MS_KONTRAK.NoKontrak = '" + NoKontrak + "'");
string ket = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft)
;
Db.Execute("EXEC spLogKontrak "
+ " 'PD-ST'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ket + "'"
+ ",'" + NoKontrak + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KONTRAK_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'");
Db.Execute("UPDATE MS_KONTRAK_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("KontrakDendaBASTPutih.aspx?done=" + NoKontrak);
}
private bool Save()
{
if (valid())
{
DataTable rs = Db.Rs("SELECT * FROM MS_KOMISI_CFR WHERE NoCFR = '" + Nomor + "'");
if (rs.Rows.Count > 0)
{
DataTable rsBef = Db.Rs("SELECT [Tgl] as [Tgl. Realisasi] "
+ " ,[Ket] as [Keterangan]"
+ " FROM MS_KOMISI_CFR where NoCFR = '" + Nomor + "'");
DateTime Tgl = Convert.ToDateTime(tgl.Text);
Db.Execute("EXEC spKomisiCFREdit"
+ " '" + Nomor + "'"
+ ",'" + Tgl + "'"
+ ",'" + ket.Text + "'"
);
DataTable rsAft = Db.Rs("SELECT [Tgl] as [Tgl. Realisasi] "
+ " ,[Ket] as [Keterangan]"
+ " FROM MS_KOMISI_CFR WHERE NoCFR = '" + Nomor + "'");
string Ket = "Kode Realisasi : " + Nomor + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKomisiCFR"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + Nomor + "'"
);
Js.Close(this);
return(true);
}
else
{
return(false);
}
}
else
{
return(false);
}
}
private void SaveLegal()
{
DataTable rsBef = Db.Rs("SELECT"
+ " NoPPJB AS [No. PPJB]"
+ ",NoAJB AS [No. AJB]"
+ ",NoST AS [No. BAST]"
+ " FROM MS_KONTRAK"
+ " WHERE MS_KONTRAK.NoKontrak = '" + Baru + "'");
string NoPPJB = Cf.Pk(noppjb.Text);
string NoAJB = Cf.Pk(noajb.Text);
string NoST = Cf.Pk(nobast.Text);
Db.Execute("UPDATE MS_KONTRAK SET"
+ " NoPPJB = '" + NoPPJB + "'"
+ ",NoAJB = '" + NoAJB + "'"
+ ",NoST = '" + NoST + "'"
+ " WHERE NoKontrak = '" + Baru + "'"
);
DataTable rsAft = Db.Rs("SELECT"
+ " NoPPJB AS [No. PPJB]"
+ ",NoAJB AS [No. AJB]"
+ ",NoST AS [No. BAST]"
+ " FROM MS_KONTRAK"
+ " WHERE MS_KONTRAK.NoKontrak = '" + Baru + "'");
DataTable rs = Db.Rs("SELECT"
+ " MS_KONTRAK.NoKontrak AS [No. Kontrak]"
+ ",MS_KONTRAK.NoUnit AS [Unit]"
+ ",MS_CUSTOMER.Nama AS [Customer]"
+ " FROM MS_KONTRAK INNER JOIN MS_CUSTOMER"
+ " ON MS_KONTRAK.NoCustomer = MS_CUSTOMER.NoCustomer"
+ " WHERE MS_KONTRAK.NoKontrak = '" + Baru + "'");
string ket = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKontrak "
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ket + "'"
+ ",'" + Baru + "'"
);
}
protected void save_Click(object sender, System.EventArgs e)
{
DataTable rsHeaderBef = Db.Rs("SELECT "
+ " SkemaKomisi AS [Skema Komisi]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
DataTable rsBef = Db.Rs("SELECT "
+ "CONVERT(VARCHAR,NoUrut) + '. ' + NamaKomisi + ' ('+Tipe+') CAIR:' + CONVERT(VARCHAR,TermCair,1) + '% (' + Jadwal + ') ' + CONVERT(VARCHAR,NilaiKomisi,1) "
+ "FROM MS_KOMISI WHERE NoKontrak = '" + NoKontrak + "' ORDER BY NoUrut");
SaveKomisi();
DataTable rsHeaderAft = Db.Rs("SELECT "
+ " SkemaKomisi AS [Skema Komisi]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
DataTable rsAft = Db.Rs("SELECT "
+ "CONVERT(VARCHAR,NoUrut) + '. ' + NamaKomisi + ' ('+Tipe+') CAIR:' + CONVERT(VARCHAR,TermCair,1) + '% (' + Jadwal + ') ' + CONVERT(VARCHAR,NilaiKomisi,1) "
+ "FROM MS_KOMISI WHERE NoKontrak = '" + NoKontrak + "' ORDER BY NoUrut");
DataTable rsDetail = Db.Rs("SELECT"
+ " MS_KONTRAK.NoKontrak AS [No. Kontrak]"
+ ",MS_KONTRAK.NoUnit AS [Unit]"
+ ",MS_CUSTOMER.Nama AS [Customer]"
+ " FROM MS_KONTRAK INNER JOIN MS_CUSTOMER"
+ " ON MS_KONTRAK.NoCustomer = MS_CUSTOMER.NoCustomer"
+ " WHERE MS_KONTRAK.NoKontrak = '" + NoKontrak + "'");
string Ket = Cf.LogCapture(rsDetail)
+ Cf.LogCompare(rsHeaderBef, rsHeaderAft)
+ Cf.LogList(rsBef, rsAft, "JADWAL KOMISI");
Db.Execute("EXEC spLogKontrak"
+ " 'RK'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoKontrak + "'"
);
Response.Redirect("KomisiReset.aspx?done=" + NoKontrak);
}
private bool Save()
{
if (valid())
{
string KodeBaru = Cf.Pk(kode.Text);
string Nama = Cf.Str(nama.Text);
DataTable rsBef = Db.Rs("SELECT "
+ " Kode"
+ ",Nama"
+ " FROM SECLEVEL "
+ " WHERE Kode = '" + Kode + "'");
Db.Execute("EXEC spSecLevelEdit"
+ " '" + Kode + "'"
+ ",'" + KodeBaru + "'"
+ ",'" + Nama + "'"
);
DataTable rsAft = Db.Rs("SELECT "
+ " Kode"
+ ",Nama"
+ " FROM SECLEVEL "
+ " WHERE Kode = '" + KodeBaru + "'");
string KetLog = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogSeclevel"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + KetLog + "'"
+ ",'" + KodeBaru + "'"
);
return(true);
}
else
{
return(false);
}
}
private bool Save(DataTable rs, int i)
{
string Unit = Cf.Str(rs.Rows[i][0]);
if (Db.SingleInteger("SELECT COUNT(*) FROM MS_UNIT WHERE NoUnit = '" + Unit + "'") != 0)
{
string NoStock = Db.SingleString("SELECT NoStock FROM MS_UNIT WHERE NoUnit = '" + Unit + "'");
string Zoning = Cf.Str(rs.Rows[i][1]);
DataTable rsBef = Db.Rs("SELECT "
+ " Zoning "
+ " FROM MS_UNIT "
+ " WHERE NoStock = '" + NoStock + "'");
Db.Execute("UPDATE MS_UNIT "
+ " SET Zoning = '" + Zoning + "'"
+ " WHERE NoStock = '" + NoStock + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " Zoning "
+ " FROM MS_UNIT "
+ " WHERE NoStock = '" + NoStock + "'");
string Ket = "*** UPLOAD ZONING<br>Unit : " + Unit + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogUnit"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoStock + "'"
);
return(true);
}
else
{
return(false);
}
}
private bool Save()
{
if (valid())
{
string Bank = Cf.Str(bank.Text);
DataTable rsBef = Db.Rs("SELECT "
+ " NoVA AS [No. VA]"
+ ",Bank"
+ " FROM REF_VA"
+ " WHERE NoVA = '" + NoVA + "'");
Db.Execute("UPDATE REF_VA"
+ " SET Bank = '" + Cf.Str(bank.Text) + "'"
+ " WHERE NoVA = '" + NoVA + "'"
);
DataTable rsAft = Db.Rs("SELECT "
+ " NoVA AS [No. VA]"
+ ",Bank"
+ " FROM REF_VA"
+ " WHERE NoVA = '" + NoVA + "'");
string KetLog = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogVA"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + KetLog + "'"
+ ",'" + NoVA + "'"
);
return(true);
}
else
{
return(false);
}
}
private bool Save()
{
bool x = true;
if (valid())
{
string NamaTipe = Cf.Str(Nama.Text);
string Project = project.SelectedValue;
DataTable rsBef = Db.Rs("SELECT "
+ " Nama AS [Nama] "
+ " ,Project as [Project] "
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_TIPE_GIMMICK WHERE ID = " + ID);
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_TIPE_GIMMICK SET Nama = '" + NamaTipe + "',Project = '" + Project + "' WHERE ID = '" + ID + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " Nama AS [Nama] "
+ " ,Project as [Project] "
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_TIPE_GIMMICK WHERE ID = " + ID);
string ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogTipeGimmick"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ket + "'"
+ ",'" + ID + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_TIPE_GIMMICK_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_TIPE_GIMMICK_LOG SET Project = '" + project.Text + "' WHERE LogID = " + LogID);
Response.Redirect("TipeGimmickEdit.aspx?ID=" + ID + "&done=1");
}
return(x);
}
private bool Save()
{
if (valid())
{
string ID = Cf.Str(id.Text);
string Email = Cf.Str(email.Text);
string Project = Cf.Pk(project.SelectedValue);
DataTable rsBef = Db.Rs("SELECT "
+ " ID"
+ ",Email"
+ ",Project"
+ " FROM REF_EMAIL "
+ " WHERE ID = '" + ID + "'");
Db.Execute("UPDATE REF_EMAIL SET Email = '" + Email + "',Project ='" + Project + "' WHERE ID = " + ID);
DataTable rsAft = Db.Rs("SELECT "
+ " ID"
+ ",Email"
+ ",Project"
+ " FROM REF_EMAIL "
+ " WHERE ID = '" + ID + "'");
string KetLog = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogEmail"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + KetLog + "'"
+ ",'" + ID + "'"
);
return true;
}
else
return false;
}
protected void submitubah_Click1(object sender, EventArgs e)
{
TextBox nup = (TextBox)list.FindControl("nup_");
TextBox Tipe = (TextBox)list.FindControl("tipe_");
DataTable rsBef = Db.Rs("SELECT "
+ " NoNUP AS [No. NUP]"
+ ", Status AS [Jenis NUP]"
+ " FROM MS_NUP"
+ " WHERE NoNUP = '" + nup.Text + "' AND Tipe = '" + Jenis + "'"
);
//ubah status dan jenis
Db.Execute("UPDATE MS_NUP SET Status = 'P', FlagStatus = 1 WHERE NoNUP ='" + nup.Text + "' AND Tipe = '" + Jenis + "'");
DataTable rsAft = Db.Rs("SELECT "
+ " NoNUP AS [No. NUP]"
+ ", Status AS [Jenis NUP]"
+ " FROM MS_NUP"
+ " WHERE NoNUP = '" + nup.Text + "' AND Tipe = '" + Jenis + "'"
);
//Logfile
string Ket = "No NUP : " + nup.Text + "<br>"
+ "Keterangan rubah : " + ketubah.Text + "<br>"
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogNUP"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + nup.Text + "'"
+ ",'" + Jenis + "'"
);
Response.Redirect("ClosingNUP.aspx");
}
protected void ok_Click(object sender, System.EventArgs e)
{
string Bank = bank.SelectedValue;
DataTable rsBef = Db.Rs("SELECT "
+ "BankKPR AS [Bank KPR]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
Db.Execute("UPDATE MS_KONTRAK"
+ " SET BankKPR = '" + Bank + "'"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
DataTable rsAft = Db.Rs("SELECT "
+ "BankKPR AS [Bank KPR]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
string Ket = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKontrak"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + NoKontrak + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KONTRAK_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'");
Db.Execute("UPDATE MS_KONTRAK_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("KontrakProses.aspx?NoKontrak=" + NoKontrak + "&done=1");
}
private void Save()
{
string Status = "";
if (status.SelectedIndex != 0)
{
Status = status.SelectedItem.Text;
}
string Hasil = "", Ket = "";
if (Status == "TIDAK PERLU")
{
Hasil = Status;
}
DataTable rsBef = Db.Rs("SELECT "
+ "StatusOTS AS [Status OTS]"
+ ", TargetOTS AS [Target OTS]"
+ ", TglOTS AS [Tgl. OTS]"
+ ", HasilOTS AS [Hasil OTS]"
+ ", KetOTS AS [Keterangan OTS]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
Db.Execute("UPDATE MS_KONTRAK"
+ " SET StatusOTS = '" + Status + "'"
+ ", TargetOTS = NULL"
+ ", TglOTS = NULL"
+ ", HasilOTS = '" + Hasil + "'"
+ ", KetOTS = ''"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
if (dijadwalkan.Visible)
{
DateTime Target = Convert.ToDateTime(target.Text);
Hasil = "MENUNGGU";
Db.Execute("UPDATE MS_KONTRAK"
+ " SET TargetOTS = '" + Target + "'"
+ ", TglOTS = NULL"
+ ", HasilOTS = '" + Hasil + "'"
+ ", KetOTS = ''"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
}
if (selesai.Visible)
{
DateTime Tgl = Convert.ToDateTime(tgl.Text);
Hasil = hasil.SelectedValue;
Ket = Cf.Str(ket.Text);
Db.Execute("UPDATE MS_KONTRAK"
+ " SET TglOTS = '" + Tgl + "'"
+ ", HasilOTS = '" + Hasil + "'"
+ ", KetOTS = '" + Ket + "'"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
}
DataTable rsAft = Db.Rs("SELECT "
+ "StatusOTS AS [Status OTS]"
+ ", TargetOTS AS [Target OTS]"
+ ", TglOTS AS [Tgl. OTS]"
+ ", HasilOTS AS [Hasil OTS]"
+ ", KetOTS AS [Keterangan OTS]"
+ " FROM MS_KONTRAK"
+ " WHERE NoKontrak = '" + NoKontrak + "'"
);
//Logfile
string Log = Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogKontrak"
+ " 'KPAOTS'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Log + "'"
+ ",'" + NoKontrak + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KONTRAK_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'");
Db.Execute("UPDATE MS_KONTRAK_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
if (Request.QueryString["NoKontrak"] != null)
{
this.RegisterStartupScript(
"focusScript"
, "<script language='javascript' type='text/javascript'>"
+ "window.close();"
+ "</script>"
);
}
else
{
Response.Redirect("KontrakOTSEdit.aspx?done=" + NoKontrak);
}
}
private bool Save()
{
if (valid())
{
DateTime Tgl = Convert.ToDateTime(tgl.Text);
string Bank = Db.SingleString("SELECT Bank FROM REF_ACC WHERE Acc = '" + bank.SelectedValue + "'");
string Rekening = Db.SingleString("SELECT Rekening FROM REF_ACC WHERE Acc = '" + bank.SelectedValue + "'");
decimal Nilai = Convert.ToDecimal(nilai.Text);
string Ket = Cf.Str(ket.Text);
string NoKontrak = Cf.Str(nokontrak.Text);
string Unit = Db.SingleString("SELECT NoUnit FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'");
string Customer = Db.SingleString("SELECT Nama FROM ISC064_MARKETINGJUAL..MS_CUSTOMER WHERE NoCustomer = (SELECT NoCustomer FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "')");
DataTable rs = Db.Rs("SELECT "
+ " NoAnonim AS [No.]"
+ " FROM MS_ANONIM"
+ " WHERE NoAnonim = " + NoAnonim
);
DataTable rsBef = Db.Rs("SELECT "
+ " NoAnonim AS [No.]"
+ ",CONVERT(varchar,Tgl,106) AS Tgl"
+ ",AccountID"
+ ",Bank"
+ ",Rekening"
+ ",Nilai"
+ ",Unit"
+ ",Customer"
+ ",Ket AS [Keterangan Pembayaran]"
+ ",Status"
+ ",Project"
+ " FROM MS_ANONIM"
+ " WHERE NoAnonim = " + NoAnonim
);
Db.Execute("UPDATE MS_ANONIM SET"
+ " Tgl = '" + Tgl + "'"
+ ",Nilai = " + Nilai
+ ",AccountID = '" + bank.SelectedValue + "'"
+ ",Bank = '" + Bank + "'"
+ ",Rekening = '" + Rekening + "'"
+ ",Unit = '" + Unit + "'"
+ ",Customer = '" + Customer + "'"
+ ",NoKontrak = '" + NoKontrak + "'"
+ ",Ket = '" + Ket + "'"
+ ",Project = '" + project.SelectedValue + "'"
+ " WHERE NoAnonim = " + NoAnonim
);
if (Unit != "" || Customer != "" || Ket != "")
{
Db.Execute("UPDATE MS_ANONIM SET"
+ " Status = 'ID'"
+ " WHERE NoAnonim = " + NoAnonim
+ " AND Status = 'BARU'"
);
}
DataTable rsAft = Db.Rs("SELECT "
+ " NoAnonim AS [No.]"
+ ",CONVERT(varchar,Tgl,106) AS Tgl"
+ ",AccountID"
+ ",Bank"
+ ",Rekening"
+ ",Nilai"
+ ",NoKontrak"
+ ",Unit"
+ ",Customer"
+ ",Ket AS [Keterangan Pembayaran]"
+ ",Status"
+ ",Project"
+ " FROM MS_ANONIM"
+ " WHERE NoAnonim = " + NoAnonim
);
//Logfile
string ketlog = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogAnonim"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ketlog + "'"
+ ",'" + NoAnonim.ToString().PadLeft(5, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_ANONIM_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM MS_ANONIM WHERE NoAnonim = '" + NoAnonim + "'");
Db.Execute("UPDATE MS_ANONIM_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
return(true);
}
else
{
return(false);
}
}
private bool Save()
{
if (valid())
{
string Project = Db.SingleString("SELECT Project FROM MS_UNIT WHERE NoStock = (SELECT NoStock FROM MS_RESERVASI WHERE NoReservasi = '" + NoReservasi + "')");
DateTime Tgl = Convert.ToDateTime(tgl.Text);
DateTime TglExpire = Convert.ToDateTime(batas.Text);
int NoQueue = Convert.ToInt32(noqueue.Text);
decimal Netto = Convert.ToDecimal(nilai.Text);
string Skema = Cf.Str(skema.Text);
int NoAgent = Convert.ToInt32(agent.SelectedValue);
string Supervisor = Cf.Str(supervisor.Text);
string Manager = Cf.Str(manager.Text);
DataTable rsBef = Db.Rs("SELECT"
+ " CONVERT(varchar,MS_RESERVASI.Tgl,106) AS [Tanggal]"
+ ",CONVERT(varchar,MS_RESERVASI.TglExpire,100) AS [Batas Waktu]"
+ ",MS_RESERVASI.Netto AS [Nilai Pengikatan]"
+ ",MS_RESERVASI.Skema AS [Skema]"
+ ",MS_AGENT.Nama + ' ' + MS_AGENT.Principal AS Agent"
+ ",NoQueue AS [NUP]"
+ ",Supervisor AS [Supervisor]"
+ ",MS_AGENT.Manager AS [Manager]"
+ " FROM MS_RESERVASI"
+ " INNER JOIN MS_AGENT"
+ " ON MS_RESERVASI.NoAgent = MS_AGENT.NoAgent"
+ " WHERE NoReservasi = " + NoReservasi
);
Db.Execute("EXEC spReservasiEdit"
+ " " + NoReservasi
+ ", " + NoAgent
+ ",'" + Tgl + "'"
+ ",'" + TglExpire + "'"
+ ", " + Netto
+ ",'" + Skema + "'"
+ ", " + NoQueue
);
Db.Execute("UPDATE MS_RESERVASI SET "
+ " Supervisor ='" + Supervisor + "'"
+ ",Manager ='" + Manager + "'"
+ " WHERE NoReservasi = '" + NoReservasi + "'"
);
DataTable rsAft = Db.Rs("SELECT"
+ " CONVERT(varchar,MS_RESERVASI.Tgl,106) AS [Tanggal]"
+ ",CONVERT(varchar,MS_RESERVASI.TglExpire,100) AS [Batas Waktu]"
+ ",MS_RESERVASI.Netto AS [Nilai Pengikatan]"
+ ",MS_RESERVASI.Skema AS [Skema]"
+ ",MS_AGENT.Nama + ' ' + MS_AGENT.Principal AS Agent"
+ ",NoQueue AS [NUP]"
+ ",Supervisor AS [Supervisor]"
+ ",MS_AGENT.Manager AS [Manager]"
+ " FROM MS_RESERVASI"
+ " INNER JOIN MS_AGENT"
+ " ON MS_RESERVASI.NoAgent = MS_AGENT.NoAgent"
+ " WHERE NoReservasi = " + NoReservasi
);
Db.Execute("EXEC spLogReservasi"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCompare(rsBef, rsAft) + "'"
+ ",'" + NoReservasi.ToString().PadLeft(5, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_RESERVASI_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE MS_RESERVASI_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
return(true);
}
else
{
return(false);
}
}
void EditLoger(string Nomor)
{
DataTable rsHeader = Db.Rs("SELECT "
+ " NoSkema"
+ ",SalesTipe"
+ ",Nama"
+ ",CONVERT(varchar,Dari,106) AS [Periode Dari]"
+ ",CONVERT(varchar,Sampai,106) AS [Periode Sampai]"
+ ",Rumus AS [Rumus Komisi]"
+ ",DasarHitung AS [Dasar Perhitungan]"
+ ",Inaktif AS [Status Inaktif]"
+ ",NoTermin AS [No. Termin]"
+ ",(SELECT Nama FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKOM_TERM WHERE REF_SKOM_TERM.NoTermin = REF_SKOM.NoTermin) AS [Nama Termin]"
+ ",CaraBayar AS [Cara Bayar]"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKOM "
+ " WHERE NoSkema = " + Nomor);
DataTable rsSkemaBef = Db.Rs("SELECT [Nama] as [Nama Komisi] "
+ " ,case when [Inaktif]=0 then 'Aktif' else 'Inaktif' end as [Status] "
+ " ,(SELECT Tipe FROM REF_AGENT_TIPE WHERE ID = SalesTipe) AS [Tipe Sales] "
+ " ,[Dari] "
+ " ,[Sampai]"
+ " ,[Rumus]"
+ " ,[DasarHitung]"
+ " FROM REF_SKOM where NoSkema = " + Nomor);
DataTable rsDetailBef = Db.Rs("SELECT "
+ "CONVERT(VARCHAR,SN) + '. ' + (SELECT Nama FROM REF_AGENT_LEVEL WHERE LevelID = SalesLevel) + ' ' + CONVERT(VARCHAR,Nilai,1) + ' ' + TipeTarif "
+ "FROM REF_SKOM_DETAIL WHERE NoSkema = '" + Nomor + "' ORDER BY SN");
DataTable rsDetailBef2 = Db.Rs("SELECT "
+ "CONVERT(VARCHAR,SN) + '. ' + (SELECT Nama FROM REF_AGENT_LEVEL WHERE LevelID = SalesLevel) + ' ' + CONVERT(VARCHAR,TargetBawah,1) + ' - ' + CONVERT(VARCHAR,TargetAtas,1) + ' (' + TipeTarget + ') ' + CONVERT(VARCHAR,Nilai,1) + ' ' + TipeTarif "
+ "FROM REF_SKOM_DETAIL2 WHERE NoSkema = '" + Nomor + "' ORDER BY SN");
UpdateSkema();
DataTable rsSkemaAft = Db.Rs("SELECT [Nama] as [Nama Komisi] "
+ " ,CASE WHEN [Inaktif]=0 THEN 'Aktif' ELSE 'Inaktif' END AS [Status] "
+ " ,(SELECT Tipe FROM REF_AGENT_TIPE WHERE ID = SalesTipe) AS [Tipe Sales] "
+ " ,[Dari] "
+ " ,[Sampai]"
+ " ,[Rumus]"
+ " ,[DasarHitung]"
+ " FROM REF_SKOM WHERE NoSkema = " + Nomor);
if (rumus.SelectedValue == "UNIT")
{
UpdateSkemaDetail();
}
else
{
UpdateSkemaDetail2();
}
DataTable rsDetailAft = Db.Rs("SELECT "
+ "CONVERT(VARCHAR,SN) + '. ' + (SELECT Nama FROM REF_AGENT_LEVEL WHERE LevelID = SalesLevel) + ' ' + CONVERT(VARCHAR,Nilai,1) + ' ' + TipeTarif "
+ "FROM REF_SKOM_DETAIL WHERE NoSkema = '" + Nomor + "' ORDER BY SN");
DataTable rsDetailAft2 = Db.Rs("SELECT "
+ "CONVERT(VARCHAR,SN) + '. ' + (SELECT Nama FROM REF_AGENT_LEVEL WHERE LevelID = SalesLevel) + ' ' + CONVERT(VARCHAR,TargetBawah,1) + ' - ' + CONVERT(VARCHAR,TargetAtas,1) + ' (' + TipeTarget + ') ' + CONVERT(VARCHAR,Nilai,1) + ' ' + TipeTarif "
+ "FROM REF_SKOM_DETAIL2 WHERE NoSkema = '" + Nomor + "' ORDER BY SN");
string Ket = Cf.LogCapture(rsHeader)
+ "<br>---EDIT SKEMA---<br>"
+ Cf.LogCompare(rsSkemaBef, rsSkemaAft)
+ "<br>---EDIT RUMUS---<br>"
+ Cf.LogList(rsDetailBef, rsDetailAft, "RUMUS UNIT")
+ Cf.LogList(rsDetailBef2, rsDetailAft2, "RUMUS KUMULATIF/PROGRESIF");
Db.Execute("EXEC spLogSkom"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Ket + "'"
+ ",'" + Nomor.PadLeft(5, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM REF_SKOM_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM REF_SKOM WHERE NoSkema = " + Nomor);
Db.Execute("UPDATE REF_SKOM_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
}
