private void init()
{
tgl.Text = Cf.Day(DateTime.Now);
string strSql = "SELECT NoAgent, Nama FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT";
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
ddlAgent.Items.Add(new ListItem(rs.Rows[i]["Nama"].ToString(), Cf.Pk(rs.Rows[i]["NoAgent"])));
}
strSql = "SELECT DISTINCT Principal FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT";
rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
cblPrincipal.Items.Add(new ListItem(rs.Rows[i]["Principal"].ToString()));
cblPrincipal.Items[i].Selected = true;
}
rs = Db.Rs("SELECT DISTINCT Lokasi FROM MS_KONTRAK ORDER BY Lokasi");
for (int i = 0; i < rs.Rows.Count; i++)
{
lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
}
private void init()
{
tgl.Text = Cf.Day(DateTime.Now);
string aa = "";
if (UserAgent() > 0)
{
aa = " AND NoAgent = " + UserAgent();
}
string Project = project.SelectedValue == "SEMUA" ? "Project IN (" + Act.ProjectListSql + ")" : "Project = '" + project.SelectedValue + "'";
string strSql = "SELECT NoAgent, Nama FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT WHERE " + Project + aa;
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
ddlAgent.Items.Add(new ListItem(rs.Rows[i]["Nama"].ToString(), Cf.Pk(rs.Rows[i]["NoAgent"])));
}
rs = Db.Rs("SELECT DISTINCT Lokasi FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE " + Project + " ORDER BY Lokasi ");
for (int i = 0; i < rs.Rows.Count; i++)
{
lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
lokasi.SelectedIndex = 0;
}
private string SisaPelunasan(string NoKontrak, string NoTagihan, decimal Sisa)
{
System.Text.StringBuilder x = new System.Text.StringBuilder();
string strSql = "SELECT ISNULL(NilaiPelunasan, 0) AS NilaiPelunasan"
+ " FROM MS_PELUNASAN"
+ " WHERE NoKontrak = '" + Cf.Pk(NoKontrak) + "'"
+ " AND NoTagihan = " + NoTagihan
;
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count > 1)
{
for (int i = 0; i < rs.Rows.Count; i++)
{
Sisa = Sisa - Convert.ToDecimal(rs.Rows[i]["NilaiPelunasan"]);
x.Append(Cf.Num(Sisa) + "<br />");
}
return(x.ToString());
}
else if (rs.Rows.Count == 1)
{
Sisa = Sisa - Convert.ToDecimal(rs.Rows[0]["NilaiPelunasan"]);
return(Cf.Num(Sisa));
}
else
{
return(Cf.Num(Sisa));
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
Act.NoCache();
if (!Page.IsPostBack)
{
InitForm();
Fill();
divPersenBertingkat.Visible = false;
divLumpSum.Visible = true;
nostock.Text = Db.SingleString(
"SELECT NoStock FROM MS_UNIT WHERE NoUnit = '" + Cf.Pk(unit.Text) + "'");
tglKontrak.Text = Cf.Day(DateTime.Today);
Surcharge.Attributes["onfocus"] = "tempnum=CalcFocus(this);";
Surcharge.Attributes["onkeyup"] = "CalcType(this,tempnum);";
Surcharge.Attributes["onblur"] = "CalcBlur(this);";
Pricelist.Attributes["onfocus"] = "tempnum=CalcFocus(this);";
Pricelist.Attributes["onkeyup"] = "CalcType(this,tempnum);";
Pricelist.Attributes["onblur"] = "CalcBlur(this);";
diskonLumpSum.Attributes["onfocus"] = "tempnum=CalcFocus(this);";
diskonLumpSum.Attributes["onkeyup"] = "CalcType(this,tempnum);";
diskonLumpSum.Attributes["onblur"] = "CalcBlur(this);";
}
}
private void UpdateSkema()
{
string Nama = Cf.Str(nama.Text);
string Diskon = Cf.Str(diskon.Text);
string DiskonKet = Cf.Str(diskonket.Text);
string Bunga = Cf.Str(bunga2.Text);
string BungaKet = Cf.Str(bungaket.Text);
string Project = Cf.Pk(project.SelectedValue);
string Status = "";
if (aktif.Checked)
{
Status = "A";
}
else if (inaktif.Checked)
{
Status = "I";
}
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaEdit"
+ " " + Nomor
+ ",'" + Nama + "'"
+ ",'" + Diskon + "'"
+ ",'" + DiskonKet + "'"
+ ",'" + Bunga + "'"
+ ",'" + BungaKet + "'"
+ ", " + Cf.BoolToSql(round.Checked)
+ ",'" + Status + "'"
+ ",'" + Project + "'"
);
}
protected string Lunas(string NoKontrak, string NoTagihan, string s, string t)
{
System.Text.StringBuilder x = new System.Text.StringBuilder();
string strSql = "";
int bayar = Db.SingleInteger("SELECT COUNT(*) FROM ISC064_MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = '" + NoKontrak + "' AND NoTagihan = " + NoTagihan);
if (bayar != 0)
{
int tts = Db.SingleInteger("SELECT NoTTS FROM ISC064_MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = '" + NoKontrak + "' AND NoTagihan = " + NoTagihan);
if (tts == 0)
{
strSql = "SELECT " + t
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN ISC064_FINANCEAR..MS_MEMO b ON a.NoMEMO = b.NoMEMO"
+ " WHERE NoKontrak = '" + Cf.Pk(NoKontrak) + "'"
+ " AND NoTagihan = " + NoTagihan
;
}
else
{
strSql = "SELECT " + s
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN ISC064_FINANCEAR..MS_TTS b ON a.NoTTS = b.NoTTS"
+ " WHERE NoKontrak = '" + Cf.Pk(NoKontrak) + "'"
+ " AND NoTagihan = " + NoTagihan
+ " AND b.Status <> 'VOID'"
;
}
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
if (rs.Rows[i][0].GetType().ToString() == "System.DateTime")
{
x.Append(Cf.Day(rs.Rows[i][0]));
}
else if (rs.Rows[i][0].GetType().ToString() == "System.Decimal")
{
x.Append(Cf.Num(Math.Round(Convert.ToDecimal(rs.Rows[i][0]), 0)));
}
else
{
x.Append(rs.Rows[i][0].ToString());
}
if (i < (rs.Rows.Count - 1))
{
x.Append("<br />");
}
}
}
if (x.ToString() == "")
{
return(" ");
}
else
{
return(x.ToString());
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
if (!Page.IsPostBack)
{
backbtn.Visible = false;
hasil.Visible = false;
nokontrak1.Attributes["ondblclick"] = "popDaftarKontrak('a&tag=1');";
InitForm();
if (Request.QueryString["NoKontrak"] != null)
{
//dari halaman kontrak
dariDaftar.Checked = true;
nokontrak1.Text = Cf.Pk(Request.QueryString["NoKontrak"]);
cancel.Attributes["onclick"] = "location.href='KontrakDaftar3.aspx?NoKontrak="
+ Cf.Pk(Request.QueryString["NoKontrak"]) + "'";
LoadKontrak();
}
else
{
Js.Focus(this, nokontrak1);
frm.Visible = false;
hasil.Visible = false;
}
}
FeedBack();
if (hasil.Visible)
{
Js.Confirm(this, "Lanjutkan proses customize tagihan?");
Isi(false);
}
}
private string TglPelunasan(string NoKontrak, string NoTagihan)
{
System.Text.StringBuilder x = new System.Text.StringBuilder();
string strSql = "SELECT TglPelunasan"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN"
+ " WHERE NoKontrak = '" + Cf.Pk(NoKontrak) + "'"
+ " AND NoTagihan = " + NoTagihan
+ " ORDER BY TglPelunasan DESC"
;
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count > 1)
{
for (int i = 0; i < rs.Rows.Count; i++)
{
x.Append(Cf.Day(rs.Rows[i]["TglPelunasan"]) + "<br/>");
}
return(x.ToString());
}
else
if (rs.Rows.Count == 1)
{
return(Cf.Day(rs.Rows[0]["TglPelunasan"]));
}
else
{
return(Cf.Day("1-1-1900"));
}
}
private string NilaiPelunasan(string NoKontrak, string NoTagihan)
{
System.Text.StringBuilder x = new System.Text.StringBuilder();
string strSql = "SELECT ISNULL(NilaiPelunasan, 0) AS NilaiPelunasan"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN"
+ " WHERE NoKontrak = '" + Cf.Pk(NoKontrak) + "'"
+ " AND NoTagihan = " + NoTagihan
+ " ORDER BY TglPelunasan DESC"
;
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count > 1)
{
for (int i = 0; i < rs.Rows.Count; i++)
{
x.Append(Cf.Num(Convert.ToDecimal(rs.Rows[i]["NilaiPelunasan"])) + "<br/>");
}
return(x.ToString());
}
else if (rs.Rows.Count == 1)
{
return(Cf.Num(Convert.ToDecimal(rs.Rows[0]["NilaiPelunasan"])));
}
else
{
return(Cf.Num((decimal)0.00));
}
}
protected void save_Click(object sender, EventArgs e)
{
if (valid())
{
string Nama = Cf.Pk(lokasi.Text);
string No = Cf.Pk(nolokasi.Text);
int c = Db.SingleInteger("SELECT COUNT(NamaGrouping) FROM REF_FOLLOWUP WHERE NamaGrouping = '" + Nama + "'");
if (c > 1)
{
nolokasi.Text = "#AUTO#";
lokasic.Text = "Duplikat";
Js.Alert(
this
, "Unit Tidak Valid.\\n\\n"
+ "Kemungkinan Sebab :\\n"
+ "1. Nama Follow Up sudah ada.\\n"
, "document.getElementById('nounit').focus();"
+ "document.getElementById('nounit').select();"
);
}
else
{
Db.Execute("INSERT INTO REF_FOLLOWUP(NamaGrouping) VALUES('" + Nama + "')");
Response.Redirect("FollowUp.aspx?done=" + NoLokasi);
}
}
}
private string NoKuitansi(string NoKontrak, string NoTagihan)
{
System.Text.StringBuilder x = new System.Text.StringBuilder();
string strSql = "SELECT ManualTTS FROM MS_PELUNASAN "
+ " WHERE NoKontrak = '" + Cf.Pk(NoKontrak) + "'"
+ " AND NoTagihan = " + NoTagihan
+ " ORDER BY TglPelunasan DESC"
;
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count > 1)
{
for (int i = 0; i < rs.Rows.Count; i++)
{
x.Append(Cf.Str(rs.Rows[i]["ManualTTS"].ToString()) + "<br/>");
}
return(x.ToString());
}
else if (rs.Rows.Count == 1)
{
return(Cf.Str(rs.Rows[0]["ManualTTS"].ToString()));
}
else
{
return("");
}
}
protected void save_Click(object sender, System.EventArgs e)
{
Fill();
if (datavalid())
{
string NoBGBaru = Cf.Pk(nobgbaru.Text);
DateTime TglBG = Convert.ToDateTime(tglbg.Text);
Db.Execute("EXEC spTTSGiroGanti "
+ " '" + NoBG + "'"
+ ",'" + NoBGBaru + "'"
+ ",'" + TglBG + "'"
);
DataTable rs = Db.Rs("SELECT NoTTS FROM MS_TTS WHERE NoBG = '" + NoBGBaru + "'");
for (int i = 0; i < rs.Rows.Count; i++)
{
int NoTTS = (int)rs.Rows[i]["NoTTS"];
DataTable rsLog = Db.Rs("SELECT "
+ " NoTTS AS [No. TTS]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",Total AS [Nilai TTS]"
+ ",'" + NoBG + "' AS [No. BG Lama]"
+ ",NoBG AS [No. BG Baru]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
//Logfile
string ketlog = Cf.LogCapture(rsLog);
Db.Execute("EXEC spLogTTS"
+ " 'GANTI'"
+ ",'" + 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);
}
if (dariReminder.Checked)
{
Response.Redirect("ReminderBGBad.aspx?done=" + NoBGBaru);
}
else
{
Response.Redirect("BGGanti.aspx?done=" + NoBGBaru);
}
}
}
private void Fill()
{
if (Request.QueryString["from"] != null && Request.QueryString["to"] != null)
{
tbDari.Text = Cf.Pk(Request.QueryString["from"]);
tbSampai.Text = Cf.Pk(Request.QueryString["to"]);
}
}
private void Fill()
{
string strSql = "SELECT *"
+ " FROM MS_RESERVASI_OBS"
+ " WHERE Reminder = 0"
+ " ORDER BY NoObs";
DataTable rs = Db.Rs(strSql);
Rpt.NoData(rpt, rs, "Reminder untuk topik diatas masih kosong.");
for (int i = 0; i < rs.Rows.Count; i++)
{
if (!Response.IsClientConnected)
{
break;
}
TableRow r = new TableRow();
TableCell c;
c = new TableCell();
c.Text = rs.Rows[i]["NoObs"].ToString().PadLeft(5, '0');
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["NoUnit"].ToString()
+ "<br /><i>NUP: " + rs.Rows[i]["NoQueue"].ToString() + "</i>"
+ "<br /><strong><font style='font-size: 15pt;'>" + rs.Rows[i]["NoUrut"].ToString() + "</font></strong>"
;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Str(rs.Rows[i]["Customer"])
+ "<br />" + Cf.Str(rs.Rows[i]["Agent"])
;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Date(rs.Rows[i]["Tgl"])
+ "<br />" + Cf.Date(rs.Rows[i]["TglExpire"])
;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Str(rs.Rows[i]["Skema"])
+ "<br />" + Cf.Num(rs.Rows[i]["Netto"])
;
r.Cells.Add(c);
c = new TableCell();
c.Text = "<a href='ReminderObsProses.aspx?NoObs=" + Cf.Pk(rs.Rows[i]["NoObs"]) + "' onclick=\"javascript:return confirm('Anda yakin ingin follow up?');\" />Follow up...</a>";
r.Cells.Add(c);
Rpt.Border(r);
rpt.Rows.Add(r);
}
}
protected void save_Click(object sender, System.EventArgs e)
{
if (valid())
{
//Generate nomor unik
AutoID();
string Nama = Cf.Pk(nama.Text);
string ID = Cf.Pk(nolevel.Text);
string Tipe = tipe.SelectedValue;
string Parent = parent.SelectedValue;
string Project = project.SelectedValue;
int c = Db.SingleInteger("SELECT COUNT(Nama) FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_LEVEL WHERE Nama = '" + Nama + "' AND Project = '" + Project + "'");
if (c == 1)
{
nolevel.Text = "#AUTO#";
namac.Text = "Duplikat";
parentc.Text = "Duplikat";
Js.Alert(
this
, "Tipe Tidak Valid.\\n\\n"
+ "Kemungkinan Sebab :\\n"
+ "1. Nama sudah ada.\\n"
, "document.getElementById('nounit').focus();"
+ "document.getElementById('nounit').select();"
);
// Response.Write(Jenis + NamaJenis + SN);
}
else
{
Db.Execute("INSERT INTO " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_LEVEL (Nama,Tipe,ParentID,Project) Values('" + Nama + "','" + Tipe + "','" + Parent + "','" + Project + "')");
int ID2 = Db.SingleInteger("SELECT TOP 1 LevelID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_LEVEL ORDER BY LevelID DESC");
DataTable rs = Db.Rs("SELECT "
+ " LevelID"
+ ",Nama"
+ ",Project"
+ ",Tipe"
+ ",ParentID"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_LEVEL "
+ " WHERE LevelID = '" + ID2 + "'");
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogLevelSales"
+ " 'DAFTAR'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + ID2 + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_LEVEL_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_LEVEL_LOG SET Project = '" + project.SelectedValue + "' WHERE LogID = " + LogID);
Response.Redirect("LevelSalesDaftar.aspx?done=" + ID2 + "&project=" + project.SelectedValue);
}
}
}
protected void save_Click(object sender, EventArgs e)
{
if (Valid)
{
Db.Execute("spRefAdminLaunching '" + Cf.Pk(nama.Text) + "','" + Cf.Pk(username.SelectedValue) + "'," + nomor.Text);
int id = Db.SingleInteger("select Max(ID) from REF_ADMIN_LAUNCHING");
Response.Redirect("CounterLaunching.aspx?done=" + id);
}
}
protected void save_Click(object sender, System.EventArgs e)
{
string AccBaru = Cf.Pk(acc.Text);
if (Save())
{
Response.Redirect("AccEdit.aspx?Acc=" + AccBaru + ";" + subid.Text.ToString() + "&done=1");
}
}
private void Fill()
{
string Dari = dari.Text;
string Sampai = sampai.Text;
if (Dari.CompareTo(Sampai) == 1)
{
string swap = Dari;
Dari = Sampai;
Sampai = swap;
}
string strSql = "SELECT "
+ " MS_AGENT.NoAgent"
+ ", MS_AGENT.Nama"
+ " FROM MS_AGENT"
+ " WHERE NoAgent BETWEEN " + Dari + " AND " + Sampai
+ " AND "
+ " (SELECT COUNT(*) FROM MS_KONTRAK WHERE NoAgent = MS_AGENT.NoAgent) > 0"
;
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
if (!Response.IsClientConnected)
{
break;
}
Label l;
//HEADER
l = new Label();
l.Text = "<table><tr><td colspan='3'><h1>LAPORAN TRANSAKSI KOMISI BULANAN<br />" + Mi.Pt + "<br />PETRA TOWN SQUARE</h1></td></tr></table>";
rpt.Controls.Add(l);
l = new Label();
l.Text = "<table>";
rpt.Controls.Add(l);
//NO. AGENT
l = new Label();
l.Text = "<tr><td>No. Sales</td><td>:</td><td>" + rs.Rows[i]["NoAgent"].ToString() + "</td></tr>";
rpt.Controls.Add(l);
//NAMA
l = new Label();
l.Text = "<tr><td>Nama</td><td>:</td><td>" + rs.Rows[i]["Nama"].ToString() + "</td></tr>";
rpt.Controls.Add(l);
l = new Label();
l.Text = "</table><br />";
rpt.Controls.Add(l);
FillKomisi(Cf.Pk(rs.Rows[i]["NoAgent"]));
}
}
protected void save_Click(object sender, System.EventArgs e)
{
string KodeBaru = Cf.Pk(kode.Text);
if (Save())
{
Response.Redirect("SecLevelEdit.aspx?Kode=" + KodeBaru + "&done=1");
}
}
protected void save_Click(object sender, System.EventArgs e)
{
string KodeBaru = Cf.Pk(kode.Text);
if (Save())
{
Response.Redirect("RetensiEdit.aspx?Kode=" + KodeBaru + "&done=1&project=" + project.SelectedValue);
}
}
protected void Fill()
{
string strSql = "SELECT a.*, b.*"
+ " FROM MS_KONTRAK a"
+ " INNER JOIN " + Mi.DbPrefix + "MARKETINGJUAL..MS_CUSTOMER b ON a.NoCustomer = b.NoCustomer"
+ " WHERE NoKontrak = '" + nomor + "'"
;
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count != 0)
{
//System.Configuration.AppSettingsReader s = new System.Configuration.AppSettingsReader();
//string HeaderPajak = "";
//string JenisPPN = Db.SingleString("SELECT JenisPPN FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + Cf.Pk(rs.Rows[0]["NoKontrak"]) + "'");
//if (JenisPPN == "PEMERINTAH")
// HeaderPajak = (string)s.GetValue("NoFPSPemerintah", typeof(string));
//else if (JenisPPN == "KONSUMEN")
// HeaderPajak = (string)s.GetValue("NoFPSKonsumen", typeof(string));
nama.Text = rs.Rows[0]["Nama"].ToString();
nopajak.Text = rs.Rows[0]["NoFPS"].ToString();
strSql = "SELECT KTP1, KTP2, KTP3, KTP4"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_CUSTOMER"
+ " WHERE NoCustomer = " + Cf.Pk(rs.Rows[0]["NoCustomer"])
;
DataTable rsCs = Db.Rs(strSql);
alamat.Text = rsCs.Rows[0]["KTP1"]
+ "<br />"
+ rsCs.Rows[0]["KTP2"]
+ "<br />"
+ rsCs.Rows[0]["KTP3"]
+ "<br />"
+ rsCs.Rows[0]["KTP4"]
;
//Tanggal FPS
//DateTime dt = DateTime.Now;
//string tglFPS = Cf.Day(dt);
//tgl.Text = Convert.ToDateTime(dt).Day
// + " "
// + Cf.Monthname(Convert.ToDateTime(dt).Month)
// + " "
// + Convert.ToDateTime(dt).Year
// ;
tgl.Text = Convert.ToDateTime(rs.Rows[0]["TglAJB"]).Day
+ " "
+ Cf.Monthname(Convert.ToDateTime(rs.Rows[0]["TglAJB"]).Month)
+ " "
+ Convert.ToDateTime(rs.Rows[0]["TglAJB"]).Year
;
//Db.Execute("UPDATE MS_KONTRAK SET TglFPS='" + rs.Rows[0]["TglBKM"] + "' WHERE NoKontrak ='" + nomor + "'");
FillTable();
}
}
protected void ok_Click(object sender, System.EventArgs e)
{
ok.Enabled = false;
string Approve = Act.UserID + ", " + Cf.Day(DateTime.Today);
Db.Execute("UPDATE " + Tb
+ " SET Approve = '" + Cf.Pk(Approve) + "'"
+ " WHERE LogID = " + LogID
);
}
protected void save_Click(object sender, System.EventArgs e)
{
if (valid())
{
//Generate nomor unik
AutoID();
string Jenis = Cf.Pk(jenis.Text);
string SN = Cf.Pk(nojenis.Text);
string NamaJenis = namajenis.Text;
string Project = project.SelectedValue;
int c = Db.SingleInteger("SELECT COUNT(JenisProperti) FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_JENISPROPERTI WHERE JenisProperti = '" + Jenis + "' AND Project = '" + Project + "'");
if (c == 1)
{
nojenis.Text = "#AUTO#";
jenisc.Text = "Duplikat";
Js.Alert(
this
, "Unit Tidak Valid.\\n\\n"
+ "Kemungkinan Sebab :\\n"
+ "1. Jenis Properti Unit sudah ada.\\n"
, "document.getElementById('nounit').focus();"
+ "document.getElementById('nounit').select();"
);
// Response.Write(Jenis + NamaJenis + SN);
}
else
{
Db.Execute("INSERT INTO " + Mi.DbPrefix + "MARKETINGJUAL..REF_JENISPROPERTI (JenisProperti,Nama,SN,Project) Values('" + Jenis + "','" + NamaJenis + "','" + SN + "','" + Project + "')");
DataTable rs = Db.Rs("SELECT "
+ " JenisProperti"
+ ",Nama"
+ ",Project"
+ ",SN"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_JENISPROPERTI "
+ " WHERE SN = '" + SN + "'");
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogJenisProperti"
+ " 'DAFTAR'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + SN + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_JENISPROPERTI_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_JENISPROPERTI_LOG SET Project = '" + project.SelectedValue + "' WHERE LogID = " + LogID);
Response.Redirect("JenisPropertiDaftar.aspx?done=" + NoJenis + "&project=" + project.SelectedValue);
}
}
}
protected void ok_Click(object sender, System.EventArgs e)
{
if (valid())
{
string Acc = Cf.Pk(acc.Text);
string Rekening = Cf.Str(rekening.Text);
string Bank = Cf.Str(bank.Text);
string Cabang = Cf.Str(cabang1.Text);
string AtasNama = Cf.Str(atasnama.Text);
decimal SaldoAwal = 0;
if (saldoawal.Text != "")
{
SaldoAwal = Convert.ToDecimal(saldoawal.Text);
}
string Project = Cf.Pk(project.SelectedValue);
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spAccBaru"
+ " '" + Acc + "'"
+ ",'" + Rekening + "'"
+ ",'" + Bank + "'"
+ ",'" + Cabang + "'"
+ ",'" + AtasNama + "'"
+ ", " + SaldoAwal
+ ",'" + subid.Text + "'"
+ ",'" + Project + "'"
);
DataTable rs = Db.Rs("SELECT "
+ " Acc AS [No. Account]"
+ ",Rekening"
+ ",Project"
+ ",Bank"
+ ",AtasNama AS [Atas Nama]"
+ ",SaldoAwal AS [Saldo Awal]"
+ " FROM " + Mi.DbPrefix + "FINANCEAR..REF_ACC "
+ " WHERE Acc = '" + Acc + "'");
string KetLog = Cf.LogCapture(rs);
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spLogAcc"
+ " 'REGIS'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + KetLog + "'"
+ ",'" + Acc + ";" + subid.Text + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM REF_ACC_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE REF_ACC_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("Acc.aspx?done=" + Acc + "&project=" + project.SelectedValue);
}
}
protected void save_Click(object sender, System.EventArgs e)
{
if (valid())
{
//Generate nomor unik
////AutoID();
string Tipe = Cf.Pk(tipe.Text);
//string ID = Cf.Pk(notipe.Text);
string Project = Cf.Pk(project.SelectedValue);
int c = Db.SingleInteger("SELECT COUNT(Tipe) FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE WHERE Tipe = '" + Tipe + "' AND Project = '" + Project + "'");
if (c == 1)
{
notipe.Text = "#AUTO#";
tipec.Text = "Duplikat";
Js.Alert(
this
, "Tipe Tidak Valid.\\n\\n"
+ "Kemungkinan Sebab :\\n"
+ "1. Tipe Sales sudah ada.\\n"
, "document.getElementById('nounit').focus();"
+ "document.getElementById('nounit').select();"
);
}
else
{
Db.Execute("INSERT INTO " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE (Tipe, Project) Values('" + Tipe + "', '" + Project + "')");
int ID = Db.SingleInteger("SELECT TOP 1 ID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE ORDER BY ID DESC");
DataTable rs = Db.Rs("SELECT "
+ " ID"
+ ",Project"
+ ",Tipe"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE "
+ " WHERE ID = '" + ID + "'");
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogTipeSales"
+ " 'DAFTAR'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + ID + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_AGENT_TIPE_LOG SET Project = '" + project.SelectedValue + "' WHERE LogID = " + LogID);
Response.Redirect("TipeSalesDaftar.aspx?done=" + ID + "&project=" + project.SelectedValue);
}
}
}
protected void save_Click(object sender, System.EventArgs e)
{
if (valid())
{
//Generate nomor unik
AutoID();
string Jenis = Cf.Pk(jenis.Text);
string SN = Cf.Pk(nojenis.Text);
string NamaJenis = namajenis.Text;
int c = Db.SingleInteger("SELECT COUNT(Jenis) FROM REF_JENIS WHERE Jenis = '" + Jenis + "'");
if (c == 1)
{
nojenis.Text = "#AUTO#";
jenisc.Text = "Duplikat";
Js.Alert(
this
, "Unit Tidak Valid.\\n\\n"
+ "Kemungkinan Sebab :\\n"
+ "1. Jenis Unit sudah ada.\\n"
, "document.getElementById('nounit').focus();"
+ "document.getElementById('nounit').select();"
);
// Response.Write(Jenis + NamaJenis + SN);
}
else
{
Db.Execute("INSERT INTO REF_JENIS (Jenis,Nama,SN,Project) Values('" + Jenis + "','" + NamaJenis + "','" + SN + "','" + project.SelectedValue + "')");
DataTable rs = Db.Rs("SELECT "
+ " Jenis"
+ ",Nama"
+ ",SN"
+ ",Project"
+ " FROM REF_JENIS "
+ " WHERE SN = '" + SN + "'");
Db.Execute("EXEC spLogJenis"
+ " 'DAFTAR'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + SN + "'"
);
Response.Redirect("JenisDaftar.aspx?done=" + NoJenis);
}
}
}
private bool Save(DataTable rs, int i)
{
string NoBG = Cf.Pk(rs.Rows[i][0]);
string Titip = Cf.Str(rs.Rows[i][1]);
//Jika data NA maka diisi dengan string kosong saja di dalam database
if (Titip == "NA")
{
Titip = "";
}
//execute
Db.Execute("UPDATE MS_TTS SET Titip = '" + Titip + "' WHERE NoBG = '" + NoBG + "'");
DataTable rsLog = Db.Rs("SELECT NoTTS FROM MS_TTS WHERE NoBG = '" + NoBG + "'");
for (int ix = 0; ix < rsLog.Rows.Count; ix++)
{
int NoTTS = (int)rsLog.Rows[ix]["NoTTS"];
DataTable rsHeader = Db.Rs("SELECT "
+ " NoTTS AS [No. TTS]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",Total AS [Nilai TTS]"
+ ",NoBG AS [No. BG]"
+ ",Titip AS [Pengelola BG]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
//Logfile
string ketlog = Cf.LogCapture(rsHeader);
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);
}
return(true);
}
private void Fill()
{
string strSql = " SELECT * FROM MS_KONTRAK INNER JOIN MS_CUSTOMER ON MS_KONTRAK.NoCustomer = MS_CUSTOMER.NoCustomer"
+ " WHERE NoKontrak = '" + nomor + "'";
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count != 0)
{
namacust.Text = rs.Rows[0]["Nama"].ToString();
alamat.Text = rs.Rows[0]["Alamat1"]
+ "<br />" + rs.Rows[0]["Alamat2"]
+ "<br />" + rs.Rows[0]["Alamat3"];
notelp.Text = rs.Rows[0]["NoTelp"].ToString();
nohp.Text = rs.Rows[0]["NoHP"].ToString();
noktp.Text = rs.Rows[0]["NoKTP"].ToString();
jnsusaha.Text = rs.Rows[0]["JenisBisnis"].ToString();
sumber.Text = rs.Rows[0]["SumberData"].ToString();
lokasi.Text = rs.Rows[0]["Lokasi"].ToString();
unit.Text = rs.Rows[0]["NoUnit"].ToString();
tipe.Text = Db.SingleString("SELECT Nama FROM REF_JENIS WHERE Jenis = '" + rs.Rows[0]["Jenis"] + "'");
luas.Text = Cf.Num(rs.Rows[0]["Luas"]);
harga.Text = Cf.Num(Convert.ToDecimal(rs.Rows[0]["NilaiKontrak"]));
DataTable rsLunas = Db.Rs("SELECT TOP 1 *"
+ ",CASE CaraBayar"
+ " WHEN 'TN' THEN 'TUNAI'"
+ " WHEN 'KK' THEN 'KARTU KREDIT'"
+ " WHEN 'KD' THEN 'KARTU DEBIT'"
+ " WHEN 'TR' THEN 'TRANSFER BANK'"
+ " WHEN 'BG' THEN 'CEK GIRO'"
+ " WHEN 'UJ' THEN 'UANG JAMINAN'"
+ " WHEN 'DN' THEN 'DISKON'"
+ " END AS CaraBayar2"
+ " FROM MS_PELUNASAN WHERE NoKontrak = '" + nomor + "' AND NoTagihan = 1 AND NilaiPelunasan <> 0");
if (rsLunas.Rows.Count != 0)
{
bf.Text = Cf.Num(Convert.ToDecimal(rsLunas.Rows[0]["NilaiPelunasan"]));
bf2.Text = Money.Str(Convert.ToDecimal(rsLunas.Rows[0]["NilaiPelunasan"]));
// carabayar.Text = rsLunas.Rows[0]["CaraBayar2"].ToString()
// + " " + rsLunas.Rows[0]["Ket"].ToString();
}
DataTable rsag = Db.Rs("SELECT * FROM MS_AGENT WHERE NoAgent = " + Cf.Pk(rs.Rows[0]["NoAgent"]));
if (rsag.Rows.Count != 0)
{
agent.Text = rsag.Rows[0]["Nama"].ToString();
// agid.Text = rsag.Rows[0]["NoAgent"].ToString().PadLeft(5,'0');
// agtelp.Text = rsag.Rows[0]["Kontak"].ToString();
// principal.Text = rsag.Rows[0]["Principal"].ToString();
}
}
}
protected void save_Click(object sender, System.EventArgs e)
{
if (valid())
{
//Generate nomor unik
AutoID();
//string Lokasi = Cf.Pk(lokasi.Text);
string SN = Cf.Pk(noberkas.Text);
string NamaBerkas = namaberkas.Text;
int c = Db.SingleInteger("SELECT COUNT(Nama) FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_BERKAS_PPJB WHERE Nama = '" + NamaBerkas + "' AND Project = '" + project.SelectedValue + "'");
if (c == 1)
{
noberkas.Text = "#AUTO#";
namaberkasc.Text = "Duplikat";
Js.Alert(
this
, "Unit Tidak Valid.\\n\\n"
+ "Kemungkinan Sebab :\\n"
+ "1. Nama Berkas sudah ada.\\n"
, "document.getElementById('nounit').focus();"
+ "document.getElementById('nounit').select();"
);
}
else
{
Db.Execute("INSERT INTO " + Mi.DbPrefix + "MARKETINGJUAL..REF_BERKAS_PPJB (Nama,SN,Project) VALUES('" + NamaBerkas + "','" + SN + "','" + project.SelectedValue + "')");
DataTable rs = Db.Rs("SELECT "
+ " Nama"
+ ",SN"
+ ",Project"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_BERKAS_PPJB "
+ " WHERE SN = '" + SN + "'");
Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spLogBerkasPPJB"
+ " 'DAFTAR'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + SN + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_BERKAS_PPJB_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_BERKAS_PPJB_LOG SET Project = '" + project.SelectedValue + "' WHERE LogID = " + LogID);
Response.Redirect("BerkasPPJB.aspx?done=" + NoBerkas + "&project=" + project.SelectedValue);
}
}
}
private bool valid()
{
string s = "";
bool x = true;
//rekening
acc.Text = Cf.Pk(acc.Text);
x = Cf.ValidMandatory(this, "Rekening", project.SelectedValue);
decimal jum = Db.SingleDecimal("SELECT COUNT(*) FROM " + Mi.DbPrefix + "FINANCEAR..REF_ACC WHERE ACC='" + acc.Text + "' AND SubID='" + subid.Text + "'");
if (jum != 0)
{
x = false;
}
decimal Bank = Db.SingleDecimal("SELECT ISNULL(COUNT(*),0) FROM " + Mi.DbPrefix + "FINANCEAR..REF_ACC WHERE BANK='" + bank.Text + "' AND Project = '" + project.SelectedValue + "'");
if (Bank > 0)
{
x = false;
bankc.Text = "Nama Bank sudah digunakan";
}
else
{
bankc.Text = "";
}
if (!x)
{
if (!x)
{
Js.Alert(
this
, "Input Tidak Valid.\\n\\n"
+ "Aturan Proses :\\n"
+ "1. No. Account tidak boleh kosong dan tidak boleh duplikat.\\n"
+ "2. Saldo Awal harus berupa angka.\\n"
+ "3. Sudah terdapat rekening yang memiliki subid serta account yang sama.\\n"
+ "4. Nama bank tersebut sudah digunakan.\\n"
, "document.getElementById('" + s + "').focus();"
+ "document.getElementById('" + s + "').select();"
);
}
}
return(x);
}
