Ejemplo n.º 1
0
        private void newHeader()
        {
            string header = "<h2>" + Mi.Pt + "</h2>";

            header        += "<h1 class='title'>LAPORAN MASTER STOCK PER LANTAI</h1>";
            header        += "<h4>Lokasi : " + lokasi.SelectedItem.Text;
            header        += "<br>Project : " + project.SelectedItem.Text + "</h4>";
            header        += "Laporan dihasilkan pada hari " + Cf.IndoWeek(DateTime.Today);
            header        += ", " + Cf.Date(DateTime.Now) + " dari workstation " + Act.IP + " oleh user " + Act.UserID + "<br /><br />";
            headJudul.Text = header;
        }
Ejemplo n.º 2
0
        private void newHeader()
        {
            string header = "<p>" + Mi.Pt + "</p>";

            header        += "<h1 class='title'>LAPORAN PAJAK</h1>";
            header        += "Periode : " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text) + "<br>";
            header        += "Project : " + project.SelectedValue + "<br>";
            header        += "Perusahaan : " + pers.SelectedItem.Text + "<br>";
            header        += "<br/> Laporan dihasilkan pada hari " + Cf.IndoWeek(DateTime.Today);
            header        += ", " + Cf.Date(DateTime.Now) + " dari workstation " + Act.IP + " oleh user " + Act.UserID + "<br />";
            headJudul.Text = header;
            //Response.Write(header);
        }
Ejemplo n.º 3
0
        private void newHeader()
        {
            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            string header = "<p>" + Mi.Pt + "</p>";

            header        += "<h1 class='title'>LAPORAN PROYEKSI PENERIMAAN</h1>";
            header        += "Periode : " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai);
            header        += "<br/> Laporan dihasilkan pada hari " + Cf.IndoWeek(DateTime.Today);
            header        += ", " + Cf.Date(DateTime.Now) + " dari workstation " + Act.IP + " oleh user " + Act.UserID + "<br /><br />";
            headJudul.Text = header;
        }
Ejemplo n.º 4
0
        private void newHeader()
        {
            string header = "<h2>" + Mi.Pt + "</h2>";

            header        += "<h1 class='title'>LAPORAN PENJUALAN TAHUNAN</h1>";
            header        += "Periode : " + thn1.SelectedValue + " s/d " + thn2.SelectedValue;
            header        += "<br/>Jenis : " + Rpt.inSql(jenis).Replace("'", "");
            header        += "<br/>Lokasi : " + lokasi.SelectedItem.Text;
            header        += "<br/>Principal : " + agent.SelectedItem.Text;
            header        += "<br/>Perusahaan : " + pers.SelectedValue;
            header        += "<br/>Project : " + project.SelectedValue;
            header        += "<br/> Laporan dihasilkan pada hari " + Cf.IndoWeek(DateTime.Today);
            header        += ", " + Cf.Date(DateTime.Now) + " dari workstation " + Act.IP + " oleh user " + Act.UserID + "<br /><br />";
            headJudul.Text = header;
        }
Ejemplo n.º 5
0
        private void newHeader()
        {
            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            string header = "<p>" + Mi.Pt + "</p>";

            header += "<h1 class='title'>LAPORAN PAJAK</h1>";
            header += "Periode : " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai) + "<br>";
            header += "Project : " + Project + "<br>";
            string pers = (Perusahaan == "SEMUA") ? "SEMUA" : Db.SingleString("SELECT Nama FROM " + Mi.DbPrefix + "SECURITY..REF_PERS WHERE Pers = '" + Perusahaan + "'");

            header        += "Perusahaan : " + pers + "<br>";
            header        += "<br/> Laporan dihasilkan pada hari " + Cf.IndoWeek(DateTime.Today);
            header        += ", " + Cf.Date(DateTime.Now) + " dari workstation " + Act.IP + " oleh user " + Act.UserID + "<br />";
            headJudul.Text = header;
            //Response.Write(header);
        }
Ejemplo n.º 6
0
        private void Fill()
        {
            string strSql = "SELECT * FROM MS_BAST A INNER JOIN MS_KONTRAK B ON A.NoKontrak = B.NoKontrak "
                            + "INNER JOIN MS_CUSTOMER C ON B.NoCustomer = C.NoCustomer"
                            + " WHERE A.NoKontrak = '" + nomor + "'";
            DataTable rs = Db.Rs(strSql);

            if (rs.Rows.Count != 0)
            {
                string[] SplitDate = Cf.DaySlash1(rs.Rows[0]["TglST"]).ToString().Split('/');
                string   Thns      = SplitDate[2];
                string   Blns      = SplitDate[1];

                nomorl.Text = "BAST-" + Thns + Blns + rs.Rows[0]["NoST"].ToString();
                //tgl.Text = Cf.Day(rs.Rows[0]["TglST"]);
                harist.Text = Cf.IndoWeek(Convert.ToDateTime(rs.Rows[0]["TglST"]));
                tglst.Text  = Cf.Day(rs.Rows[0]["TglST"]);

                string[] Times = Cf.Time(rs.Rows[0]["TglST"]).ToString().Split(':');
                string   Jam   = Times[0];
                string   Menit = Times[1];
                jamst.Text = Jam + ":" + Menit;

                Namacs.Text   = rs.Rows[0]["Nama"].ToString();
                Alamatcs.Text = rs.Rows[0]["KTP1"].ToString();
                ktpcs.Text    = rs.Rows[0]["NoKTP"].ToString();

                DataTable r = Db.Rs("SELECT * FROM MS_UNIT WHERE NoUnit = '" + rs.Rows[0]["NoUnit"].ToString() + "'");
                if (r.Rows.Count != 0)
                {
                    nounit1.Text = r.Rows[0]["NoUnit"].ToString();


                    lantai1.Text    = r.Rows[0]["Lantai"].ToString();
                    nounit1.Text    = r.Rows[0]["Nomor"].ToString();
                    tipe1.Text      = r.Rows[0]["Jenis"].ToString();
                    luas1.Text      = Cf.Num(r.Rows[0]["LuasSG"]).ToString();
                    semigross1.Text = Cf.Num(r.Rows[0]["LuasNett"]).ToString();
                }
            }
        }
Ejemplo n.º 7
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            x.Append("<br>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"<h3>" + Mi.Pt + "</h3>"
                             + "<h1 class='title'>LAPORAN REALISASI SALES & CASH IN</h1>"
                             + "Periode " + Cf.Monthname(Convert.ToInt32(bulandari.SelectedValue)) + " " + Convert.ToInt32(tahundari.SelectedValue)
                             + " s/d " + Cf.Monthname(Convert.ToInt32(bulansampai.SelectedValue)) + " " + Convert.ToInt32(tahunsampai.SelectedValue)
                             + "<br />"
                             + "Project : " + project.SelectedValue
                             + "<br>Perusahaan : " + pers.SelectedItem.Text
                             + "<br>Lokasi : " + tower.SelectedItem.Text
                             + "<br>Lantai : " + lt.SelectedItem.Text
                             + x
                             + "<br />"
                             + "<br />"

            ;
        }
Ejemplo n.º 8
0
        private void Report2()
        {
            param.Visible = false;
            rpt.Visible   = true;

            string tgl = "";

            if (tglinput.Checked)
            {
                tgl = tglinput.Text;
            }

            DateTime Dari   = Convert.ToDateTime(dari.Text);
            DateTime Sampai = Convert.ToDateTime(sampai.Text);

            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "Laporan Kasir NUP"
                             + "<br />"
                             + tgl + " : " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text)
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();
            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();
            Fill();
        }
Ejemplo n.º 9
0
        protected void Report()
        {
            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "Laporan Revisi NUP"
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();
            x.Append("<br />Untuk Project : " + Cf.Str(Project));

            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();

            Fill();
        }
Ejemplo n.º 10
0
        protected void Report()
        {
            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "Laporan Kasir NUP"
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();
            DateTime Tanggal1           = Db.SingleTime("SELECT FilterDari FROM " + Mi.DbPrefix + "MARKETINGJUAL..LapPDF WHERE AttachmentID = '" + AttachmentID + "'");
            DateTime Tanggal2           = Db.SingleTime("SELECT FilterSampai FROM " + Mi.DbPrefix + "MARKETINGJUAL..LapPDF WHERE AttachmentID = '" + AttachmentID + "'");

            x.Append("<br />Untuk tanggal : " + Cf.Day(Tanggal1) + " s/d " + Cf.Day(Tanggal2));
            x.Append("<br />Untuk Project : " + Cf.Str(Project));
            x.Append("<br />Untuk Kasir : " + Cf.Str(Kasir));

            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();

            Fill();
        }
        private void Report()
        {
            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            param.Visible = false;
            rpt.Visible   = true;

            lblHeader.Text = "<p>" + Mi.Pt + "</p>"
                             + "<h1 class='title'>Laporan Sales Performance</h1>"
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();

            x.Append("Sales : " + nAgent);
            string nstatussales = String.Empty;

            if (StatusSales == "I")
            {
                nstatussales = "Inaktif";
            }
            else if (StatusSales == "A")
            {
                nstatussales = "Aktif";
            }
            else
            {
                nstatussales = "Semua";
            }

            x.Append("<br />Status Agent : " + nstatussales);
            if (FilterTgl == "0")
            {
                x.Append("<br />Tgl Kontrak : " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai));
            }
            else
            {
                x.Append("<br />Tgl Kontrak : As Of : " + Cf.Day(TglAsOf));
            }
            x.Append("<br />Project : " + Project);

            x.Append("<br /><br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();
            Fill();
        }
Ejemplo n.º 12
0
        private void Report()
        {
            param.Visible = false;
            rpt.Visible   = true;

            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "LAPORAN AGING PIUTANG"
                             + "<br />"
                             + "PER " + Cf.Day(tgl.Text)
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();

            if (lokasi.SelectedIndex > 0)
            {
                x.Append("Lokasi: " + lokasi.SelectedItem.Text + "<br />");
            }

            if (ddlAgent.SelectedIndex != 0)
            {
                x.Append("Sales: " + ddlAgent.SelectedValue);
            }
            else
            {
                x.Append("Sales: SEMUA");
            }

            string strPrincipal = "SEMUA";

            System.Text.StringBuilder z = new System.Text.StringBuilder();
            bool isFirst = true;

            for (int i = 0; i < cblPrincipal.Items.Count; i++)
            {
                if (cblPrincipal.Items[i].Selected)
                {
                    if (isFirst)
                    {
                        z.Append(cblPrincipal.Items[i].Text);
                        isFirst = false;
                    }
                    else
                    {
                        z.Append("," + cblPrincipal.Items[i].Text);
                    }
                }
            }

            if (z.ToString() != "")
            {
                strPrincipal = z.ToString();
            }
            x.Append("<br />Principal: " + strPrincipal);

            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();
            Fill();
        }
Ejemplo n.º 13
0
        protected void Report()
        {
            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "Laporan NUP"
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();
            DateTime Tanggal1           = Db.SingleTime("SELECT FilterDari FROM " + Mi.DbPrefix + "MARKETINGJUAL..LapPDF WHERE AttachmentID = '" + AttachmentID + "'");
            DateTime Tanggal2           = Db.SingleTime("SELECT FilterSampai FROM " + Mi.DbPrefix + "MARKETINGJUAL..LapPDF WHERE AttachmentID = '" + AttachmentID + "'");
            string   addStr             = "Semua Admin";

            if (Admin != "SEMUA")
            {
                addStr = Db.SingleString("SELECT Nama FROM ISC064_SECURITY..USERNAME WHERE UserID='" + Admin + "'");
            }


            x.Append("<br />Untuk tanggal : " + Cf.Day(Tanggal1) + " s/d " + Cf.Day(Tanggal2));
            x.Append("<br />Untuk Project : " + Cf.Str(Project));
            x.Append("<br />Untuk Admin : " + Cf.Str(addStr));
            x.Append("<br />Untuk Tipe : " + Tipe);

            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();

            Fill();
        }
Ejemplo n.º 14
0
        protected void Report()
        {
            param.Visible = false;
            rpt.Visible   = true;

            header.Text = Mi.Pt
                          + "<br />"
                          + "LAPORAN DATA CUSTOMER SIAP PPJB"
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();

            x.Append("Urut Customer: " + urut.SelectedItem.Text + "<br />");
            x.Append("Skema Bayar: " + Rpt.inSql(skemalist).Replace("'", ""));
            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            subheader.Text = x.ToString();
            Fill();
        }
Ejemplo n.º 15
0
        private void Report()
        {
            param.Visible = false;
            rpt.Visible   = true;

            lblPT.Text     = Mi.Pt;
            lblHeader.Text = "Laporan Ganti Nama NUP";

            System.Text.StringBuilder x = new System.Text.StringBuilder();

            x.Append("<br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();
            Fill();
        }
Ejemplo n.º 16
0
        private void Fill()
        {
            string Status = "";

            if (statusA.Checked)
            {
                Status = " AND a.Status = 'A'";
            }
            if (statusB.Checked)
            {
                Status = " AND a.Status = 'B'";
            }

            string tgl = "";

            if (tglkontrak.Checked)
            {
                tgl = "TglKontrak";
            }
            else if (tglinput.Checked)
            {
                tgl = "a.TglInput";
            }

            DateTime Dari   = Convert.ToDateTime(dari.Text);
            DateTime Sampai = Convert.ToDateTime(sampai.Text);

            if (Dari > Sampai)
            {
                DateTime x = Sampai;
                Sampai = Dari;
                Dari   = x;
            }

            string Lokasi = "";

            if (lokasi.SelectedIndex != 0)
            {
                Lokasi = " AND Lokasi = '" + Cf.Str(lokasi.SelectedValue) + "'";
            }

            string Agent = "";

            if (agent.SelectedIndex != 0)
            {
                Agent = " AND Principal = '" + Cf.Str(agent.SelectedValue) + "'";
            }

            string Sort = "";

            if (sort.SelectedValue == "TglInput")
            {
                Sort = "a.TglInput";
            }
            else
            {
                Sort = sort.SelectedValue;
            }

            string strSql = "SELECT a.*"
                            + ", b.Nama AS Cs"
                            + ", b.NoKTP"
                            + ", b.NoTelp"
                            + ", b.NoHP"
                            + ", c.Nama AS Ag"
                            + ", c.Principal"
                            + " FROM MS_KONTRAK a"
                            + " INNER JOIN MS_CUSTOMER b ON a.NoCustomer = b.NoCustomer"
                            + " INNER JOIN MS_AGENT c ON a.NoAgent = c.NoAgent"
                            + " WHERE 1 = 1"
                            + " AND CONVERT(varchar, " + tgl + " ,112) >= '" + Cf.Tgl112(Dari) + "'"
                            + " AND CONVERT(varchar, " + tgl + ", 112) <= '" + Cf.Tgl112(Sampai) + "'"
                            + " AND Jenis IN (" + Rpt.inSql(jenis) + ")"
                            + Lokasi
                            + Status
                            + Agent
                            + " ORDER BY " + Sort
            ;

            DataTable rs = Db.Rs(strSql);

            decimal t1 = 0, t2 = 0, t3 = 0, t4 = 0;

            decimal[] TotalBF  = new decimal[rs.Rows.Count];
            decimal[] TotalDP  = new decimal[rs.Rows.Count];
            decimal[] TotalANG = new decimal[rs.Rows.Count];

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

                TableRow  r = new TableRow();
                TableCell c;

                r.VerticalAlign            = VerticalAlign.Top;
                r.Attributes["ondblclick"] = "popEditKontrak('" + rs.Rows[i]["NoKontrak"] + "')";

                c                 = new TableCell();
                c.Text            = Cf.Pk(rs.Rows[i]["NoKontrak"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.IndoWeek(Convert.ToDateTime(rs.Rows[i]["TglKontrak"])) + "<br />" + Cf.Day(rs.Rows[i]["TglKontrak"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Day(rs.Rows[i]["TglInput"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = Cf.Str(rs.Rows[i]["Cs"])
                         + "<br />"
                         + "KTP: " + rs.Rows[i]["NoKTP"].ToString()
                         + "<br />"
                         + rs.Rows[i]["NoTelp"].ToString()
                         + "<br />"
                         + rs.Rows[i]["NoHP"].ToString()
                ;
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Str.Lantai(Cf.Pk(rs.Rows[i]["NoUnit"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Str.NoUnit(Cf.Pk(rs.Rows[i]["NoUnit"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Str(rs.Rows[i]["Jenis"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Num(rs.Rows[i]["NilaiKontrak"]);
                c.HorizontalAlign = HorizontalAlign.Right;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Str(rs.Rows[i]["Skema"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Str(rs.Rows[i]["Ag"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = TglBayar(Cf.Pk(rs.Rows[i]["NoKontrak"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Pembayaran(Cf.Pk(rs.Rows[i]["NoKontrak"]), "BF");
                TotalBF[i]        = TotalBayar(Cf.Pk(rs.Rows[i]["NoKontrak"]), "BF");
                c.HorizontalAlign = HorizontalAlign.Right;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Pembayaran(Cf.Pk(rs.Rows[i]["NoKontrak"]), "DP");
                TotalDP[i]        = TotalBayar(Cf.Pk(rs.Rows[i]["NoKontrak"]), "DP");
                c.HorizontalAlign = HorizontalAlign.Right;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Pembayaran(Cf.Pk(rs.Rows[i]["NoKontrak"]), "ANG");
                TotalANG[i]       = TotalBayar(Cf.Pk(rs.Rows[i]["NoKontrak"]), "ANG");
                c.HorizontalAlign = HorizontalAlign.Right;
                r.Cells.Add(c);

                rpt.Rows.Add(r);

                t1 = t1 + (decimal)rs.Rows[i]["NilaiKontrak"];
                t2 = t2 + (decimal)TotalBF[i];
                t3 = t3 + (decimal)TotalDP[i];
                t4 = t4 + (decimal)TotalANG[i];

                if (i == (rs.Rows.Count - 1))
                {
                    SubTotal(t1, t2, t3, t4);
                }
            }
        }
Ejemplo n.º 17
0
        private void Report()
        {
            param.Visible = false;
            rpt.Visible   = true;

            lblHeader.Text = "<p>" + Mi.Pt + "</p>"
                             + "<h1 class='title'>Laporan Sales Performance</h1>"
            ;

            System.Text.StringBuilder x = new System.Text.StringBuilder();

            x.Append("Sales : " + ddlAgent.SelectedItem.Text);
            x.Append("<br />Status Agent : " + status.SelectedItem.ToString());
            if (filtertgl.SelectedValue.ToString() == "0")
            {
                x.Append("<br />Tgl Kontrak : " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text));
            }
            else
            {
                x.Append("<br />Tgl Kontrak : As Of : " + Cf.Day(tglasof.Text));
            }

            string hitung = "";

            if (kuantitas.Checked)
            {
                hitung = kuantitas.Text;
            }
            if (rupiah.Checked)
            {
                hitung = rupiah.Text;
            }
            x.Append("<br />Perhitungan : " + hitung);
            x.Append("<br />Project : " + project.SelectedItem.Text);

            x.Append("<br /><br /><span style='font-weight: normal;'>Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                     + ", " + Cf.Date(DateTime.Now)
                     + " dari workstation : " + Act.IP
                     + " dan username : "******"</span>"
                     );

            lblSubHeader.Text = x.ToString();
            Fill();
        }
Ejemplo n.º 18
0
        private void Fill()
        {
            string Status = "";

            if (statusA.Checked)
            {
                Status = " AND a.Status = 'A'";
            }
            if (statusB.Checked)
            {
                Status = " AND a.Status = 'B'";
            }

            string tgl   = "";
            string order = "";

            if (tglkontrak.Checked)
            {
                tgl   = "TglKontrak";
                order = "NoKontrak";
            }

            DateTime Dari   = Convert.ToDateTime(dari.Text);
            DateTime Sampai = Convert.ToDateTime(sampai.Text);

            if (Dari > Sampai)
            {
                DateTime x = Sampai;
                Sampai = Dari;
                Dari   = x;
            }

            string Lokasi = "";

            if (lokasi.SelectedIndex != 0)
            {
                Lokasi = " AND Lokasi = '" + Cf.Str(lokasi.SelectedValue) + "'";
            }

            string Agent = "";

            if (agent.SelectedIndex != 0)
            {
                Agent = " AND Principal = '" + Cf.Str(agent.SelectedValue) + "'";
            }

            decimal t1 = 0, t2 = 0;

            string strSql = "SELECT a.*"
                            + ", b.Nama AS Cs"
                            + ", b.NoKTP"
                            + ", b.NoTelp"
                            + ", b.NoHP"
                            + ", c.Nama AS Ag"
                            + ", c.Principal"
                            + ", (SELECT ISNULL(SUM(NilaiPelunasan), 0) FROM MS_PELUNASAN WHERE NoKontrak = a.NoKontrak) AS TotalBFR"
                            + " FROM MS_KONTRAK a"
                            + " INNER JOIN MS_CUSTOMER b ON a.NoCustomer = b.NoCustomer"
                            + " INNER JOIN MS_AGENT c ON a.NoAgent = c.NoAgent"
                            + " WHERE a.NoKontrak NOT IN"
                            + "					("
                            + "						SELECT NoKontrak"
                            + "						FROM"
                            + "						("
                            + "							SELECT NoKontrak, SUM(NilaiPelunasan) AS Total"
                            + "							FROM MS_PELUNASAN"
                            + "							GROUP BY NoKontrak"
                            + "						)"
                            + "						AS table1 WHERE Total >= 10000000"
                            + "					)"
                            + " AND CONVERT(varchar, " + tgl + " ,112) >= '" + Cf.Tgl112(Dari) + "'"
                            + " AND CONVERT(varchar, " + tgl + ", 112) <= '" + Cf.Tgl112(Sampai) + "'"
                            + " AND Jenis IN (" + Rpt.inSql(jenis) + ")"
                            + Lokasi
                            + Status
                            + Agent
                            + " ORDER BY " + order
            ;

            DataTable rs = Db.Rs(strSql);

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

                TableRow  r = new TableRow();
                TableCell c;

                r.VerticalAlign            = VerticalAlign.Top;
                r.Attributes["ondblclick"] = "popEditKontrak('" + rs.Rows[i]["NoKontrak"] + "')";

                c                 = new TableCell();
                c.Text            = Cf.Pk(rs.Rows[i]["NoKontrak"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.IndoWeek(Convert.ToDateTime(rs.Rows[i]["TglKontrak"])) + "<br />" + Cf.Day(rs.Rows[i]["TglKontrak"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = Cf.Str(rs.Rows[i]["Cs"])
                         + "<br />"
                         + "KTP: " + rs.Rows[i]["NoKTP"].ToString()
                         + "<br />"
                         + rs.Rows[i]["NoTelp"].ToString()
                         + "<br />"
                         + rs.Rows[i]["NoHP"].ToString()
                ;
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Str.Lantai(Cf.Pk(rs.Rows[i]["NoUnit"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Str.Blok(Cf.Pk(rs.Rows[i]["NoUnit"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Str.NoUnit(Cf.Pk(rs.Rows[i]["NoUnit"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Str(rs.Rows[i]["Jenis"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Num(rs.Rows[i]["NilaiKontrak"]);
                c.HorizontalAlign = HorizontalAlign.Right;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Str(rs.Rows[i]["Skema"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = NoTTS(Cf.Pk(rs.Rows[i]["NoKontrak"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = CaraBayar(Cf.Pk(rs.Rows[i]["NoKontrak"]));
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Num(rs.Rows[i]["TotalBFR"]);
                c.HorizontalAlign = HorizontalAlign.Right;
                r.Cells.Add(c);

                c                 = new TableCell();
                c.Text            = Cf.Str(rs.Rows[i]["Ag"]);
                c.HorizontalAlign = HorizontalAlign.Left;
                r.Cells.Add(c);

                rpt.Rows.Add(r);

                t1 = t1 + (decimal)rs.Rows[i]["NilaiKontrak"];
                t2 = t2 + (decimal)rs.Rows[i]["TotalBFR"];

                if (i == (rs.Rows.Count - 1))
                {
                    SubTotal(t1, t2);
                }
            }
        }