Пример #1
0
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            Act.CekInt("NoCustomer");
            Func.CustomerPassword(NoCustomer); //Custom SECURITY

            if (!Act.Sec("ED:" + Request.PhysicalPath))
            {
                ok.Enabled   = false;
                save.Enabled = false;
            }

            if (!Page.IsPostBack)
            {
                //kalkulator
                Js.NumberFormat(luaslama);
                Act.ProjectList(project);

                Fill();
            }

            FeedBack();
        }
Пример #2
0
        protected void tambah(int index)
        {
            TableRow r = new TableRow();

            r.ID = "baris_" + index;
            TableCell    c;
            DropDownList ddl;
            TextBox      tb;
            Label        l;

            ddl    = new DropDownList();
            ddl.ID = "lvlsales_" + index;

            if (tipe.SelectedIndex == 0)
            {
                LibMkt.ListLvlSales(ddl, 0, project.SelectedValue);
            }
            else
            {
                LibMkt.ListLvlSales(ddl, Convert.ToInt32(tipe.SelectedValue), project.SelectedValue);
            }

            c = new TableCell();
            c.Controls.Add(ddl);
            r.Cells.Add(c);

            tb    = new TextBox();
            tb.ID = "penjualan_" + index;
            Js.NumberFormat(tb);

            c = new TableCell();
            c.Controls.Add(tb);
            r.Cells.Add(c);

            tb    = new TextBox();
            tb.ID = "reward_" + index;

            c = new TableCell();
            c.Controls.Add(tb);
            r.Cells.Add(c);

            c          = new TableCell();
            l          = new Label();
            l.Text     = "<i class='fa fa-trash'></i>";
            l.CssClass = "btn btn-cal";
            StringBuilder x = new StringBuilder();

            x.Append("ClearSkema3('penjualan_" + index + "','reward_" + index + "');");
            l.Attributes["onclick"] = x.ToString();
            c.Controls.Add(l);
            r.Cells.Add(c);

            list.Controls.Add(r);
        }
Пример #3
0
        protected void fill()
        {
            Js.NumberFormat(persenlunas);
            string value = Db.SingleString("SELECT ISNULL(VALUE, '0') FROM REF_PARAM WHERE ParamID = '" + ParamID + "'");

            if (!String.IsNullOrEmpty(value))
            {
                persenlunas.Text = Cf.Num(value);
            }
            else
            {
                persenlunas.Text = "0";
            }
        }
Пример #4
0
        private void Bind()
        {
            Js.Focus(this, nama);

            //Js.NumberFormat(bfjumlah);
            //Js.NumberFormat(dpjumlah);
            //Js.NumberFormat(angjumlah);
            Js.NumberFormat(diskon);
            diskon.Attributes["onblur"] = "if(this.value!=tempdisc){"
                                          + "recaldisc(document.getElementById('diskon'));"
                                          + "}";

            diskon.Attributes["style"] = "display: none;";
        }
Пример #5
0
        protected void fill()
        {
            Js.NumberFormat(bayar);
            string value = Db.SingleString("SELECT ISNULL(VALUE, '0') FROM " + Mi.DbPrefix + "SECURITY..REF_PARAM WHERE ParamID = '" + ParamID + "'");

            if (!String.IsNullOrEmpty(value))
            {
                bayar.Text = Cf.Num(value);
            }
            else
            {
                bayar.Text = "0";
            }
        }
Пример #6
0
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            if (!Page.IsPostBack)
            {
                Act.ProjectList(project);
                FillTable();
                Js.Focus(this, acc);
                Js.NumberFormat(saldoawal);
            }

            FeedBack();
        }
Пример #7
0
        private void FillHeader()
        {
            Js.NumberFormat(barunominal);
            Act.ProjectList(project);
            UnitList(lokasi);
            diskon.Attributes["onfocus"] = "tempnum=CalcFocus(this);tempdisc=this.value;";
            diskon.Attributes["onblur"]  = "if(this.value!=tempdisc){"
                                           + "recaldisc(document.getElementById('diskon'));"
                                           + "}";

            btnlog.Attributes["onclick"] = "location.href='LogPk.aspx?Tb=" + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA_LOG&Pk=" + Nomor.PadLeft(3, '0') + "'";
            btndel.Attributes["onclick"] = "location.href='SkemaDel.aspx?Nomor=" + Nomor + "'";

            DataTable rsHeader = Db.Rs("SELECT * FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA WHERE Nomor = " + Nomor);

            if (rsHeader.Rows.Count == 0)
            {
                Response.Redirect("/CustomError/Deleted.html");
            }
            else if (!Act.AksesProject(rsHeader.Rows[0]["Project"].ToString()))
            {
                Response.Redirect("/CustomError/SecLevel.html");
            }
            else
            {
                nama.Text      = rsHeader.Rows[0]["Nama"].ToString();
                diskon.Text    = rsHeader.Rows[0]["Diskon"].ToString();
                diskonket.Text = rsHeader.Rows[0]["DiskonKet"].ToString();
                bunga2.Text    = rsHeader.Rows[0]["Bunga"].ToString();
                bungaket.Text  = rsHeader.Rows[0]["BungaKet"].ToString();

                jenis.SelectedValue = rsHeader.Rows[0]["Jenis"].ToString();
                Cf.SelectedValue(project, rsHeader.Rows[0]["Project"].ToString());
                Cf.SelectedValue(lokasi, rsHeader.Rows[0]["TipeUnit"].ToString());
                if (rsHeader.Rows[0]["Status"].ToString() == "A")
                {
                    aktif.Checked   = true;
                    inaktif.Checked = false;
                }
                else
                {
                    aktif.Checked   = false;
                    inaktif.Checked = true;
                }

                round.Checked = (bool)rsHeader.Rows[0]["RThousand"];
            }
        }
Пример #8
0
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            if (!Page.IsPostBack)
            {
                nobg.Attributes["ondblclick"] = "popDaftarBG();";
                InitForm();

                Js.Focus(this, ket);

                nilaitr.Visible = false;
                Js.NumberFormat(nilai);
                Js.NumberFormat(admBank);
                Js.NumberFormat(lebihBayar);
                Js.NumberFormat(lb);
                Js.NumberFormat(biayaadmin);
                biayaadmin.Attributes["onblur"] += "javascript:hitungbiayaadmin();";
                lb.Attributes["onblur"]         += "javascript:hitungbiayaadmin();";
                lebihBayar.Attributes["onblur"] += "javascript:hitungbiayaadmin();";
                admBank.Attributes["onblur"]    += "javascript:hitungbiayaadmin();";

                gt.Attributes.Add("readonly", "readonly");
                grandtotal.Attributes.Add("readonly", "readonly");

                fillAcc();
            }

            ClientScript.RegisterOnSubmitStatement(
                GetType(),
                "hitungulang",
                "hitunggt();"
                );
            ClientScript.RegisterStartupScript(
                GetType(),
                "hitungulang2",
                "hitunggt();",
                true
                );

            if (detildiv.Visible)
            {
                Js.Confirm(this, "Lanjutkan proses registrasi tanda terima sementara?");
            }

            FillTb();
        }
Пример #9
0
        protected void Page_Load(object sender, EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            if (!Page.IsPostBack)
            {
                init();

                Js.Focus(this, save);
                Fill();
            }
            FeedBack();

            Js.NumberFormat(hrst);
        }
Пример #10
0
        private void Bind()
        {
            //NumberFormat.js
            Js.NumberFormat(luas);

            DataTable rs;
            string    strSql;

            strSql = "SELECT * FROM REF_JENIS WHERE Project = '" + project.SelectedValue + "' ORDER BY SN";
            rs     = Db.Rs(strSql);
            for (int i = 0; i < rs.Rows.Count; i++)
            {
                string   v  = rs.Rows[i]["Jenis"].ToString();
                string   t  = v + " - " + rs.Rows[i]["Nama"].ToString();
                ListItem li = new ListItem();
                li.Text  = t;
                li.Value = v;
                li.Attributes.Add("class", "radio");
                jenis.Items.Add(li);
            }

            strSql = "SELECT * FROM REF_LOKASI WHERE Project = '" + project.SelectedValue + "' ORDER BY SN";
            rs     = Db.Rs(strSql);
            for (int i = 0; i < rs.Rows.Count; i++)
            {
                string v = rs.Rows[i]["Lokasi"].ToString();
                string t = v + " - " + rs.Rows[i]["Nama"].ToString();
                lokasi.Items.Add(new ListItem(" " + t, v));
            }

            //strSql = "SELECT * FROM REF_JENISPROPERTI WHERE Project = '" + project.SelectedValue + "' ORDER BY SN";
            //rs = Db.Rs(strSql);
            //for (int i = 0; i < rs.Rows.Count; i++)
            //{
            //    string v = rs.Rows[i]["JenisProperti"].ToString();
            //    string t = v + " - " + rs.Rows[i]["Nama"].ToString();
            //    ListItem li = new ListItem();
            //    li.Text = t;
            //    li.Value = v;
            //    li.Attributes.Add("class", "radio");
            //    tipe.Items.Add(li);
            //}

            var hub = GlobalHost.ConnectionManager.GetHubContext <UnitHub>();

            hub.Clients.All.broadcastStatus(NoStock);
        }
Пример #11
0
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            if (!Page.IsPostBack)
            {
                InitForm();

                detildiv.Visible = false;
                Js.NumberFormat(nilai);
                Js.NumberFormat(admBank);
            }

            if (detildiv.Visible)
            {
                Js.Confirm(this, "Lanjutkan proses registrasi memo pelunasan?");
            }

            FillTb();
        }
Пример #12
0
        protected void fill()
        {
            Js.NumberFormat(grace);

            if (Param.Exist(RumusDenda1))
            {
                rumus1.Text = Param.GetParam(RumusDenda1);
            }
            if (Param.Exist(RumusDenda2))
            {
                rumus2.Text = Param.GetParam(RumusDenda2);
            }
            if (Param.Exist(GracePeriod))
            {
                grace.Text = Cf.Num(Convert.ToDecimal(Param.GetParam(GracePeriod)));
            }
            if (Param.Exist(BerlakuDenda))
            {
                berlaku.Text = Param.GetParam(BerlakuDenda);
            }
        }
Пример #13
0
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            Act.CekInt("Nocb");


            if (!Page.IsPostBack)
            {
                Js.Focus(this, tgl);

                fillAcc();
                Fill();

                Js.NumberFormat(sisa);
                Js.NumberFormat(lb);
                Js.NumberFormat(bk);
            }

            FeedBack();
        }
Пример #14
0
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            if (!Page.IsPostBack)
            {
                rBankKeluar.Visible = false;
                rRek.Visible        = false;
                rTglKembali.Visible = false;
                backbtn.Visible     = false;
                btnAct.Visible      = false;

                nokontrak.Attributes["ondblclick"] = "popDaftarKontrak('a&ppjb=1');";
                fillAcc();

                if (Request.QueryString["NoKontrak"] != null)
                {
                    nokontrak.Text = Request.QueryString["NoKontrak"];
                    LoadKontrak();

                    cancel.Attributes["onclick"] = "location.href='CBRegistrasi1.aspx'";
                }
                else
                {
                    Js.Focus(this, nokontrak);
                    frm.Visible = false;
                }

                Js.NumberFormat(bk);
            }

            FeedBack();
            if (frm.Visible)
            {
                Js.Confirm(this, "Lanjutkan proses pencatatan Cashback?");
            }
        }
Пример #15
0
        protected void tambah(int index)
        {
            TableRow r = new TableRow();

            r.ID = "baris_" + index;
            TableCell       c;
            DropDownList    ddl;
            RadioButtonList rbl;
            TextBox         tb;

            ddl    = new DropDownList();
            ddl.ID = "lvlsales_" + index;
            LibMkt.ListLvlSales(ddl, Convert.ToInt32(tipe.SelectedValue), project.SelectedValue);

            c = new TableCell();
            c.Controls.Add(ddl);
            r.Cells.Add(c);

            tb    = new TextBox();
            tb.ID = "penjualan_" + index;
            Js.NumberFormat(tb);

            c = new TableCell();
            c.Controls.Add(tb);
            r.Cells.Add(c);

            tb    = new TextBox();
            tb.ID = "reward_" + index;


            c = new TableCell();
            c.Controls.Add(tb);
            r.Cells.Add(c);

            list.Controls.Add(r);
        }
Пример #16
0
        private void FillTb()
        {
            string strSql = "SELECT * "
                            + ",(NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) AS SisaTagihan"
                            + " FROM " + Tb + "..MS_TAGIHAN AS MS_TAGIHAN WHERE NoKontrak = '" + Ref + "'"
                            + " AND KPR != '1' AND Tipe != 'ADM'"
                            + " AND (NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) > 0"
                            + " ORDER BY TglJT, NoUrut";

            rsTagihan = Db.Rs(strSql);

            decimal Ano        = Db.SingleDecimal("SELECT ISNULL(Nilai, 0) FROM MS_ANONIM WHERE NoAnonim = '" + anonim.SelectedValue + "'");
            decimal sisatotal  = 0;
            decimal sisatotal2 = 0;

            int b = 0;

            for (int i = 0; i < rsTagihan.Rows.Count; i++)
            {
                if (!Response.IsClientConnected)
                {
                    break;
                }

                b++;
                Label    l;
                TextBox  t;
                CheckBox cb;

                l      = new Label();
                l.Text = "<tr valign=top>"
                         + "<td>" + rsTagihan.Rows[i]["NoKontrak"] + "." + rsTagihan.Rows[i]["NoUrut"] + "</td>"
                         + "<td>" + rsTagihan.Rows[i]["NamaTagihan"] + "</td>"
                         + "<td>" + rsTagihan.Rows[i]["Tipe"] + "</td>"
                         + "<td style='white-space:nowrap'>" + Cf.Day(rsTagihan.Rows[i]["TglJT"]) + "</td>"
                         + "<td align=right>" + Cf.Num(rsTagihan.Rows[i]["SisaTagihan"]) + "</td>"
                         + "<td>"
                ;
                list.Controls.Add(l);

                t          = new TextBox();
                t.ID       = "lunas_" + i;
                t.Width    = 100;
                t.CssClass = "txt_num";
                Js.NumberFormat(t);
                t.Attributes["onblur"] += "hitunggt();";
                list.Controls.Add(t);

                l      = new Label();
                l.Text = "</td><td>";
                list.Controls.Add(l);

                cb = new CheckBox();
                cb.Attributes.Add("onclick", "tagihan('" + i + "','" + Cf.Num(rsTagihan.Rows[i]["SisaTagihan"]) + "',this)");
                list.Controls.Add(cb);

                l      = new Label();
                l.Text = "</td>";
                list.Controls.Add(l);

                sisatotal += Convert.ToDecimal(rsTagihan.Rows[i]["SisaTagihan"]);
                //Response.Write(sisatotal + "<Br>");
            }

            string strSql2 = "SELECT * "
                             + ",(NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) AS SisaTagihan"
                             + " FROM " + Tb + "..MS_TAGIHAN AS MS_TAGIHAN WHERE NoKontrak = '" + Ref + "'"
                             + " AND KPR != '1' AND Tipe = 'ADM'"
                             + " AND (NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) > 0"
                             + " ORDER BY TglJT, NoUrut";

            rsTagihan2 = Db.Rs(strSql2);

            for (int a = 0; a < rsTagihan2.Rows.Count; a++)
            {
                if (!Response.IsClientConnected)
                {
                    break;
                }

                Label    l;
                TextBox  t;
                CheckBox cb;

                l      = new Label();
                l.Text = "<tr valign=top>"
                         + "<td>" + rsTagihan2.Rows[a]["NoKontrak"] + "." + rsTagihan2.Rows[a]["NoUrut"] + "</td>"
                         + "<td>" + rsTagihan2.Rows[a]["NamaTagihan"] + "</td>"
                         + "<td>" + rsTagihan2.Rows[a]["Tipe"] + "</td>"
                         + "<td style='white-space:nowrap'>" + Cf.Day(rsTagihan2.Rows[a]["TglJT"]) + "</td>"
                         + "<td align=right>" + Cf.Num(rsTagihan2.Rows[a]["SisaTagihan"]) + "</td>"
                         + "<td>"
                ;
                list.Controls.Add(l);

                t          = new TextBox();
                t.ID       = "lunas_" + (a + b);
                t.Width    = 100;
                t.CssClass = "txt_num";
                Js.NumberFormat(t);
                t.Attributes["onblur"] += "hitunggt();";
                list.Controls.Add(t);

                l      = new Label();
                l.Text = "</td><td>";
                list.Controls.Add(l);

                cb = new CheckBox();
                cb.Attributes.Add("onclick", "tagihan('" + (a + b) + "','" + Cf.Num(rsTagihan2.Rows[a]["SisaTagihan"]) + "',this)");
                list.Controls.Add(cb);

                l      = new Label();
                l.Text = "</td>";
                list.Controls.Add(l);

                sisatotal2 += Convert.ToDecimal(rsTagihan2.Rows[a]["SisaTagihan"]);
            }

            if (Ano > (sisatotal + sisatotal2))
            {
                gt.Text = Cf.Num(Ano);
                lb.Text = Cf.Num(Ano - (sisatotal + sisatotal2));
            }
        }
Пример #17
0
 protected void init()
 {
     Act.ProjectList(project);
     Js.NumberFormat(batas);
 }
Пример #18
0
        private void FillTb()
        {
            string strSql = "SELECT * "
                            + ",(NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) AS SisaTagihan"
                            + " FROM " + Tb + "..MS_TAGIHAN AS MS_TAGIHAN WHERE NoKontrak = '" + Ref + "'"
                            + " AND (NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) > 0"
                            + " ORDER BY NoUrut";

            rsTagihan = Db.Rs(strSql);

            for (int i = 0; i < rsTagihan.Rows.Count; i++)
            {
                if (!Response.IsClientConnected)
                {
                    break;
                }

                Label              l;
                TextBox            t;
                TextBox            tgl;
                HtmlInputButton    btn;
                HtmlGenericControl div;
                HtmlGenericControl span;
                HtmlGenericControl label;
                HtmlGenericControl italic;

                l      = new Label();
                l.Text = "<tr valign=top>"
                         + "<td>" + rsTagihan.Rows[i]["NoKontrak"] + "." + rsTagihan.Rows[i]["NoUrut"] + "</td>"
                         + "<td>" + rsTagihan.Rows[i]["NamaTagihan"] + "</td>"
                         + "<td>" + rsTagihan.Rows[i]["Tipe"] + "</td>"
                         + "<td style='white-space:nowrap'>" + Cf.Day(rsTagihan.Rows[i]["TglJT"]) + "</td>"
                         + "<td align=right>" + Cf.Num(rsTagihan.Rows[i]["SisaTagihan"]) + "</td>";
                list.Controls.Add(l);

                l      = new Label();
                l.Text = "<td>";
                list.Controls.Add(l);

                t          = new TextBox();
                t.ID       = "lunas_" + i;
                t.Width    = 100;
                t.CssClass = "txt_num";
                Js.NumberFormat(t);
                t.Attributes["onblur"] += "hitunggt();";
                list.Controls.Add(t);

                l      = new Label();
                l.Text = "</td><td>";
                list.Controls.Add(l);

                //Tanggal

                div = new HtmlGenericControl("div");
                div.Attributes.Add("class", "input-group input-small");
                div.Attributes.Add("style", "margin-top: 0px; margin-left: 0px;");

                tgl                     = new TextBox();
                tgl.ID                  = "tgl_" + i;
                tgl.CssClass            = "tgl form-control form-control-small";
                tgl.Text                = Cf.Day(Convert.ToDateTime(DateTime.Today));
                tgl.Attributes["style"] = "font:8pt; width:65%";
                div.Controls.Add(tgl);

                span = new HtmlGenericControl("span");
                span.Attributes.Add("style", "height: 34px; display: block;");
                span.Attributes.Add("class", "input-group-btn");

                label = new HtmlGenericControl("label");
                label.Attributes.Add("for", tgl.ID);
                label.Attributes.Add("class", "btn-a default btn-cal");

                italic = new HtmlGenericControl("i");
                italic.Attributes.Add("class", "fa fa-calendar");
                label.Controls.Add(italic);
                span.Controls.Add(label);

                div.Controls.Add(span);
                list.Controls.Add(div);

                l      = new Label();
                l.Text = "</td><td><input type='checkbox' onclick=\"tagihan('" + i + "','" + Cf.Num(rsTagihan.Rows[i]["SisaTagihan"]) + "',this)\"></td></tr>";
                list.Controls.Add(l);
            }
        }
Пример #19
0
        protected void tambahbaris(short i)
        {
            HtmlTableRow    tr;
            HtmlTableCell   c;
            TextBox         tb;
            TextBox         tb2;
            TextBox         tb4;
            TextBox         tb5;
            TextBox         tb6;
            TextBox         tb7;
            TextBox         tb8;
            HtmlInputButton btn;
            Label           l;

            tr        = new HtmlTableRow();
            tr.VAlign = "top";
            list.Controls.Add(tr);

            c           = new HtmlTableCell();
            c.InnerHtml = i.ToString() + ".";
            tr.Cells.Add(c);

            tb       = new TextBox();
            tb.ID    = "kodebr_" + i;
            tb.Width = 120;

            tb8    = new TextBox();
            tb8.ID = "kodebr2_" + i;
            tb8.Attributes["style"] = "display:none";

            btn       = new HtmlInputButton();
            btn.ID    = "btnacc_" + i;
            btn.Value = "...";
            btn.Attributes["class"] = "search";

            tb2          = new TextBox();
            tb2.ID       = "namabr_" + i;
            tb2.Width    = 200;
            tb2.ReadOnly = true;

            tb4          = new TextBox();
            tb4.ID       = "satuanbr_" + i;
            tb4.Width    = 70;
            tb4.ReadOnly = true;

            tb5    = new TextBox();
            tb5.ID = "hrgabr_" + i;
            Js.NumberFormat(tb5);
            tb5.Width    = 140;
            tb5.ReadOnly = true;

            tb6      = new TextBox();
            tb6.ID   = "qtybr_" + i;
            tb6.Text = "0";
            tb6.Attributes["onfocus"] = "tempnum=CalcFocus(this);";
            tb6.Attributes["onkeyup"] = "CalcType(this,tempnum);";
            tb6.Attributes["onblur"]  = "CalcBlur(this);hitungaja('" + i + "');";
            tb6.Width = 50;

            tb7          = new TextBox();
            tb7.ID       = "totalbr_" + i;
            tb7.Width    = 140;
            tb7.ReadOnly = true;

            string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'");

            tb.Attributes["ondblclick"] = btn.Attributes["onclick"] =
                "callgimmick('" + tb.ID + "','" + tb2.ID + "','" + tb4.ID + "','" + tb5.ID + "','" + tb8.ID + "','" + Project + "')";

            c = new HtmlTableCell();
            c.Controls.Add(tb);
            c.Controls.Add(tb8);
            c.Controls.Add(btn);
            tr.Cells.Add(c);

            c = new HtmlTableCell();
            c.Controls.Add(tb2);
            tr.Cells.Add(c);

            c = new HtmlTableCell();
            c.Controls.Add(tb4);
            tr.Cells.Add(c);

            c = new HtmlTableCell();
            c.Controls.Add(tb5);
            tr.Cells.Add(c);

            c = new HtmlTableCell();
            c.Controls.Add(tb6);
            tr.Cells.Add(c);

            c = new HtmlTableCell();
            c.Controls.Add(tb7);
            tr.Cells.Add(c);

            c          = new HtmlTableCell();
            l          = new Label();
            l.Text     = "<i class='fa fa-trash'></i>";
            l.CssClass = "btn btn-cal";
            StringBuilder x = new StringBuilder();

            x.Append("ClearGimmick('kodebr_" + i + "','kodebr2_" + i + "','namabr_" + i + "','satuanbr_" + i + "','hrgabr_" + i + "','qtybr_" + i + "','totalbr_" + i + "');");
            l.Attributes["onclick"] = x.ToString();
            c.Controls.Add(l);
            tr.Cells.Add(c);
        }
Пример #20
0
        private void Fill()
        {
            Js.NumberFormat(sisa);
            Js.NumberFormat(lb);

            Func.KontrakHeader(NoKontrak, nokontrakl, unit, customer, agent);

            string    strSql = "SELECT * FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'";
            DataTable rs     = Db.Rs(strSql);

            unit.Text = Db.SingleString("SELECT NoUnit "
                                        + " FROM ISC064_MARKETINGJUAL..MS_KONTRAK "
                                        + " WHERE NoKontrak = '" + NoKontrak + "'");

            customer.Text = Db.SingleString("SELECT Nama "
                                            + " FROM ISC064_MARKETINGJUAL..MS_KONTRAK AS MS_KONTRAK "
                                            + " INNER JOIN ISC064_MARKETINGJUAL..MS_CUSTOMER AS MS_CUSTOMER "
                                            + " ON MS_KONTRAK.NoCustomer = MS_CUSTOMER.NoCustomer"
                                            + " WHERE NoKontrak = '" + NoKontrak + "'");

            if (rs.Rows.Count == 0)
            {
                Response.Redirect("/CustomError/Deleted.html");
            }
            else
            {
                decimal nilaitagihan    = 0;
                decimal nilaipelunasan1 = 0;
                decimal nilaipelunasan2 = 0;
                decimal sisatagihan     = 0;
                decimal lebihbayar      = 0;
                decimal bankkeluar      = 0;

                DataTable rs1 = Db.Rs("SELECT * "
                                      + " FROM ISC064_MARKETINGJUAL..MS_TAGIHAN "
                                      + " WHERE NoKontrak = '" + NoKontrak + "'");

                for (int i = 0; i < rs1.Rows.Count; i++)
                {
                    decimal x = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0) FROM ISC064_MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = '" + NoKontrak + "' AND NoTagihan = '" + rs1.Rows[i]["Nourut"] + "'");// AND CaraBayar!='AL'

                    nilaitagihan += Convert.ToDecimal(rs1.Rows[i]["NilaiTagihan"]);

                    if (x > Convert.ToDecimal(rs1.Rows[i]["NilaiTagihan"]))
                    {
                        nilaipelunasan1 += Convert.ToDecimal(rs1.Rows[i]["NilaiTagihan"]);
                    }
                    else
                    {
                        nilaipelunasan1 += x;
                    }

                    nilaipelunasan2 += x;
                }
                decimal sumAlokasi = Db.SingleDecimal("SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = '" + NoKontrak + "' AND CaraBayar='AL'");
                decimal MemoCB     = 0;// Db.SingleDecimal("SELECT ISNULL(SUM(LebihBayar),0) FROM MS_CASHBACK_MEMO where nokontrak='" + NoKontrak + "'");
                sisatagihan = nilaitagihan - nilaipelunasan1;
                bankkeluar  = nilaitagihan - nilaipelunasan2;

                lebihbayar = Db.SingleDecimal("SELECT ISNULL(SUM(LB),0) FROM MS_TTS WHERE Ref = '" + NoKontrak + "' AND Status <> 'VOID'");
                decimal BK = Db.SingleDecimal("SELECT ISNULL(SUM(BankKeluar),0) FROM MS_CASHBACK WHERE NoKontrak = '" + NoKontrak + "'");

                sisa.Text = Cf.Num(sisatagihan);
                lb.Text   = Cf.Num(lebihbayar - BK - sumAlokasi - MemoCB);

                LebihBayar1 = lebihbayar - BK;
            }
        }
Пример #21
0
        void fillTagihan()
        {
            decimal LB    = Convert.ToDecimal(lb.Text);;
            decimal total = 0;
            string  query = "SELECT (a.Nokontrak + '.' + Cast(a.NoUrut AS VARCHAR)) AS NoTagihan, "
                            + "         a.NamaTagihan, "
                            + "         a.Tipe, "
                            + "         a.TglJT, "
                            + "         a.NoUrut, "
                            + "         (a.NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = a.NoKontrak and NoTagihan = a.NoUrut)) AS SisaTagihan "
                            + " FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN A "
                            + " WHERE 1=1 "
                            + " AND A.Nokontrak = '" + NoKontrak + "'"
                            + " AND (A.NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN WHERE NoKontrak = a.NoKontrak AND NoTagihan = a.NoUrut)) >0 ";

            rs = Db.Rs(query);
            for (int i = 0; i < rs.Rows.Count; i++)
            {
                if (!Response.IsClientConnected)
                {
                    break;
                }

                HtmlTableRow  r = new HtmlTableRow();
                HtmlTableCell c = new HtmlTableCell();
                TextBox       t;
                HtmlButton    bt;
                Label         l;

                c.InnerHtml = rs.Rows[i]["NoTagihan"].ToString();
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = rs.Rows[i]["NamaTagihan"].ToString();
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = rs.Rows[i]["Tipe"].ToString();
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = Cf.Day(rs.Rows[i]["TglJT"]);
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = Cf.Num(Convert.ToDecimal(rs.Rows[i]["SisaTagihan"]));
                c.Align     = "Right";
                r.Cells.Add(c);

                c    = new HtmlTableCell();
                t    = new TextBox();
                t.ID = "bayar_" + i;
                t.Attributes.Add("style", "text-align:right;");
                if (Convert.ToDecimal(rs.Rows[i]["SisaTagihan"]) <= LB)
                {
                    t.Text          = Cf.Num(rs.Rows[i]["SisaTagihan"]);
                    total          += Convert.ToDecimal(rs.Rows[i]["SisaTagihan"]);
                    totalBayar.Text = Cf.Num(total);
                }
                else
                {
                    if (LB > 0)
                    {
                        t.Text          = Cf.Num(LB);
                        total          += LB;
                        LB             -= Convert.ToDecimal(rs.Rows[i]["SisaTagihan"]);
                        totalBayar.Text = Cf.Num(total);
                    }
                }
                Js.NumberFormat(t);
                t.Attributes["onblur"] += "hitunggt();";
                c.Controls.Add(t);
                r.Cells.Add(c);

                // Tanggal
                c = new HtmlTableCell();

                t                     = new TextBox();
                t.ID                  = "tgl_" + Convert.ToString(i);
                t.Width               = 75;
                t.CssClass            = "txt_center";
                t.Text                = Cf.Day(rs.Rows[i]["TglJT"]);
                t.Attributes["style"] = "font:8pt";
                c.Controls.Add(t);

                l      = new Label();
                l.Text = "&nbsp;";
                c.Controls.Add(l);

                bt                       = new HtmlButton();
                bt.InnerHtml             = "&#xf073;";
                bt.Attributes["onclick"] = "openCalendar('" + t.ID + "')";
                bt.Attributes["class"]   = "btn";
                bt.Attributes["style"]   = "font-family: 'fontawesome'";

                c.Controls.Add(bt);
                r.Cells.Add(c);

                c = new HtmlTableCell();
                CheckBox cb = new CheckBox();
                cb.Attributes.Add("onclick", "tagihan('bayar_" + i + "','" + Cf.Num(rs.Rows[i]["SisaTagihan"]) + "',this)");
                c.Controls.Add(cb);
                r.Cells.Add(c);


                c = new HtmlTableCell();
                c.Attributes.Add("style", "display:none;");
                c.InnerHtml = rs.Rows[i]["NoUrut"].ToString();
                c.ID        = "NoTagihan_" + i;
                r.Cells.Add(c);

                list.Controls.Add(r);
            }

            //HtmlTableRow tr = new HtmlTableRow();
            //HtmlTableCell td = new HtmlTableCell();
            //td.InnerHtml = "<b>Grand Total</b>";
            //td.ColSpan = 5;
            //tr.Cells.Add(td);

            //td = new HtmlTableCell();
            //TextBox te = new TextBox();
            //te.ID = "totalBayar";
            //te.Attributes.Add("style", "text-align:right;");
            //te.Text = Cf.Num(total);
            //td.Controls.Add(te);
            //tr.Cells.Add(td);

            //td = new HtmlTableCell();
            //td.ColSpan = 2;
            //tr.Cells.Add(td);

            //list.Controls.Add(tr);
        }
Пример #22
0
        protected void Fill()
        {
            kode.Text = Request.QueryString["id"];
            //tgl.Text = Cf.Day(DateTime.Today);

            list.Controls.Clear();

            string strSql = "SELECT a.NoCF, a.SN, a.SN_NoCF, a.Nilai, b.NoKontrak, b.NoUnit, b.NamaCust, b.NoAgent, b.NamaSkema"
                            + " FROM MS_KOMISI_CFP_DETAIL a"
                            + " INNER JOIN MS_KOMISI_CF b ON a.NoCF = b.NoCF"
                            + " WHERE 1=1 "
                            + " AND (SELECT COUNT(*) FROM MS_KOMISI_CFR_DETAIL WHERE NoCF = a.NoCF AND SN_NoCF = a.SN_NoCF) = 0"
                            + " AND b.Project = '" + Project + "'"
                            + " AND NoCFP = '" + Request.QueryString["id"] + "'";

            DataTable rs = Db.Rs(strSql);

            Rpt.NoData(list, rs, "Tidak terdapat data dengan kriteria seperti tersebut diatas.");

            int index = 0;

            for (int i = 0; i < rs.Rows.Count; i++)
            {
                if (!Response.IsClientConnected)
                {
                    break;
                }

                HtmlTableRow  r = new HtmlTableRow();
                HtmlTableCell c;
                CheckBox      cb;
                TextBox       tb6;

                string NamaPenerima = Db.SingleString("SELECT ISNULL(NamaAgent,'') FROM MS_KOMISI_CF_DETAIL WHERE NoCF = '" + rs.Rows[i]["NoCF"].ToString() + "' AND SN = " + Convert.ToInt32(rs.Rows[i]["SN_NoCF"]));
                int    NoAgent      = Db.SingleInteger("SELECT ISNULL(NoAgent,0) FROM MS_KOMISI_CF_DETAIL WHERE NoCF = '" + rs.Rows[i]["NoCF"].ToString() + "' AND SN = " + Convert.ToInt32(rs.Rows[i]["SN_NoCF"]));

                cb    = new CheckBox();
                cb.ID = "cb_" + index;
                cb.Attributes["title"] = rs.Rows[i]["NoCF"] + ";" + rs.Rows[i]["SN_NoCF"] + ";" + NoAgent;

                c = new HtmlTableCell();
                c.Controls.Add(cb);
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = NamaPenerima;
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = rs.Rows[i]["NoKontrak"].ToString();
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = rs.Rows[i]["NoUnit"].ToString();
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = Db.SingleString("SELECT ISNULL(Nama,'') FROM MS_AGENT WHERE NoAgent = '" + NoAgent + "'");
                r.Cells.Add(c);

                c           = new HtmlTableCell();
                c.InnerHtml = rs.Rows[i]["NamaSkema"].ToString();
                r.Cells.Add(c);

                c                     = new HtmlTableCell();
                c.InnerHtml           = Cf.Num(Convert.ToDecimal(rs.Rows[i]["Nilai"]));
                c.Attributes["class"] = "right";
                r.Cells.Add(c);

                tb6      = new TextBox();
                tb6.ID   = "pph_" + i;
                tb6.Text = "0";
                tb6.Attributes["onfocus"] = "tempnum=CalcFocus(this);";
                tb6.Attributes["onkeyup"] = "CalcType(this,tempnum);";
                //tb6.Attributes["onblur"] = "CalcBlur(this);hitungaja('" + i + "');";
                tb6.Width    = 100;
                tb6.CssClass = "txt_num";
                Js.NumberFormat(tb6);

                c = new HtmlTableCell();
                c.Controls.Add(tb6);
                c.Attributes["class"] = "right";
                r.Cells.Add(c);

                list.Controls.Add(r);

                index++;
            }
        }