private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs;
string Project = project.SelectedIndex == 0 ? "Project IN (" + Act.ProjectListSql + ")" : "Project = '" + project.SelectedValue + "'";
rs = Db.Rs("SELECT * FROM REF_JENIS WHERE " + Project + " ORDER BY SN");
for (int i = 0; i < rs.Rows.Count; i++)
{
string v = rs.Rows[i]["Jenis"].ToString();
string t = v + " - " + rs.Rows[i]["Nama"].ToString();
jenis.Items.Add(new ListItem(t, v));
jenis.Items[i].Selected = true;
}
//rs = Db.Rs("SELECT DISTINCT Lokasi FROM MS_RESERVASI WHERE " + Project + " ORDER BY Lokasi");
rs = Db.Rs("SELECT * FROM REF_LOKASI WHERE " + Project + " ORDER BY Lokasi");
for (int i = 0; i < rs.Rows.Count; i++)
{
lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
rs = Db.Rs("SELECT DISTINCT Principal FROM MS_AGENT WHERE Status = 'A' ORDER BY Principal");
for (int i = 0; i < rs.Rows.Count; i++)
{
agent.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
lokasi.SelectedIndex = 0;
agent.SelectedIndex = 0;
jenis.SelectedIndex = 0;
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs;
rs = Db.Rs("SELECT * FROM REF_JENIS ORDER BY SN");
for (int i = 0; i < rs.Rows.Count; i++)
{
string v = rs.Rows[i]["Jenis"].ToString();
string t = v + " - " + rs.Rows[i]["Nama"].ToString();
jenis.Items.Add(new ListItem(t, v));
jenis.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()));
}
rs = Db.Rs("SELECT DISTINCT Principal FROM MS_AGENT WHERE Status = 'A' ORDER BY Principal");
for (int i = 0; i < rs.Rows.Count; i++)
{
agent.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
lokasi.SelectedIndex = 0;
agent.SelectedIndex = 0;
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
Act.ProjectList(project);
project.SelectedIndex = 1;
}
private void init()
{
Act.ProjectList(project);
dari.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
sampai.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs;
rs = Db.Rs("SELECT DISTINCT UserID, Nama FROM SECURITY_LOG ORDER BY Nama, UserID");
for (int i = 0; i < rs.Rows.Count; i++)
{
user.Items.Add(new ListItem(
rs.Rows[i][1] + " (" + rs.Rows[i][0] + ")"
, rs.Rows[i][0].ToString()));
}
rs = Db.Rs("SELECT DISTINCT SecLevel FROM SECURITY_LOG ORDER BY SecLevel");
for (int i = 0; i < rs.Rows.Count; i++)
{
seclevel.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
rs = Db.Rs("SELECT DISTINCT IP FROM SECURITY_LOG ORDER BY IP");
for (int i = 0; i < rs.Rows.Count; i++)
{
ip.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
user.SelectedIndex = 0;
seclevel.SelectedIndex = 0;
ip.SelectedIndex = 0;
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
Act.ProjectList(project);
Act.PersList(pers);
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
project.Items.Clear();
project.Items.Add("SEMUA");
Act.ProjectList(project);
}
private void Bind()
{
Js.Focus(this, nama);
dari.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
sampai.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
LibMkt.ListTipeSales(tipe, project.SelectedValue);
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
sampai.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
tipesales.Items.Add(new ListItem {
Text = "Tipe Marketing :", Value = "0"
});
LibMkt.ListTipeSales(tipesales, project.SelectedValue);
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
string Project = (project.SelectedValue != "SEMUA") ? "= '" + project.SelectedValue + "'" : "IN (" + Act.ProjectListSql + ")";
DataTable rs = Db.Rs("SELECT DISTINCT(Kode) FROM REF_RETENSI WHERE Project " + Project);
for (int i = 0; i < rs.Rows.Count; i++)
{
tipe.Items.Add(new ListItem(rs.Rows[i]["Kode"].ToString()));
}
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
string Project = project.SelectedValue == "SEMUA" ? "Project IN (" + Act.ProjectListSql + ")" : "Project = '" + project.SelectedValue + "'";
DataTable rs = Db.Rs("SELECT DISTINCT Lokasi FROM 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 void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs;
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()));
}
lokasi.SelectedIndex = 0;
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
Act.NoCache();
if (!Page.IsPostBack)
{
Js.Focus(this, noagent);
fillAcc();
//fillDept();
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
}
FeedBack();
}
protected void skema_SelectedIndexChanged(object sender, EventArgs e)
{
if (skema.SelectedIndex != 0)
{
string strSql = "SELECT * FROM REF_SKOM_CF WHERE NoSkema = '" + skema.SelectedValue + "' and Inaktif = 0";
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
dari.Text = Cf.Day(rs.Rows[i]["Dari"]);
sampai.Text = Cf.Day(rs.Rows[i]["Sampai"]);
}
}
else
{
dari.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
sampai.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
}
}
//protected int UserAgent()
//{
// int a = Db.SingleInteger("SELECT NoAgent FROM " + Mi.DbPrefix + "SECURITY..USERNAME WHERE UserID = '" + Act.UserID + "'");
// return a;
//}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
//string aa = "";
//if (UserAgent() > 0)
// aa = " AND NoAgent = " + UserAgent();
//DataTable rs;
//rs = Db.Rs("SELECT DISTINCT Nama, NoAgent FROM MS_AGENT WHERE Status = 'A'" + aa + " ORDER BY Nama");
//for (int i = 0; i < rs.Rows.Count; i++)
// agent.Items.Add(new ListItem(rs.Rows[i]["Nama"].ToString(), rs.Rows[i]["NoAgent"].ToString()));
project.Items.Clear();
project.Items.Add("SEMUA");
Act.ProjectList(project);
//agent.SelectedIndex = 0;
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs;
string Project = project.SelectedIndex == 0 ? "Project IN (" + Act.ProjectListSql + ")" : "Project = '" + project.SelectedValue + "'";
rs = Db.Rs("SELECT * FROM REF_JENIS WHERE " + Project + " ORDER BY SN");
for (int i = 0; i < rs.Rows.Count; i++)
{
string v = rs.Rows[i]["Jenis"].ToString();
string t = v + " - " + rs.Rows[i]["Nama"].ToString();
jenis.Items.Add(new ListItem(t, v));
jenis.Items[i].Selected = true;
}
rs = Db.Rs("SELECT * FROM REF_LOKASI WHERE " + Project + " ORDER BY Lokasi");
for (int i = 0; i < rs.Rows.Count; i++)
{
lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
string aa = "";
if (UserAgent() > 0)
{
aa = " AND NoAgent = " + UserAgent();
}
rs = Db.Rs("SELECT Nama, NoAgent FROM MS_AGENT WHERE Status = 'A' AND " + Project + aa);
for (int i = 0; i < rs.Rows.Count; i++)
{
agent.Items.Add(new ListItem(rs.Rows[i]["Nama"].ToString(), rs.Rows[i]["NoAgent"].ToString()));
}
//project.Items.Clear();
//project.Items.Add("SEMUA");
//Act.ProjectList(project);
jenis.SelectedIndex = 0;
lokasi.SelectedIndex = 0;
agent.SelectedIndex = 0;
}
private void Bind()
{
dari.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
sampai.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
string strSql = "SELECT * FROM REF_AGENT_TIPE WHERE Project= '" + project.SelectedValue + "'";
DataTable rs = Db.Rs(strSql);
tipesales.Items.Add(new ListItem {
Text = "Tipe Marketing:", Value = "0"
});
for (int i = 0; i < rs.Rows.Count; i++)
{
string v = rs.Rows[i]["ID"].ToString();
string t = rs.Rows[i]["Tipe"].ToString();
tipesales.Items.Add(new ListItem(t, v));
}
}
protected void Page_Load(object sender, EventArgs e)
{
Act.Pass();
Act.NoCache();
Act.CekInt("NoAgent");
if (!Page.IsPostBack)
{
//backbtn.Visible = false;
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
frm.Visible = false;
}
FeedBack();
if (frm.Visible)
{
Js.Confirm(this, "Lanjutkan proses generate jadwal komisi?");
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
if (!Page.IsPostBack)
{
comp.InnerHtml = Mi.Pt;
rpt.Visible = false;
rptTotal.Visible = false;
Js.Focus(this, scr);
if (!Act.Sec("DownloadExcel"))
{
xls.Enabled = false;
}
tglawal.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
tglakhir.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
}
Bind();
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs = Db.Rs("SELECT DISTINCT BankKPR FROM MS_KONTRAK");
for (int i = 0; i < rs.Rows.Count; i++)
{
rekening.Items.Add(new ListItem(rs.Rows[i]["BankKPR"].ToString()));
}
rs = Db.Rs("SELECT DISTINCT Lokasi FROM MS_KONTRAK WHERE Project IN (" + Act.ProjectListSql + ") ORDER BY Lokasi");
for (int i = 0; i < rs.Rows.Count; i++)
{
lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
}
Act.ProjectList(project);
Act.PersList(pers);
}
private void Bind()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
string strSql = "SELECT NoAgent, Nama FROM MS_AGENT WHERE Status = 'A' ORDER BY Nama";
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 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;
}
strSql = "SELECT Nomor, Nama FROM REF_SKEMA WHERE Status = 'A'";
rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
cblSkema.Items.Add(new ListItem(rs.Rows[i]["Nama"].ToString() + " (" + Cf.Pk(rs.Rows[i]["Nomor"]).PadLeft(3, '0') + ")", Cf.Pk(rs.Rows[i]["Nomor"])));
cblSkema.Items[i].Selected = true;
}
strSql = "SELECT * FROM REF_JENIS ORDER BY SN";
rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
cblTipe.Items.Add(new ListItem(rs.Rows[i]["Jenis"].ToString() + " - " + rs.Rows[i]["Nama"].ToString(), Cf.Pk(rs.Rows[i]["Jenis"].ToString())));
cblTipe.Items[i].Selected = true;
}
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
lokasi.SelectedIndex = 0;
DataTable rs;
string Project = project.SelectedIndex == 0 ? "Project IN (" + Act.ProjectListSql + ")" : "Project = '" + project.SelectedValue + "'";
rs = Db.Rs("SELECT * FROM REF_JENIS WHERE " + Project + " ORDER BY SN");
for (int i = 0; i < rs.Rows.Count; i++)
{
string v = rs.Rows[i]["Jenis"].ToString();
string t = v + " - " + rs.Rows[i]["Nama"].ToString();
jenis.Items.Add(new ListItem(t, v));
jenis.Items[i].Selected = true;
}
//jenis.SelectedIndex = 0;
//cblcarabayar.SelectedIndex = 0;
cblcarabayar.Attributes["style"] = "margin-top:20px";
cblcarabayar.Items.Add(new ListItem("Cash Keras", "CASH KERAS"));
cblcarabayar.Items.Add(new ListItem("Cash Bertahap", "CASH BERTAHAP"));
cblcarabayar.Items.Add(new ListItem("KPR", "KPR"));
for (int i = 0; i < 3; i++)
{
cblcarabayar.Items[i].Selected = true;
}
rs = Db.Rs("SELECT * FROM REF_LOKASI WHERE " + Project + " 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()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
DataTable rs = Db.Rs("SELECT DISTINCT BankKPR FROM MS_KONTRAK");
for (int i = 0; i < rs.Rows.Count; i++)
{
rekening.Items.Add(new ListItem(rs.Rows[i]["BankKPR"].ToString()));
}
//rs = Db.Rs("SELECT DISTINCT MS_KONTRAK.Lokasi FROM MS_KONTRAK INNER JOIN MS_UNIT "
// + "ON MS_KONTRAK.NoUnit = MS_UNIT.NoUnit "
// + "WHERE MS_UNIT.PT in " + Act.PT + " "
// + "ORDER BY MS_KONTRAK.Lokasi");
//if (rs.Rows.Count == 4)
//{
// lokasi.Items.Add(new ListItem("SEMUA"));
//}
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()));
}
//for (int i = 0; i < rs.Rows.Count; i++)
// lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
//lokasi.SelectedIndex = 0;
//rs = Db.Rs("SELECT PT, Nama FROM REF_PT ORDER BY PT");
//for (int i = 0; i < rs.Rows.Count; i++)
// pt.Items.Add(new ListItem(rs.Rows[i]["Nama"].ToString(), rs.Rows[i]["PT"].ToString()));
//prj.Visible = false;
//clsr.Visible = false;
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan());
sampai.Text = Cf.Day(Cf.AkhirBulan());
}
protected void FillTag()
{
DataTable rs = Db.Rs("SELECT b.NoKontrak, b.NoUnit, b.Status, c.Nama AS Cust, b.NoVA"
+ " FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK b"
+ " INNER JOIN " + Mi.DbPrefix + "MARKETINGJUAL..MS_CUSTOMER c ON b.NoCustomer = c.NoCustomer"
+ " AND b.NoVA <> ''"
+ " ORDER BY b.NoUnit ASC"
);
if (rs.Rows.Count == 0)
{
save.Enabled = false;
}
for (int i = 0; i < rs.Rows.Count; i++)
{
if (!Response.IsClientConnected)
{
break;
}
decimal Tagihan = Db.SingleDecimal("SELECT ISNULL(NilaiTagihan,0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN"
+ " WHERE CONVERT(VARCHAR,TglJT,112) <= '" + Cf.Tgl112(Cf.AkhirBulan()) + "' AND CONVERT(VARCHAR,TglJT,112) >= '" + Cf.Tgl112(Cf.AwalBulan()) + "' "
+ " AND NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "'");
string namatagihan = Db.SingleString("SELECT NamaTagihan FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN"
+ " WHERE CONVERT(VARCHAR,TglJT,112) <= '" + Cf.Tgl112(Cf.AkhirBulan()) + "' AND CONVERT(VARCHAR,TglJT,112) >= '" + Cf.Tgl112(Cf.AwalBulan()) + "' "
+ " AND NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "'");
decimal NoTagihan = Db.SingleDecimal("SELECT NoUrut FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN"
+ " WHERE CONVERT(VARCHAR,TglJT,112) <= '" + Cf.Tgl112(Cf.AkhirBulan()) + "' AND CONVERT(VARCHAR,TglJT,112) >= '" + Cf.Tgl112(Cf.AwalBulan()) + "' "
+ " AND NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "'");
decimal Bayar = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "'"
+ " AND NOTAGIHAN IN (SELECT NOURUT FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN WHERE NoTagihan=" + NoTagihan
+ " AND NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "')");
decimal Denda = Db.SingleDecimal("SELECT ISNULL(SUM(Denda-DendaReal-NilaiPutihDenda),0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN"
+ " WHERE NoUrut =" + NoTagihan
+ " AND NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "'");
decimal Sisa = (Tagihan + Denda) - Bayar;
HtmlTableRow tr;
HtmlTableCell c;
RadioButtonList rb;
tr = new HtmlTableRow();
list2.Controls.Add(tr);
c = new HtmlTableCell();
c.InnerHtml = (i + 1).ToString();
c.ID = "pk2_" + i;
c.Attributes["title"] = rs.Rows[i]["NoVA"] + ";" + Math.Round(Sisa) + ";" + rs.Rows[i]["Cust"] + ";" + namatagihan;
tr.Cells.Add(c);
c = new HtmlTableCell();
c.InnerHtml = rs.Rows[i]["NoKontrak"].ToString();
tr.Cells.Add(c);
c = new HtmlTableCell();
c.InnerHtml = rs.Rows[i]["NoUnit"].ToString();
tr.Cells.Add(c);
c = new HtmlTableCell();
c.InnerHtml = rs.Rows[i]["Cust"].ToString();
tr.Cells.Add(c);
c = new HtmlTableCell();
c.InnerHtml = rs.Rows[i]["NoVA"].ToString();
tr.Cells.Add(c);
c = new HtmlTableCell();
c.InnerHtml = Cf.Num(Sisa);
c.Align = "right";
tr.Cells.Add(c);
}
}
private void init()
{
dari.Text = Cf.Day(Cf.AwalBulan(DateTime.Now.Month, DateTime.Now.Year));
sampai.Text = Cf.Day(Cf.AkhirBulan(DateTime.Now.Month, DateTime.Now.Year));
}
private void Fill()
{
string nProject = "";
if (Project != "SEMUA")
{
nProject = " AND ISC064_MARKETINGJUAL..MS_KONTRAK.Project IN ('" + Project.Replace(",", "','") + "')";
}
string nPerusahaan = "";
if (Perusahaan != "SEMUA")
{
nPerusahaan = " AND ISC064_MARKETINGJUAL..MS_KONTRAK.Pers = '" + Perusahaan + "'";
}
string Status = "";
if (StatusA != "")
{
Status = " AND ISC064_MARKETINGJUAL..MS_KONTRAK.Status = 'A'";
}
if (StatusB != "")
{
Status = " AND ISC064_MARKETINGJUAL..MS_KONTRAK.Status = 'B'";
}
decimal total = 0;
decimal t2 = 0;
decimal t1 = 0;
decimal t3 = 0;
decimal t4 = 0;
decimal t5 = 0;
decimal t6 = 0;
DateTime Tanggal = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
//DateTime tanggal = Convert.ToDateTime(AsOF);
string nLokasi = "";
if (Lokasi != "SEMUA")
{
nLokasi = " AND ISC064_MARKETINGJUAL..MS_KONTRAK.Lokasi = '" + Cf.Str(Lokasi) + "'";
}
string KPR = "";
if (KPAStatus == "kpa1")
{
KPR = " ";
}
else if (KPAStatus == "kpa2")
{
KPR = " AND a.KPR != '1' ";
}
string aa = "";
if (UserAgent() > 0)
{
aa = " AND " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK.NoAgent = " + UserAgent();
}
string strSql = "SELECT "
+ " ISC064_MARKETINGJUAL..MS_KONTRAK.TglKontrak"
+ ",ISC064_MARKETINGJUAL..MS_KONTRAK.NoKontrak"
+ ",ISC064_MARKETINGJUAL..MS_KONTRAK.NoUnit"
+ ",ISC064_MARKETINGJUAL..MS_KONTRAK.NilaiKontrak"
+ ",ISC064_MARKETINGJUAL..MS_CUSTOMER.Nama AS Cs"
+ ",ISC064_MARKETINGJUAL..MS_AGENT.Nama AS Agent"
+ ",(SELECT ISNULL(SUM(NilaiPelunasan),0) FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a join ISC064_marketingjual..ms_tagihan b on a.NoKontrak = b.NoKontrak WHERE a.NoKontrak = ISC064_MARKETINGJUAL..MS_KONTRAK.NoKontrak AND a.TglPelunasan < '" + Cf.AwalBulan(Tanggal.Month, Tanggal.Year) + "' AND b.Tipe <> 'ADM' and a.NoTagihan = b.NoUrut) AS Lalu"
+ ",(SELECT ISNULL(SUM(NilaiPelunasan),0) FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a join ISC064_marketingjual..ms_tagihan b on a.NoKontrak = b.NoKontrak WHERE a.NoKontrak = ISC064_MARKETINGJUAL..MS_KONTRAK.NoKontrak AND a.TglPelunasan >= '" + Cf.AwalBulan(Tanggal.Month, Tanggal.Year) + "' AND a.TglPelunasan <= '" + Cf.AwalBulan1(Tanggal.Month, Tanggal.Year, Tanggal.Day) + "' AND b.Tipe <> 'ADM' and a.NoTagihan = b.NoUrut) AS Berjalan"
+ " FROM ISC064_MARKETINGJUAL..MS_KONTRAK INNER JOIN ISC064_MARKETINGJUAL..MS_CUSTOMER ON ISC064_MARKETINGJUAL..MS_KONTRAK.NoCustomer = ISC064_MARKETINGJUAL..MS_CUSTOMER.NoCustomer"
+ " INNER JOIN ISC064_MARKETINGJUAL..MS_AGENT ON ISC064_MARKETINGJUAL..MS_KONTRAK.NoAgent = ISC064_MARKETINGJUAL..MS_AGENT.NoAgent"
+ " WHERE 1=1 "
+ nProject
+ nPerusahaan
+ nLokasi
+ Status
+ aa;
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
int no = i + 1;
decimal KPALalu = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0) FROM "
+ " ISC064_MARKETINGJUAL..MS_PELUNASAN A INNER JOIN "
+ " ISC064_MARKETINGJUAL..MS_TAGIHAN B on A.NoTagihan = B.NoUrut AND A.NoKontrak = B.NoKontrak "
+ " WHERE TglPelunasan < '" + Cf.AwalBulan(Tanggal.Month, Tanggal.Year) + "' "
+ " AND B.KPR = '1' "
+ " AND B.TIPE <> 'ADM' "
+ " AND A.NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "' ");
decimal BerjalanLalu = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0) FROM "
+ " ISC064_MARKETINGJUAL..MS_PELUNASAN A INNER JOIN "
+ " ISC064_MARKETINGJUAL..MS_TAGIHAN B on A.NoTagihan = B.NoUrut AND A.NoKontrak = B.NoKontrak "
+ " WHERE TglPelunasan >= '" + Cf.AwalBulan(Tanggal.Month, Tanggal.Year) + "' "
+ " AND TglPelunasan <= '" + Cf.AwalBulan1(Tanggal.Month, Tanggal.Year, Tanggal.Day) + "' "
+ " AND B.KPR = '1' "
+ " AND B.TIPE <> 'ADM' "
+ " AND A.NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "' ");
decimal NilaiLalu = Convert.ToDecimal(rs.Rows[i]["Lalu"]);
decimal NilaiBerjalan = Convert.ToDecimal(rs.Rows[i]["Berjalan"]);
if (KPAStatus == "kpa2")
{
NilaiLalu -= KPALalu;
NilaiBerjalan -= BerjalanLalu;
}
decimal sekarang = NilaiLalu + NilaiBerjalan;
decimal saldo = (decimal)rs.Rows[i]["NilaiKontrak"] - sekarang;
if (!Response.IsClientConnected)
{
break;
}
TableRow r = new TableRow();
TableCell c;
c = new TableCell();
c.Text = Cf.Str(no);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Day(rs.Rows[i]["TglKontrak"]);
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["NoKontrak"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["Cs"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["Agent"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["NoUnit"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(rs.Rows[i]["NilaiKontrak"]);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(NilaiLalu);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(NilaiBerjalan);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(sekarang);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(saldo);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
decimal adm = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiTagihan),0)FROM ISC064_MARKETINGJUAL..MS_TAGIHAN WHERE NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "' AND Tipe = 'ADM' ");
c.Text = Cf.Num(adm.ToString());
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
decimal admterima = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a join ISC064_MARKETINGJUAL..MS_TAGIHAN b ON a.NoKontrak = b.NoKontrak WHERE a.NoKontrak = '" + rs.Rows[i]["NoKontrak"] + "' AND Tipe = 'ADM' AND a.NoTagihan = b.NoUrut AND a.TglPelunasan <= '" + Cf.AwalBulan1(Tanggal.Month, Tanggal.Year, Tanggal.Day) + "'");
c.Text = Cf.Num(admterima.ToString());
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
rpt.Rows.Add(r);
total = total + (decimal)rs.Rows[i]["NilaiKontrak"];
t2 = t2 + (decimal)rs.Rows[i]["NilaiKontrak"];
t1 = t1 + NilaiLalu;
t3 = t3 + NilaiBerjalan;
t4 = t4 + sekarang;
t5 = t5 + adm;
t6 = t6 + admterima;
if (i == rs.Rows.Count - 1)
{
SubTotal("GRAND TOTAL", total, t2, t1, t3, t4, t5, t6);
}
}
}
private void HeaderBayar()
{
DateTime nDari = Cf.AwalBulan(Convert.ToInt32(Dari), Convert.ToInt32(Tahun));
DateTime nSampai = Cf.AwalBulan(Convert.ToInt32(Sampai), Convert.ToInt32(Tahun));
if (nDari > nSampai)
{
DateTime x = nSampai;
nSampai = nDari;
nDari = x;
}
int m1 = nDari.Month;
int m2 = nSampai.Month;
int y1 = nDari.Year;
int y2 = nSampai.Year;
int th = y2 - y1;
int bln = (m2 - m1) + 1;
int jum = 0;
if (th > 0)
{
jum = (((th - 1) * 12) + (12 - m1) + m2) + 1;
}
else
{
jum = bln;
}
TableRow r = new TableRow();
r.BackColor = Color.LightGray;
TableCell c;
c = new TableHeaderCell();
c.Text = "NO";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Sales";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "UNIT";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Luas";
c.ColumnSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Harga exc PPN";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Harga Jual inc PPN";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "CUSTOMER";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "NPWP";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Alamat NPWP";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Project";
c.RowSpan = 2;
r.Cells.Add(c);
for (int j = 1; j <= jum; j++)
{
c = new TableHeaderCell();
c.Text = Cf.Monthname(nDari.AddMonths(j - 1).Month) + " " + nDari.AddMonths(j - 1).Year.ToString();
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Saldo Awal " + Cf.Monthname(nDari.AddMonths(j - 1).Month) + " " + nDari.AddMonths(j - 1).Year.ToString();
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Memo " + Cf.Monthname(nDari.AddMonths(j - 1).Month) + " " + nDari.AddMonths(j - 1).Year.ToString();
c.RowSpan = 2;
r.Cells.Add(c);
}
c = new TableHeaderCell();
c.Text = "TOTAL " + Tahun;
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "TOTAL SALDO AWAL " + Tahun;
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "TOTAL MEMO " + Tahun;
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Akumulasi<br/>Pembayaran";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Akumulasi<br/>Pembayaran (Saldo Awal)";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Akumulasi<br/>Pembayaran (Memo)";
c.RowSpan = 2;
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "%";
c.RowSpan = 2;
r.Cells.Add(c);
rpt.Rows.Add(r);
r = new TableRow();
r.BackColor = Color.LightGray;
c = new TableHeaderCell();
c.Text = "Nett";
r.Cells.Add(c);
c = new TableHeaderCell();
c.Text = "Gross";
r.Cells.Add(c);
rpt.Rows.Add(r);
}
private void Fill()
{
DateTime nDari = Cf.AwalBulan(Convert.ToInt32(Dari), Convert.ToInt32(Tahun));
DateTime nSampai = Cf.AwalBulan(Convert.ToInt32(Sampai), Convert.ToInt32(Tahun));
if (nDari > nSampai)
{
DateTime x = nSampai;
nSampai = nDari;
nDari = x;
}
int m1 = nDari.Month;
int m2 = nSampai.Month;
int y1 = nDari.Year;
int y2 = nSampai.Year;
int th = y2 - y1;
int bln = (m2 - m1) + 1;
int jum = 0;
if (th > 0)
{
jum = (((th - 1) * 12) + (12 - m1) + m2) + 1;
}
else
{
jum = bln;
}
decimal[] t = new decimal[jum];
decimal[] re = new decimal[jum];
decimal[] reSA = new decimal[jum];
decimal[] reMO = new decimal[jum];
decimal t1 = 0, t2 = 0, t3 = 0, t4 = 0, t5 = 0, t6 = 0, t7 = 0, t8 = 0, t9 = 0, t10 = 0, t11 = 0;
string Status = "";
if (StatusA != "")
{
Status = " AND a.Status = 'A'";
}
if (StatusB != "")
{
Status = " AND a.Status = 'B'";
}
string agent = "";
if (UserAgent() > 0)
{
agent = " AND a.NoAgent = " + UserAgent();
}
string nProject = "";
if (Project != "SEMUA")
{
nProject = " AND a.Project IN ('" + Project.Replace(",", "','") + "')";
}
string nPerusahaan = "";
if (Perusahaan != "SEMUA")
{
nPerusahaan = " AND a.Pers = '" + Perusahaan + "'";
}
string strSql = "SELECT a.*, b.*"
+ " FROM ISC064_MARKETINGJUAL..MS_KONTRAK a"
+ " INNER JOIN ISC064_MARKETINGJUAL..MS_CUSTOMER b ON a.NoCustomer = b.NoCustomer"
+ " WHERE 1=1"
+ nProject
+ nPerusahaan
+ Status//" AND a.Status ='A'"
+ agent
+ " ORDER BY a.PersenLunas DESC"
;
DataTable rs = Db.Rs(strSql);
for (int i = 0; i < rs.Rows.Count; i++)
{
if (!Response.IsClientConnected)
{
break;
}
TableRow r = new TableRow();
r.Attributes["ondblclick"] = "javascript:popEditKontrak('" + rs.Rows[i]["NoKontrak"] + "');";
r.VerticalAlign = VerticalAlign.Top;
TableCell c;
c = new TableCell();
c.Text = (i + 1).ToString();
c.HorizontalAlign = HorizontalAlign.Center;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
string Nama = Db.SingleString("SELECT Nama FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT WHERE NoAgent = '" + rs.Rows[i]["NoAgent"] + "'");
//c.Text = Cf.Monthname(Convert.ToDateTime(rs.Rows[i]["TglKontrak"]).Month) + " " + Convert.ToDateTime(rs.Rows[i]["TglKontrak"]).Year;
c.Text = Nama;
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["NoUnit"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
decimal LuasNett = Db.SingleDecimal("SELECT LuasNett FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_UNIT WHERE NoStock = '" + rs.Rows[i]["NoStock"] + "'");
decimal Luas = Db.SingleDecimal("SELECT Luas FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_UNIT WHERE NoStock = '" + rs.Rows[i]["NoStock"] + "'");
c = new TableCell();
c.Text = Cf.Num(LuasNett);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(Luas);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(rs.Rows[i]["NilaiDPP"]);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Cf.Num(rs.Rows[i]["NilaiKontrak"]);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["Nama"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = rs.Rows[i]["NPWP"].ToString();
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
string alamatnpwp = rs.Rows[i]["NPWPAlamat1"].ToString() + "<br/>" + rs.Rows[i]["NPWPAlamat2"].ToString() + "<br/>" + rs.Rows[i]["NPWPAlamat3"].ToString();
c = new TableCell();
c.Text = alamatnpwp;
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
c = new TableCell();
c.Text = Db.SingleString("SELECT Nama FROM " + Mi.DbPrefix + "SECURITY..REF_PROJECT WHERE Project = '" + rs.Rows[i]["Project"].ToString() + "'");
c.HorizontalAlign = HorizontalAlign.Left;
c.Wrap = false;
r.Cells.Add(c);
decimal byr = 0;
for (int j = 1; j <= jum; j++)
{
int m = nDari.AddMonths(j - 1).Month;
int y = nDari.AddMonths(j - 1).Year;
decimal realisasi = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_TTS b ON a.NoTTS = b.NoTTS"
+ " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND MONTH(b.TglTTS) = " + m + " AND YEAR(b.TglTTS) = " + y);
c = new TableCell();
c.Text = Cf.Num(realisasi);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal saldoawal = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_MEMO b ON a.NoMEMO = b.NoMEMO"
+ " WHERE b.CaraBayar = 'SA' AND a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND MONTH(b.TglMEMO) = " + m + " AND YEAR(b.TgLMEMO) = " + y);
c = new TableCell();
c.Text = Cf.Num(saldoawal);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal memo = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_MEMO b ON a.NoMEMO = b.NoMEMO"
+ " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND MONTH(b.TglMEMO) = " + m + " AND YEAR(b.TglMEMO) = " + y);
c = new TableCell();
c.Text = Cf.Num(memo);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
re[j - 1] += realisasi;
reSA[j - 1] += saldoawal;
reMO[j - 1] += memo;
}
decimal tot = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_TTS b ON a.NoTTS = b.NoTTS"
+ " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND YEAR(b.TglTTS) = " + Convert.ToInt32(Tahun));
c = new TableCell();
c.Text = Cf.Num(tot);;
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal totSA = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_MEMO b ON a.NoMemo = b.NoMemo"
+ " WHERE b.CaraBayar='SA' AND a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND YEAR(b.TglMEMO) = " + Convert.ToInt32(Tahun));
c = new TableCell();
c.Text = Cf.Num(totSA);;
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal totMO = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_MEMO b ON a.NoMemo = b.NoMemo"
+ " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND YEAR(b.TglMEMO) = " + Convert.ToInt32(Tahun));
c = new TableCell();
c.Text = Cf.Num(totMO);;
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal akum = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_TTS b ON a.NoTTS = b.NoTTS"
+ " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND CONVERT(VARCHAR,b.TglTTS,112) <= '" + Cf.Tgl112(nSampai) + "'");
c = new TableCell();
c.Text = Cf.Num(akum);;
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal akumSA = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_MEMO b ON a.NoMEMO = b.NoMEMO"
+ " WHERE b.CaraBayar = 'SA' AND a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND CONVERT(VARCHAR,b.TglMEMO,112) <= '" + Cf.Tgl112(nSampai) + "'");
c = new TableCell();
c.Text = Cf.Num(akumSA);;
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal akumMO = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0)"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN a"
+ " INNER JOIN MS_MEMO b ON a.NoMEMO = b.NoMEMO"
+ " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["NoKontrak"]) + "'"
+ " AND CONVERT(VARCHAR,b.TglMEMO,112) <= '" + Cf.Tgl112(nSampai) + "'");
c = new TableCell();
c.Text = Cf.Num(akumMO);;
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
decimal persen = Math.Round(((akum + akumSA + akumMO) / Convert.ToDecimal(rs.Rows[i]["NilaiKontrak"]) * 100), 2);
c = new TableCell();
c.Text = Cf.Num(persen);
c.HorizontalAlign = HorizontalAlign.Right;
c.Wrap = false;
r.Cells.Add(c);
rpt.Rows.Add(r);
t1 += Convert.ToDecimal(LuasNett);
t2 += Convert.ToDecimal(Luas);
t3 += Convert.ToDecimal(rs.Rows[i]["NilaiDPP"]);
t4 += Convert.ToDecimal(rs.Rows[i]["NilaiKontrak"]);
t5 += tot;
t7 += totSA;
t8 += totMO;
t6 += akum;
t9 += akumSA;
t10 += akumMO;
if (i == rs.Rows.Count - 1)
{
SubTotal(t1, t2, t3, t4, re, t5, t6, t7, t8, t9, t10, reSA, reMO);
}
}
}
