コード例 #1
0
ファイル: TTSSlip.aspx.cs プロジェクト: yorigum/isc064
        protected void Page_Load(object sender, System.EventArgs e)
        {
            Act.Pass();
            Act.NoCache();

            if (!Page.IsPostBack)
            {
                cancel.Attributes["onclick"] = "location.href='TTSEdit.aspx?NoTTS=" + NoTTS + "'";
                tglsetoran.Text = Cf.Day(DateTime.Today);

                Fill();
                Bind();
            }
        }
コード例 #2
0
        private void Fill()
        {
            DateTime Dari   = Convert.ToDateTime(dari.Text);
            DateTime Sampai = Convert.ToDateTime(sampai.Text);

            if (Dari > Sampai)
            {
                DateTime x = Sampai;
                Sampai = Dari;
                Dari   = x;
            }
            string strSql = "SELECT * FROM MS_KOMISI_REWARD_R"
                            + " WHERE CONVERT(varchar,Tgl,112) >= '" + Cf.Tgl112(Dari) + "'"
                            + " AND CONVERT(varchar,Tgl,112) <= '" + Cf.Tgl112(Sampai) + "'"
                            + " ORDER BY NoRR";
            DataTable rs = Db.Rs(strSql);

            Rpt.NoData(rpt, rs, "Tidak ada realisasi reward dengan kriteria seperti tersebut diatas.");

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

                TableRow  r = new TableRow();
                TableCell c;


                c      = new TableCell();
                c.Text = "<a href=\"javascript:call('" + rs.Rows[i]["NoRR"] + "')\">"
                         + rs.Rows[i]["NoRR"].ToString() + "</a>";
                r.Cells.Add(c);

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

                c      = new TableCell();
                c.Text = rs.Rows[i]["Ket"].ToString();
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = rs.Rows[i]["Project"].ToString();
                r.Cells.Add(c);

                rpt.Rows.Add(r);
            }
        }
コード例 #3
0
ファイル: TTR.aspx.cs プロジェクト: yorigum/isc064
        private void init()
        {
            dari.Text   = Cf.Day(DateTime.Today);
            sampai.Text = Cf.Day(DateTime.Today);

            DataTable rs;

            rs = Db.Rs("SELECT DISTINCT UserID FROM MS_TTR ORDER BY UserID");
            for (int i = 0; i < rs.Rows.Count; i++)
            {
                string v = rs.Rows[i]["UserID"].ToString();
                user.Items.Add(new ListItem(v, v));
            }
        }
コード例 #4
0
ファイル: SummaryStock.aspx.cs プロジェクト: yorigum/isc064
        private void Report()
        {
            param.Visible = false;
            rpt.Visible   = true;

            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "LAPORAN SUMMARY STOCK"
                             + "<br />"
                             + "PER " + Cf.Day(DateTime.Today)
            ;

            Fill();
        }
コード例 #5
0
        private void Report()
        {
            param.Visible = false;
            rpt.Visible   = true;

            lblHeader.Text = Mi.Pt
                             + "<br />"
                             + "LAPORAN RATA-RATA HARGA JUAL PER TOWER"
                             + "<br />"
                             + "PER " + Cf.Day(DateTime.Today)
            ;

            Fill();
        }
コード例 #6
0
        private void init()
        {
            dari.Text   = Cf.Day(DateTime.Today);
            sampai.Text = Cf.Day(DateTime.Today);

            //tipe
            string[] x = Sc.MktCatalog();
            for (int i = 0; i <= x.GetUpperBound(0); i++)
            {
                string[] xdetil = x[i].Split(';');
                tipe.Items.Add(new ListItem(xdetil[2], xdetil[1]));
                tipe.Items[i].Selected = true;
            }
        }
コード例 #7
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

            Rpt.SubJudul(x
                         , "Lokasi : " + lokasi.SelectedItem.Text
                         );

            string tgl = "";

            if (tbTarget.Checked)
            {
                tgl = tbTarget.Text;
            }
            if (tbTgl.Checked)
            {
                tgl = tbTgl.Text;
            }

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

            Rpt.SubJudul(x
                         , tgl + " : " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text)
                         );

            Rpt.SubJudul(
                x, "Status Wawancara : " + ddlStatus.SelectedItem.Text
                );

            if (rekening.SelectedIndex == 0)
            {
                Rpt.SubJudul(x, "Bank KPR : SEMUA");
            }
            else
            {
                Rpt.SubJudul(x, "Bank KPR : " + rekening.SelectedValue);
            }

            Rpt.SubJudul(
                x, "Project : " + project.SelectedValue
                );
            Rpt.SubJudul(
                x, "Perusahaan : " + pers.SelectedItem.Text
                );
            //Rpt.Header(rpt, x);
            Rpt.HeaderReport(headReport, "", x);
        }
コード例 #8
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 = "<h2>" + Mi.Pt + "</h2>";

            header        += "<h1 class='title'>Laporan Pindah Unit</h1>";
            header        += "<h4>Project : " + Project + "</h4>";
            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;
        }
コード例 #9
0
        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;
        }
コード例 #10
0
        private void init()
        {
            tgl.Text = Cf.Day(DateTime.Now);
            string    Project = project.SelectedValue == "SEMUA" ? "Project IN (" + Act.ProjectListSql + ")" : "Project = '" + project.SelectedValue + "'";
            DataTable rs;

            rs = Db.Rs("SELECT DISTINCT Lokasi FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE " + Project + " ORDER BY Lokasi");
            for (int i = 0; i < rs.Rows.Count; i++)
            {
                lokasi.Items.Add(new ListItem(rs.Rows[i][0].ToString()));
            }

            lokasi.SelectedIndex = 0;
        }
コード例 #11
0
ファイル: BukuBank.aspx.cs プロジェクト: yorigum/isc064
        private void init()
        {
            dari.Text   = Cf.Day(DateTime.Today);
            sampai.Text = Cf.Day(DateTime.Today);

            DataTable rs = Db.Rs("SELECT * FROM REF_ACC");

            for (int i = 0; i < rs.Rows.Count; i++)
            {
                string v = rs.Rows[i]["Acc"].ToString();
                string t = v + " : " + rs.Rows[i]["Bank"] + " " + rs.Rows[i]["Rekening"];
                ddlAcc.Items.Add(new ListItem(t, v));
            }
        }
コード例 #12
0
ファイル: Espt.aspx.cs プロジェクト: yorigum/isc064
        private void init()
        {
            dari.Text   = Cf.Day(DateTime.Today);
            sampai.Text = Cf.Day(DateTime.Today);

            //DataTable rs;

            //rs = Db.Rs("SELECT DISTINCT UserID FROM MS_TTS ORDER BY UserID");
            //for (int i = 0; i < rs.Rows.Count; i++)
            //    kasir.Items.Add(new ListItem(
            //        rs.Rows[i][0].ToString()));

            //kasir.SelectedIndex = 0;
        }
コード例 #13
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            Rpt.SubJudul(x
                         , "Lokasi : " + Lokasi
                         );

            Rpt.SubJudul(x
                         , Tanggal2 + " : " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai)
                         );

            Rpt.SubJudul(
                x, "Status SP3K : " + StatusSP3K
                );

            Rpt.SubJudul(
                x, "Hasil SP3K : " + HasilSP3K
                );

            if (Rekening == "SEMUA")
            {
                Rpt.SubJudul(x, "Rekening Bank: SEMUA");
            }
            else
            {
                Rpt.SubJudul(x, "Rekening Bank: " + Rekening);
            }

            Rpt.SubJudul(
                x, "Project : " + Project
                );

            string pers = (Perusahaan == "SEMUA") ? "SEMUA" : Db.SingleString("SELECT Nama FROM " + Mi.DbPrefix + "SECURITY..REF_PERS WHERE Pers = '" + Perusahaan + "'");

            Rpt.SubJudul(
                x, "Perusahaan : " + pers
                );

            string legend = "";

            //Rpt.Header(rpt, x);
            Rpt.HeaderReport(headReport, legend, x);
        }
コード例 #14
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;
        }
コード例 #15
0
        protected void Header()
        {
            Label l;

            l       = new Label();
            l.Text  = Mi.Pt;
            l.Text += "<h1 class='title'>Daily Report</h1>";
            l.Text += "<h2>per " + Cf.Day(Tgl) + "</h2>";
            l.Text += "Laporan dihasilkan pada hari : " + Cf.IndoWeek(DateTime.Today)
                      + ", " + Cf.Date(DateTime.Now)
                      + " dari workstation : eProperty Mobile"
                      + " dan username : "******"<br /><br />";
            rpt.Controls.Add(l);
        }
コード例 #16
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

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

            Rpt.SubJudul(x
                         , "Tgl. Batal: " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text)
                         );

            Rpt.Header(rpt, x);
        }
コード例 #17
0
ファイル: PDFCol.aspx.cs プロジェクト: yorigum/isc064
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            Rpt.SubJudul(x
                         , "Tgl. Jatuh Tempo: " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai)
                         );

            Rpt.Header(rpt, x);
        }
コード例 #18
0
ファイル: BGGanti.aspx.cs プロジェクト: yorigum/isc064
        private void SetBG()
        {
            string    strSql = "SELECT TOP 1 NoBG, TglBG FROM MS_TTS WHERE NoBG = '" + NoBG + "'";
            DataTable rs     = Db.Rs(strSql);

            if (rs.Rows.Count == 0)
            {
                Response.Redirect("/CustomError/Deleted.html");
            }
            else
            {
                nobgbaru.Text = rs.Rows[0]["NoBG"].ToString();
                tglbg.Text    = Cf.Day(rs.Rows[0]["TglBG"]);
            }
        }
コード例 #19
0
        private void SubTotal(decimal decTotalKontrak, decimal decTotalPriceList, decimal decTotalNilaiKontrak, decimal decTotalDiskon, decimal decTotalBayar, DateTime TglKontrak)
        {
            TableRow  r = new TableRow();
            TableCell c;

            c                 = Rpt.Foot();
            c.Text            = "SUBTOTAL UNIT PENJUALAN " + Cf.Day(TglKontrak);
            c.ColumnSpan      = 3;
            c.HorizontalAlign = HorizontalAlign.Center;
            r.Cells.Add(c);

            c                 = Rpt.Foot();
            c.Text            = decTotalKontrak.ToString();
            c.HorizontalAlign = HorizontalAlign.Center;
            r.Cells.Add(c);

            c                 = Rpt.Foot();
            c.Text            = "SUBTOTAL PENJUALAN " + Cf.Day(TglKontrak);
            c.ColumnSpan      = 4;
            c.HorizontalAlign = HorizontalAlign.Center;
            r.Cells.Add(c);

            c                 = Rpt.Foot();
            c.Text            = Cf.Num(decTotalPriceList);
            c.HorizontalAlign = HorizontalAlign.Right;
            r.Cells.Add(c);

            c                 = Rpt.Foot();
            c.Text            = Cf.Num(decTotalNilaiKontrak);
            c.HorizontalAlign = HorizontalAlign.Right;
            r.Cells.Add(c);

            c                 = Rpt.Foot();
            c.Text            = Cf.Num(decTotalDiskon);
            c.HorizontalAlign = HorizontalAlign.Right;
            r.Cells.Add(c);

            c                 = Rpt.Foot();
            c.Text            = Cf.Num(decTotalBayar);
            c.HorizontalAlign = HorizontalAlign.Right;
            r.Cells.Add(c);

            c      = Rpt.Foot();
            c.Text = "&nbsp;";
            r.Cells.Add(c);

            rpt.Rows.Add(r);
        }
コード例 #20
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 (NilaiTagihan - (SELECT ISNULL(SUM(NilaiPelunasan),0) FROM " + Tb + "..MS_PELUNASAN WHERE NoTagihan = MS_TAGIHAN.NoUrut AND NoKontrak = '" + Ref + "') ) > 0"
                            + " ORDER BY NoUrut, TglJT";

            rsTagihan = Db.Rs(strSql);

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

                Label   l;
                TextBox t;

                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";
                t.Attributes["onfocus"] = "tempnum=CalcFocus(this);";
                t.Attributes["onkeyup"] = "CalcType(this,tempnum);";
                t.Attributes["onblur"]  = "CalcBlur(this);hitunggt();";
                list.Controls.Add(t);

                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);
            }
        }
コード例 #21
0
        private void Fill()
        {
            string strSql = "SELECT *"
                            + ",CASE CaraBayar"
                            + "		WHEN 'TN' THEN 'TUNAI'"
                            + "		WHEN 'KK' THEN 'KARTU KREDIT'"
                            + "		WHEN 'KD' THEN 'KARTU DEBIT'"
                            + "		WHEN 'TR' THEN 'TRANSFER BANK'"
                            + "		WHEN 'BG' THEN 'CEK GIRO'"
                            + "		WHEN 'UJ' THEN 'UANG JAMINAN'"
                            + "		WHEN 'DN' THEN 'DISKON'"
                            + " END AS CaraBayar2"
                            + " FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE NoTTS = " + nomor;
            DataTable rs = Db.Rs(strSql);

            if (rs.Rows.Count != 0)
            {
                nomorl.Text = rs.Rows[0]["NoTTS"].ToString().PadLeft(7, '0');
                tgl.Text    = Cf.Day(rs.Rows[0]["TglTTS"]);

                cs.Text = rs.Rows[0]["Customer"].ToString();

                decimal Total = Convert.ToDecimal(rs.Rows[0]["Total"]);
                if ((bool)rs.Rows[0]["Pph"])
                {
                    Total = Total * (decimal)1.1;
                }

                jumlah.Text    = Cf.Num(Total);
                terbilang.Text = Money.Str(Total);

                carabayar.Text = rs.Rows[0]["CaraBayar2"].ToString();
                if (rs.Rows[0]["CaraBayar"].ToString() == "BG")
                {
                    carabayar.Text = carabayar.Text
                                     + " / " + rs.Rows[0]["NoBG"] + " Tgl. " + Cf.Day(rs.Rows[0]["TglBG"]);
                }
                if (rs.Rows[0]["Ket"].ToString() != "")
                {
                    carabayar.Text = carabayar.Text + ", " + rs.Rows[0]["Ket"].ToString();
                }

                noref.Text = rs.Rows[0]["Ref"].ToString()
                             + " (" + rs.Rows[0]["Unit"] + ")";

                FillTable(rs.Rows[0]["Tipe"].ToString());
            }
        }
コード例 #22
0
ファイル: Models.cs プロジェクト: yorigum/isc064
        public static Kwitansi Kwitansi(object NoTTS)
        {
            Kwitansi  x  = new Kwitansi();
            DataTable rs = Db.Rs("use " + Mi.DbPrefix + "financear;SELECT * "
                                 + ",CASE CaraBayar"
                                 + "		WHEN 'TN' THEN 'TUNAI'"
                                 + "		WHEN 'KK' THEN 'KARTU KREDIT'"
                                 + "		WHEN 'KD' THEN 'KARTU DEBIT'"
                                 + "		WHEN 'TR' THEN 'TRANSFER BANK'"
                                 + "		WHEN 'BG' THEN 'CEK GIRO'"
                                 + "		WHEN 'UJ' THEN 'UANG JAMINAN'"
                                 + "		WHEN 'DN' THEN 'DISKON'"
                                 + "		WHEN 'MB' THEN 'MERCHANT BANKING'"
                                 + "     WHEN 'PP' THEN 'PENGHAPUSAN PIUTANG'"
                                 + " END AS NamaCaraBayar"
                                 + " FROM MS_TTS WHERE NoTTS = '" + NoTTS + "'");

            if (rs.Rows.Count > 0)
            {
                var r = rs.Rows[0];
                x.NoKontrak      = r["Ref"].ToString();
                x.NoTTS          = NoTTS.ToString();
                x.NoBKM          = r["NoBKM"].ToString();
                x.NoKwitansi     = r["NoBKM2"].ToString();
                x.CaraBayar      = (string)r["carabayar"];
                x.Keterangan     = (string)r["Ket"];
                x.NilaiKwitansi  = (decimal)r["Total"];
                x.Status         = (string)r["Status"];
                x.TglTTS         = (DateTime)r["TglTTS"];
                x.User           = (string)r["UserID"];
                x.TglBKM         = Cf.Day(r["TglBKM"]);
                x.TglInput       = (DateTime)r["TglInput"];
                x.IPAddress      = r["IP"].ToString();
                x.AccountID      = r["Acc"].ToString();
                x.StatusBG       = r["StatusBg"].ToString();
                x.TglBG          = Cf.Day(r["TglBG"]);
                x.UdahJadiJurnal = (bool)r["Fobo"];
                x.Tipe           = r["Tipe"].ToString();
                x.AdminBank      = (decimal)r["AdminBank"];
                x.LebihBayar     = (decimal)r["LebihBayar"];
                x.KurangBayar    = (decimal)r["KurangBayar"];
                x.ManualTTS      = r["manualTTS"].ToString();
                x.ManualBKM      = r["ManualBKM"].ToString();
                x.NamaCaraBayar  = r["NamaCaraBayar"].ToString();
                x.NoGiro         = r["NoBG"].ToString();
            }
            return(x);
        }
コード例 #23
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

            if (StatusA != "")
            {
                Rpt.SubJudul(x, "Status : " + StatusA);
            }
            else if (StatusB != "")
            {
                Rpt.SubJudul(x, "Status : " + StatusB);
            }
            else
            {
                Rpt.SubJudul(x, "Status : " + StatusS);
            }


            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            Rpt.SubJudul(x
                         , JenisTanggal + " : " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai)
                         );

            Rpt.SubJudul(x
                         , "Tipe : " + Tipe.Replace("'", "")
                         );

            Rpt.SubJudul(x
                         , "Perusahaan : " + Perusahaan
                         );

            Rpt.SubJudul(x
                         , "Project : " + Project
                         );

            //Rpt.Header(rpt, x);

            string legend = "<br />Status: A = Aktif / B = Batal.<br />"
                            + "Tipe : BF = Booking Fee / DP = Downpayment / ANG = Angsuran / ADM = Biaya Administrasi.<br />"
                            + "Cara Bayar: TN = Tunai / KD = Kartu Debit / KK = Kartu Kredit / TR = Transfer Bank / BG = Cek Giro / DN = Diskon.<br />"
                            + "** = Jatuh Tempo.";

            Rpt.HeaderReport(headReport, legend, x);
        }
コード例 #24
0
ファイル: DaftarCFP.aspx.cs プロジェクト: yorigum/isc064
        private void Fill()
        {
            string strSql = "SELECT *"
                            + " FROM MS_KOMISI_CFP "
                            + " WHERE NoCFP + NamaAgent + NamaSkema "
                            + " LIKE '%" + Cf.Str(keyword.Text) + "%'"
                            + " AND Project IN (" + Act.ProjectListSql + ")"
                            + " ORDER BY NoCFP";

            DataTable rs = Db.Rs(strSql);

            Rpt.NoData(rpt, rs, "Tidak ditemukan data pengajuan closing fee dengan keyword diatas.");

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

                TableRow  r = new TableRow();
                TableCell c;

                c      = new TableCell();
                c.Text = "<a href=\"javascript:call('" + rs.Rows[i]["NoCFP"] + "')\">"
                         + rs.Rows[i]["NoCFP"].ToString() + "</a>";
                c.Wrap = false;
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = Cf.Day(rs.Rows[i]["Tgl"]);
                c.Wrap = false;
                r.Cells.Add(c);

                string Sales = Db.SingleString("SELECT TOP 1 STUFF((SELECT distinct ', ' + NamaAgent FROM MS_KOMISI_CFP_DETAIL AS T1"
                                               + " where NoCFP = '" + rs.Rows[i]["NoCFP"].ToString() + "'"
                                               + " FOR XML PATH('')), 1, 1, '') As Nama "
                                               + " FROM MS_KOMISI_CFP_DETAIL AS T2 where NoCFP = '" + rs.Rows[i]["NoCFP"].ToString() + "'"
                                               );

                c      = new TableCell();
                c.Text = Sales;
                r.Cells.Add(c);

                Rpt.Border(r);
                rpt.Rows.Add(r);
            }
        }
コード例 #25
0
        private void Fill()
        {
            string strSql = "SELECT *"
                            + ",(SELECT Nama FROM " + Mi.DbPrefix + "SECURITY..USERNAME WHERE UserID = MS_RESERVASI_JURNAL.UserID) AS Nama"
                            + " FROM MS_RESERVASI_JURNAL"
                            + " WHERE NoReservasi = " + NoReservasi
                            + " ORDER BY JurnalID";

            DataTable rs = Db.Rs(strSql);

            Rpt.NoData(rpt, rs, "Jurnal untuk reservasi tersebut masih kosong.");

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

                TableRow  r = new TableRow();
                TableCell c;

                c      = new TableCell();
                c.Text = Cf.Day(rs.Rows[i]["Tgl"]);
                c.Wrap = false;
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = Cf.Time(rs.Rows[i]["Tgl"]);
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = rs.Rows[i]["UserID"].ToString();
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = rs.Rows[i]["Nama"].ToString();
                c.Wrap = false;
                r.Cells.Add(c);

                c      = new TableCell();
                c.Text = rs.Rows[i]["Ket"].ToString();
                r.Cells.Add(c);

                Rpt.Border(r);
                rpt.Rows.Add(r);
            }
        }
コード例 #26
0
        private void Fill()
        {
            nosklm.Enabled = false;
            string strSql = "SELECT " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK.*"
                            + "," + Mi.DbPrefix + "MARKETINGJUAL..MS_CUSTOMER.Nama AS Cs"
                            + "," + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT.Nama + ' ' + " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT.Principal AS Ag"
                            + " FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK INNER JOIN " + Mi.DbPrefix + "MARKETINGJUAL..MS_CUSTOMER ON " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK.NoCustomer = " + Mi.DbPrefix + "MARKETINGJUAL..MS_CUSTOMER.NoCustomer"
                            + " INNER JOIN " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT ON " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK.NoAgent = " + Mi.DbPrefix + "MARKETINGJUAL..MS_AGENT.NoAgent"
                            + " WHERE " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK.NoKontrak = '" + NoKontrak + "'";

            DataTable rs = Db.Rs(strSql);

            if (rs.Rows.Count == 0)
            {
                Response.Redirect("/CustomError/Deleted.html");
            }
            else
            {
                tgl.Text        = Cf.Day(DateTime.Today);
                nokontrakl.Text = "<a href=\"javascript:popEditKontrak('" + rs.Rows[0]["NoKontrak"] + "')\">"
                                  + rs.Rows[0]["NoKontrak"].ToString() + "</a>";
                unit.Text = "<a href=\"javascript:popUnit('" + rs.Rows[0]["NoStock"] + "')\">"
                            + rs.Rows[0]["NoUnit"].ToString() + "</a>";
                customer.Text = "<a href=\"javascript:popEditCustomer('" + rs.Rows[0]["NoCustomer"] + "')\">"
                                + rs.Rows[0]["Cs"].ToString() + "</a>";
                agent.Text       = rs.Rows[0]["Ag"].ToString();
                persenlunas.Text = Cf.Num(rs.Rows[0]["PersenLunas"]);
                if ((decimal)rs.Rows[0]["PersenLunas"] < 100)
                {
                    lunasinfo.Text = "PELUNASAN BELUM MENCAPAI 100%";
                    save.Enabled   = false;
                }
                decimal pernahskl = Db.SingleInteger("SELECT COUNT(NoSKL) FROM MS_SKL WHERE Ref='" + NoKontrak + "'");
                if (pernahskl > 0)
                {
                    lunasinfo.Text += "SUDAH PERNAH DIREGISTRASIKAN";
                    nod.Enabled     = false;
                    save.Enabled    = false;
                    nosklm.Enabled  = false;
                    DataTable rs3 = Db.Rs("SELECT * FROM MS_SKL WHERE Ref = '" + NoKontrak + "'");
                    nod.SelectedValue = Convert.ToString(rs3.Rows[0]["Used"]);
                    if (nod.SelectedValue == "1")
                    {
                        nosklm.Text = rs3.Rows[0]["NoSKLManual"].ToString();
                    }
                }
            }
        }
コード例 #27
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

            if (statusA.Checked)
            {
                Rpt.SubJudul(x, "Status : " + statusA.Text);
            }
            else if (statusB.Checked)
            {
                Rpt.SubJudul(x, "Status : " + statusB.Text);
            }
            else
            {
                Rpt.SubJudul(x, "Status : " + statusS.Text);
            }

            string tgl = "";

            if (tglkontrak.Checked)
            {
                tgl = tglkontrak.Text;
            }
            //if(tglbolehbayar.Checked) tgl = tglbolehbayar.Text;
            //if(tglbayar.Checked) tgl = tglbayar.Text;

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

            Rpt.SubJudul(x
                         , tgl + " : " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text)
                         );

            Rpt.SubJudul(x
                         , "Project : " + project.SelectedValue
                         );

            Rpt.SubJudul(x
                         , "Perusahaan : " + pers.SelectedItem.Text
                         );

            //Rpt.Header(rpt, x);
            string legend = "Status: A = Aktif / B = Batal. ";

            Rpt.HeaderReport(headReport, legend, x);
        }
コード例 #28
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            if (StatusA != "")
            {
                Rpt.SubJudul(x, "Status : " + StatusA);
            }
            else if (StatusB != "")
            {
                Rpt.SubJudul(x, "Status : " + StatusB);
            }
            else
            {
                Rpt.SubJudul(x, "Status : " + StatusS);
            }

            DateTime Dari   = Db.SingleTime("SELECT FilterDari FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");
            DateTime Sampai = Db.SingleTime("SELECT FilterSampai FROM LapPDF WHERE AttachmentID='" + AttachmentID + "'");

            Rpt.SubJudul(x
                         , "Tanggal Kontrak" + " : " + Cf.Day(Dari) + " s/d " + Cf.Day(Sampai)
                         );

            Rpt.SubJudul(x
                         , "Jenis : " + Tipe.Replace("-", ",").Replace("%", " ").TrimEnd(',')
                         );

            Rpt.SubJudul(x
                         , "Lokasi : " + nLokasi
                         );

            //Rpt.SubJudul(x
            //    , "Principal : " + nAgent
            //    );
            Rpt.SubJudul(x
                         , "Project : " + Project
                         );
            Rpt.SubJudul(x
                         , "Perusahaan : " + Perusahaan
                         );

            //Rpt.Header(rpt, x);
            string legend = "Status: A = Aktif / B = Batal." + "<br>"
                            + "Luas dalam meter persegi. Gross adalah harga sebelum diskon.";

            Rpt.HeaderReport(headReport, legend, x);
        }
コード例 #29
0
        private void Fill()
        {
            DataTable rs = Db.Rs(
                "SELECT * FROM MS_NUP WHERE NoNUP = '" + NoKontrak + "'");

            if (rs.Rows.Count == 0)
            {
                Response.Redirect("/CustomError/Deleted.html");
            }
            else
            {
                //Skema
                int refSkema = Db.SingleInteger("SELECT NomorSkema FROM MS_NUP_Priority WHERE NoNUP='" + NoKontrak + "' ");
                if (refSkema > 0)
                {
                    skema.SelectedValue = refSkema.ToString();
                }
                else
                {
                    skema.Items.Add(new ListItem(rs.Rows[0]["Skema"].ToString(), "0")); //cara bayar customize
                    skema.SelectedValue = refSkema.ToString();
                }

                string CaraBayar = Db.SingleString("SELECT Jenis FROM REF_SKEMA WHERE Nomor = " + skema.SelectedValue);
                carabayar2.SelectedValue = CaraBayar;

                decimal persenDP  = Db.SingleDecimal("SELECT ISNULL(SUM(CAST(ISNULL(NULLIF(NominalString, ''), 0) AS FLOAT)),0) FROM REF_SKEMA_DETAIL WHERE Nomor='" + refSkema + "' AND Tipe='DP'");
                decimal persenANG = Db.SingleDecimal("SELECT ISNULL(SUM(CAST(ISNULL(NULLIF(NominalString, ''), 0) AS FLOAT)),0) FROM REF_SKEMA_DETAIL WHERE Nomor='" + refSkema + "' AND Tipe='ANG'");

                int BF  = Db.SingleInteger("SELECT COUNT(*) FROM MS_NUP_TAGIHAN WHERE NoNUP='" + NoKontrak + "' AND Tipe='BF'");
                int DP  = Db.SingleInteger("SELECT COUNT(*) FROM MS_NUP_TAGIHAN WHERE NoNUP='" + NoKontrak + "' AND Tipe='DP'");
                int ANG = Db.SingleInteger("SELECT COUNT(*) FROM MS_NUP_TAGIHAN WHERE NoNUP='" + NoKontrak + "' AND Tipe='ANG'");
                dpjumlah.Text  = Cf.Num(persenDP);
                angjumlah.Text = Cf.Num(persenANG);
                bfkali.Text    = (BF).ToString();
                dpkali.Text    = (DP).ToString();
                angkali.Text   = (ANG).ToString();
                decimal NilaiKontrak = Db.SingleDecimal("SELECT Pricelist FROM MS_NUP_Priority WHERE NoNUP='" + NoKontrak + "' ");

                netto.Text = Cf.Num(NilaiKontrak);
                tgl.Text   = Cf.Day(DateTime.Today);

                nokontrak2.Text = NoKontrak;
                unit.Text       = Db.SingleString("SELECT NoUnit FROM MS_UNIT WHERE NoStock = '" + NoStock + "'");
                nama.Text       = Db.SingleString("SELECT Nama FROM MS_CUSTOMER WHERE NoCustomer = '" + rs.Rows[0]["NoCustomer"].ToString() + "'");
                agent.Text      = Db.SingleString("SELECT Nama FROM MS_AGENT WHERE NoAgent = '" + rs.Rows[0]["NoAgent"].ToString() + "'");
            }
        }
コード例 #30
0
        private void Header()
        {
            System.Text.StringBuilder x = new System.Text.StringBuilder();

            Rpt.Judul(x, comp, judul);

            if (statusA.Checked)
            {
                Rpt.SubJudul(x, "Status : " + statusA.Text);
            }
            else if (statusB.Checked)
            {
                Rpt.SubJudul(x, "Status : " + statusB.Text);
            }
            else
            {
                Rpt.SubJudul(x, "Status : " + statusS.Text);
            }

            string tgl = "";

            if (tglkontrak.Checked)
            {
                tgl = tglkontrak.Text;
            }
            //if(tglbolehbayar.Checked) tgl = tglbolehbayar.Text;
            //if(tglbayar.Checked) tgl = tglbayar.Text;

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

            Rpt.SubJudul(x
                         , tgl + " : " + Cf.Day(dari.Text) + " s/d " + Cf.Day(sampai.Text)
                         );

            Rpt.SubJudul(x
                         , "Sales : " + agent.SelectedItem.Text
                         );

            //Rpt.SubJudul(x
            //    , "Tipe : " + Rpt.inSql(tipe).Replace("'","")
            //    );

            //Rpt.Header(rpt, x);
            string legend = "Status: A = Aktif / B = Batal.< br /> ";

            Rpt.HeaderReport(headReport, legend, x);
        }