private void UpdateSkema() { string Nama = Cf.Str(nama.Text); string Diskon = Cf.Str(diskon.Text); string DiskonKet = Cf.Str(diskonket.Text); string Bunga = Cf.Str(bunga2.Text); string BungaKet = Cf.Str(bungaket.Text); string Project = Cf.Pk(project.SelectedValue); string Status = ""; if (aktif.Checked) { Status = "A"; } else if (inaktif.Checked) { Status = "I"; } Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaEdit" + " " + Nomor + ",'" + Nama + "'" + ",'" + Diskon + "'" + ",'" + DiskonKet + "'" + ",'" + Bunga + "'" + ",'" + BungaKet + "'" + ", " + Cf.BoolToSql(round.Checked) + ",'" + Status + "'" + ",'" + Project + "'" ); }
protected void ok_Click(object sender, EventArgs e) { string Project = project.SelectedValue; int Cek = Db.SingleInteger("SELECT COUNT(*) FROM REF_MANDATORY Where Halaman= 'Customer' AND Project='" + Project + "'"); if (Cek > 0) { int i = 0; foreach (var r in list.Controls) { CheckBox cb = (CheckBox)list.FindControl("cb_" + i); string NamaKolom = cb.Attributes["data-id"]; Db.Execute("UPDATE REF_MANDATORY SET HarusIsi = " + Cf.BoolToSql(cb.Checked) + " WHERE Halaman= 'Customer' AND NamaKolom = '" + NamaKolom + "' AND Project='" + Project + "'"); i++; } } else { int i = 1; foreach (var r in list.Controls) { CheckBox cb = (CheckBox)list.FindControl("cb_" + i); string NamaKolom = cb.Attributes["data-id"]; Db.Execute("INSERT INTO REF_MANDATORY (Halaman, NamaKolom, Keterangan, HarusIsi, TipeData, Project) VALUES('Customer','" + LibControls.Bind.KolomCustomer(Convert.ToByte(i)) + "','" + LibControls.Bind.KetCustomer(Convert.ToByte(i)) + "'," + Cf.BoolToSql(cb.Checked) + "," + LibControls.Bind.TipeDataCustomer(Convert.ToByte(i)) + ",'" + Project + "')"); i++; } } Response.Redirect("MandatoryCustomer.aspx?d=1&project=" + Project); }
protected void save_Click(object sender, System.EventArgs e) { if (passvalid()) { Db.Execute("EXEC spGantiPass " + " '" + UserID + "'" + ",'" + passMD5.Text + "'" + ", " + Cf.BoolToSql(gantipass.Checked) ); DataTable rs = Db.Rs("SELECT " + " UserID AS [Kode / Username]" + ",Nama AS [Nama Lengkap]" + ",SecLevel AS [Security Level]" + ",GantiPass AS [Rubah Password di Login Berikutnya]" + " FROM USERNAME WHERE UserID = '" + UserID + "'"); Db.Execute("EXEC spLogUsername " + " 'SPB'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Cf.LogCapture(rs) + "'" + ",'" + UserID + "'" ); Response.Redirect("SetPass.aspx?done=" + UserID); } }
private bool Save() { if (valid()) { string Nama = Cf.Str(nama.Text); int RotasiPass = Convert.ToInt32(rotasipass.Text); string Email = Cf.Str(email.Text); string SecLevel = seclevel.SelectedValue; int NoAgent = Convert.ToInt32(agent.SelectedValue); DataTable rsBef = Db.Rs("SELECT " + " Nama AS [Nama Lengkap]" + ",Email" + ",SecLevel AS [Security Level]" + ",GantiPass AS [Rubah Password di Login Pertama]" + ",RotasiPass AS [Frekuensi Rotasi Password (Bulanan)]" + ",NoAgent AS [Kode Sales]" + " FROM USERNAME WHERE UserID = '" + UserID + "'"); Db.Execute("EXEC spUserEdit " + " '" + UserID + "'" + ",'" + Nama + "'" + ",'" + SecLevel + "'" + ", " + Cf.BoolToSql(gantipass.Checked) + ", " + RotasiPass ); //Db.Execute("UPDATE USERNAME SET NoAgent = " + NoAgent + " WHERE UserID = '" + UserID + "'"); Db.Execute("UPDATE USERNAME SET Email = '" + Email + "' WHERE UserID = '" + UserID + "'"); DataTable rsAft = Db.Rs("SELECT " + " Nama AS [Nama Lengkap]" + ",Email" + ",SecLevel AS [Security Level]" + ",GantiPass AS [Rubah Password di Login Pertama]" + ",RotasiPass AS [Frekuensi Rotasi Password (Bulanan)]" + ",NoAgent AS [Kode Sales]" + " FROM USERNAME WHERE UserID = '" + UserID + "'"); //Logfile string Ket = Cf.LogCompare(rsBef, rsAft); Db.Execute("EXEC spLogUsername " + " 'EDU'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Ket + "'" + ",'" + UserID + "'" ); return(true); } else { return(false); } }
protected void ok_Click(object sender, System.EventArgs e) { if (valid()) { string Nama = Cf.Str(nama.Text); string Diskon = Cf.Str(diskon.Text); string DiskonKet = Cf.Str(diskonket.Text); string[] Bunga = bunga2.Text.Split('+');; string bunga1 = ""; for (int i = 0; i <= Bunga.GetUpperBound(0); i++) { if (i != Bunga.GetUpperBound(0)) { bunga1 += (Convert.ToDecimal(Bunga[i].ToString()) * (decimal)1) + "+"; } else { bunga1 += (Convert.ToDecimal(Bunga[i].ToString()) * (decimal)1); } } string BungaKet = Cf.Str(bungaket.Text); bool RThousand = round.Checked; string Project = project.SelectedValue; string TipeUnit = tipeUnitList.SelectedValue; Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaBaru" + " '" + Nama + "'" + ",'" + Diskon + "'" + ",'" + DiskonKet + "'" + ", " + Cf.BoolToSql(RThousand) + ",'" + bunga1 + "'" + ",'" + BungaKet + "'" + ",'" + Project + "'" + ",'" + TipeUnit + "'" ); //nomor skema terbaru int Nomor = Db.SingleInteger("SELECT TOP 1 Nomor FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA" + " ORDER BY Nomor DESC" ); Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA SET Jenis = '" + jenis.SelectedValue + "' WHERE Nomor = '" + Nomor + "' "); SaveBaris(Nomor, "BF", "UANG TANDA JADI", bfkali, bfrupiah, bfjumlah, bfbln1, bfbln2, bflama1, bflama2); SaveBaris(Nomor, "DP", "PEMBAYARAN", dpkali, dprupiah, dpjumlah, dpbln1, dpbln2, dplama1, dplama2); SaveBaris(Nomor, "ANG", "PEMBAYARAN", angkali, angrupiah, angjumlah, angbln1, angbln2, anglama1, anglama2); SaveLog(Nomor); Response.Redirect("Skema.aspx?done=" + Nomor + "&project=" + project.SelectedValue); } }
private void Tambah() { if (barunama.Text != "" || barunilai.Text != "" || barutgl.Text != "") { string Tipe = ""; if (barubf.Checked) { Tipe = "BF"; } else if (barudp.Checked) { Tipe = "DP"; } else if (baruang.Checked) { Tipe = "ANG"; } else { Tipe = "ADM"; } string Nama = Cf.Str(barunama.Text); DateTime TglJT = Convert.ToDateTime(barutgl.Text); decimal Nilai = Convert.ToDecimal(barunilai.Text); string Jenis = jenis2.SelectedValue; Db.Execute("EXEC spTagihanDaftar " + " '" + NoKontrak + "'" + ",'" + Nama + "'" + ",'" + TglJT + "'" + ", " + Nilai + ",'" + Tipe + "'" ); //Update manual int NoUrut = Db.SingleInteger("SELECT ISNULL(MAX(NoUrut), 0) FROM MS_TAGIHAN WHERE NoKontrak = '" + NoKontrak + "'"); Db.Execute("UPDATE MS_TAGIHAN" + " SET " + "KPR = " + Cf.BoolToSql(barukpr.Checked) + ", Jenis = '" + Jenis + "'" + " WHERE NoKontrak = '" + NoKontrak + "'" + " AND NoUrut = " + NoUrut ); } }
protected void ok_Click(object sender, System.EventArgs e) { if (valid()) { string Nama = Cf.Str(nama.Text); string Diskon = Cf.Str(diskon.Text); string DiskonKet = Cf.Str(diskonket.Text); string Bunga = Cf.Str(bunga2.Text); string BungaKet = Cf.Str(bungaket.Text); bool RThousand = round.Checked; string Project = project.SelectedValue; Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaBaru" + " '" + Nama + "'" + ",'" + Diskon + "'" + ",'" + DiskonKet + "'" + ", " + Cf.BoolToSql(RThousand) + ",'" + Bunga + "'" + ",'" + BungaKet + "'" + ",'" + Project + "'" ); //nomor skema terbaru int Nomor = Db.SingleInteger("SELECT TOP 1 Nomor FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA" + " ORDER BY Nomor DESC" ); Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA SET Jenis = '" + jenis.SelectedValue + "' WHERE Nomor = '" + Nomor + "' "); SaveBaris(Nomor, "BF", "BOOKING FEE", bfkali, bfrupiah, bfjumlah, bfbln1, bfbln2, bflama1, bflama2); SaveBaris(Nomor, "DP", "DP", dpkali, dprupiah, dpjumlah, dpbln1, dpbln2, dplama1, dplama2); SaveBaris(Nomor, "ANG", "ANGSURAN", angkali, angrupiah, angjumlah, angbln1, angbln2, anglama1, anglama2); SaveLog(Nomor); Response.Redirect("Skema.aspx?done=" + Nomor); } }
private void UpdateSkemaDetail() { for (int i = 0; i < rs.Rows.Count; i++) { if (!Response.IsClientConnected) { break; } RadioButton bf = (RadioButton)list.FindControl("bf_" + i); RadioButton dp = (RadioButton)list.FindControl("dp_" + i); RadioButton ang = (RadioButton)list.FindControl("ang_" + i); TextBox nama = (TextBox)list.FindControl("nama_" + i); RadioButton persen = (RadioButton)list.FindControl("persen_" + i); RadioButton rupiah = (RadioButton)list.FindControl("rupiah_" + i); TextBox nominal = (TextBox)list.FindControl("nominal_" + i); RadioButton bln = (RadioButton)list.FindControl("bln_" + i); RadioButton hr = (RadioButton)list.FindControl("hr_" + i); RadioButton fix = (RadioButton)list.FindControl("fix_" + i); TextBox lama = (TextBox)list.FindControl("lama_" + i); TextBox referensi = (TextBox)list.FindControl("ref_" + i); CheckBox potong = (CheckBox)list.FindControl("potong_" + i); CheckBox kpr = (CheckBox)list.FindControl("kpr_" + i); string Nama = Cf.Str(nama.Text); string Tipe = ""; if (bf.Checked) { Tipe = "BF"; } else if (dp.Checked) { Tipe = "DP"; } else if (ang.Checked) { Tipe = "ANG"; } decimal Nominal = Convert.ToDecimal(nominal.Text); string TipeNominal = ""; if (persen.Checked) { TipeNominal = "%"; } else { TipeNominal = "F"; } string TipeJadwal = ""; if (bln.Checked) { TipeJadwal = "M"; } else if (hr.Checked) { TipeJadwal = "D"; } else { TipeJadwal = "F"; } string TglFix = "NULL"; int IntJadwal = 0; if (TipeJadwal == "F") { TglFix = "'" + Cf.Str(Convert.ToDateTime(lama.Text)) + "'"; } else { IntJadwal = Convert.ToInt32(lama.Text); } int RefJadwal = Convert.ToInt32(referensi.Text); Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaEditBaris" + " " + Nomor + ", " + rs.Rows[i]["Baris"].ToString() + ",'" + Tipe + "'" + ",'" + Nama + "'" + ", " + Nominal + ",'" + TipeNominal + "'" + ", " + TglFix + ",'" + TipeJadwal + "'" + ", " + IntJadwal + ", " + RefJadwal + ", " + Cf.BoolToSql(potong.Checked) // + ", '" + Nominal + "'" ); Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA_DETAIL" + " SET KPR = " + Cf.BoolToSql(kpr.Checked) + " WHERE Nomor = " + Nomor + " AND Baris = " + rs.Rows[i]["Baris"] ); } }
private void SaveBaris(int Nomor, string Tipe, string Nama, TextBox kali, CheckBox rp, TextBox nom, CheckBox bln1, CheckBox bln2, TextBox interval1, TextBox interval2) { int count = Convert.ToInt32(kali.Text); int index = Db.SingleInteger("SELECT ISNULL(MAX(Baris),0) FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA_DETAIL" + " WHERE Nomor = " + Nomor); int topref = index; for (int i = 0; i < count; i++) { if (!Response.IsClientConnected) { break; } index++; decimal Nominal = Convert.ToDecimal(nom.Text) / count; string TipeNominal = "%"; if (rp.Checked) { TipeNominal = "F"; } string TipeJadwal = ""; int IntJadwal = 0; int RefJadwal = 0; if (i != 0) { //interval if (bln1.Checked) { TipeJadwal = "M"; } else { TipeJadwal = "D"; } IntJadwal = Convert.ToInt32(interval1.Text) * i; RefJadwal = topref + 1; } else { //pertama if (bln2.Checked) { TipeJadwal = "M"; } else { TipeJadwal = "D"; } IntJadwal = Convert.ToInt32(interval2.Text); RefJadwal = topref; } bool BF = false; if (Tipe == "DP") { if (dp1potong.Checked && i == 0) { BF = true; } if (dpspotong.Checked) { BF = true; } } if (Tipe == "ANG") { if (ang1potong.Checked && i == 0) { BF = true; } if (angspotong.Checked) { BF = true; } } if ((Tipe == "ANG") && (i == count - 1)) { Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaTambah " + Nomor + ",'" + Tipe + "'" + ",'PELUNASAN'" + ", " + Nominal + ",'" + TipeNominal + "'" + ",NULL" + ",'" + TipeJadwal + "'" + ", " + IntJadwal + ", " + RefJadwal + ", " + Cf.BoolToSql(BF) ); string jenis = Db.SingleString("SELECT JENIS FROM " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA WHERE NOMOR=" + Nomor); if (jenis == "KPR") { Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..REF_SKEMA_DETAIL SET KPR = 1 WHERE NOMOR=" + Nomor + " AND NAMA='PELUNASAN'"); } } else { Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaTambah " + Nomor + ",'" + Tipe + "'" + ",'" + Nama + " " + (i + 1) + "'" + ", " + Nominal + ",'" + TipeNominal + "'" + ",NULL" + ",'" + TipeJadwal + "'" + ", " + IntJadwal + ", " + RefJadwal + ", " + Cf.BoolToSql(BF) ); } } }
protected void ok_Click(object sender, System.EventArgs e) { if (Valid()) { bool StatusBerkas = false; if (status.SelectedValue == "1") { StatusBerkas = true; } string CheckListDokumen = ""; System.Text.StringBuilder x = new System.Text.StringBuilder(); for (int i = 0; i < umum.Items.Count; i++) { if (umum.Items[i].Selected) { x.Append(umum.Items[i].Text + ";"); } } for (int i = 0; i < pn.Items.Count; i++) { if (pn.Items[i].Selected) { x.Append(pn.Items[i].Text + ";"); } } for (int i = 0; i < swasta.Items.Count; i++) { if (swasta.Items[i].Selected) { x.Append(swasta.Items[i].Text + ";"); } } for (int i = 0; i < wira.Items.Count; i++) { if (wira.Items[i].Selected) { x.Append(wira.Items[i].Text + ";"); } } for (int i = 0; i < lain.Items.Count; i++) { if (lain.Items[i].Selected) { x.Append(lain.Items[i].Text + ";"); } } CheckListDokumen = x.ToString(); DataTable rsBef = Db.Rs("SELECT " + "CheckListDokumen AS [Check List Dokumen]" + ", StatusBerkas AS [StatusBerkas]" //+ ", ISNULL(TglSelesaiBerkas,0) AS [Tgl. Selesai Berkas]" + " FROM MS_KONTRAK" + " WHERE NoKontrak = '" + NoKontrak + "'" ); if (tgl.Text != "") { DateTime Tgl = Convert.ToDateTime(tgl.Text); Db.Execute("UPDATE MS_KONTRAK" + " SET CheckListDokumen = '" + CheckListDokumen + "'" + ", StatusBerkas = " + Cf.BoolToSql(StatusBerkas) + ", TglSelesaiBerkas = '" + Tgl + "'" + " WHERE NoKontrak = '" + NoKontrak + "'" ); } else { Db.Execute("UPDATE MS_KONTRAK" + " SET CheckListDokumen = '" + CheckListDokumen + "'" + ", StatusBerkas = " + Cf.BoolToSql(StatusBerkas) //+ ", TglSelesaiBerkas = '" + null + "'" + " WHERE NoKontrak = '" + NoKontrak + "'" ); } DataTable rsAft = Db.Rs("SELECT " + "CheckListDokumen AS [Check List Dokumen]" + ", StatusBerkas AS [StatusBerkas]" //+ ", TglSelesaiBerkas AS [Tgl. Selesai Berkas]" + " FROM MS_KONTRAK" + " WHERE NoKontrak = '" + NoKontrak + "'" ); string Ket = Cf.LogCompare(rsBef, rsAft); Db.Execute("EXEC spLogKontrak" + " 'EDIT'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Ket + "'" + ",'" + NoKontrak + "'" ); decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KONTRAK_LOG ORDER BY LogID DESC"); string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); Db.Execute("UPDATE MS_KONTRAK_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID); Js.Close(this); } }
private void GenerateAcc() { if (penjualan.SelectedIndex == 0) { xls = "MappingCOA1.xls"; JenisPenjualan = " AND a.JenisPenjualan = 0"; } else if (penjualan.SelectedIndex == 1) { xls = "MappingCOA2.xls"; JenisPenjualan = " AND a.JenisPenjualan = 1"; } string strSql = "SELECT *" + " FROM MS_TTS INNER JOIN " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK a" + " ON a.NoKontrak = MS_TTS.Ref" + " WHERE MS_TTS.Status = 'POST' AND MS_TTS.Akunting = 0" + JenisPenjualan ; DataTable rs = Db.Rs(strSql); System.Text.StringBuilder x = new System.Text.StringBuilder(); for (int i = 0; i < rs.Rows.Count; i++) { if (!Response.IsClientConnected) { break; } string CBID = Akun.NewCBID(rs.Rows[i]["Acc"].ToString(), 1); string JournalMemo = rs.Rows[i]["Unit"].ToString() + " " + rs.Rows[i]["Ref"].ToString(); string OtherParty = rs.Rows[i]["Customer"].ToString(); string AccountID = rs.Rows[i]["Acc"].ToString(); decimal Deposit = Convert.ToDecimal(rs.Rows[i]["Total"]); decimal ForexDeposit = Deposit; DateTime TglBKM = Convert.ToDateTime(rs.Rows[i]["TglBKM"]); string Source = rs.Rows[i]["Tipe"].ToString(); int TipePosting = Convert.ToInt32(rs.Rows[i]["TipePosting"]); int AccCount = Akun.SingleInteger("SELECT COUNT(AccountID) FROM Account WHERE AccountID = '" + rs.Rows[i]["Acc"].ToString() + "' AND Postable = 1"); if (AccCount == 0) { x.Append("No. TTS: " + rs.Rows[i]["NoTTS"].ToString().PadLeft(7, '0') + ", REKENING tidak terdaftar.<br />"); } else { //Insert CB /*Akun.CB( * CBID * , "IDR" * , 1 * , TglBKM * , JournalMemo * , OtherParty * , AccountID * , Deposit * , 0 * , ForexDeposit * , 0 * , true * , Cf.Pk(rs.Rows[i]["NoTTS"]) * , "" * , "" * , false * , "TTS" * );*/ // modify by viana 171208 TTS -> BKM Akun.CB( CBID , "IDR" , 1 , TglBKM , JournalMemo , OtherParty , AccountID , Deposit , 0 , ForexDeposit , 0 , true , Cf.Pk(rs.Rows[i]["NoBKM"]) , "" , "" , false , "BKM" ); //Insert CB Detail (Debit) decimal Debit = Convert.ToDecimal(rs.Rows[i]["Total"]); decimal ForexDebit = Debit; string Notes = "TOTAL" + " " + rs.Rows[i]["Ket"].ToString() ; if (Notes.Length > 255) { Notes = Notes.Substring(0, 254); } Akun.CBDetail( CBID , 1 , AccountID , Debit , 0 , ForexDebit , 0 , Notes ); //Insert CB Detail (Kredit) strSql = "SELECT *" + " FROM " + Mi.DbPrefix + "MARKETING" + Source + "..MS_PELUNASAN a" + " INNER JOIN " + Mi.DbPrefix + "MARKETING" + Source + "..MS_TAGIHAN b ON a.NoTagihan = b.NoUrut AND a.NoKontrak = b.NoKontrak" + " WHERE a.NoKontrak = '" + Cf.Pk(rs.Rows[i]["Ref"]) + "'" + " AND a.NoTTS = " + Cf.Pk(rs.Rows[i]["NoTTS"]) ; DataTable rsTagihan = Db.Rs(strSql); DataTable rsCOA; bool isValid = true; int SN = 1; bool AccDP = false; for (int j = 0; j < rsTagihan.Rows.Count; j++) { if (!Response.IsClientConnected) { break; } SN++; string COA = "", col = "", add = ""; string Tipe = rsTagihan.Rows[j]["Tipe"].ToString(); decimal Kredit = Convert.ToDecimal(rsTagihan.Rows[j]["NilaiPelunasan"]); decimal ForexKredit = Kredit; Notes = rsTagihan.Rows[j]["NamaTagihan"].ToString() + " " + rsTagihan.Rows[j]["Ket"].ToString() ; if (Notes.Length > 255) { Notes = Notes.Substring(0, 254); } decimal PersenLunas = Db.SingleDecimal("SELECT PersenLunas FROM " + Mi.DbPrefix + "MARKETING" + Source + "..MS_KONTRAK WHERE NoKontrak = '" + Cf.Pk(rs.Rows[i]["Ref"]) + "'"); bool StatusAkunting2 = Db.SingleBool("SELECT Akunting2 FROM " + Mi.DbPrefix + "MARKETING" + Source + "..MS_KONTRAK WHERE NoKontrak = '" + Cf.Pk(rs.Rows[i]["Ref"]) + "'"); if (StatusAkunting2 == true) { TipePosting = 1; } else { TipePosting = 0; } if (TipePosting == 1) { col = "[Amortisasi1]"; } else { AccDP = true; } col = "[Jual Belum Diakui]"; if (Tipe == "ADM") { if (rsTagihan.Rows[j]["NamaTagihan"].ToString() == "BIAYA ADM. PPJB") { add = " AND [Tipe Mapping] = 'ADM PPJB'"; } if (rsTagihan.Rows[j]["NamaTagihan"].ToString() == "BIAYA ADM. AJB") { add = " AND [Tipe Mapping] = 'ADM AJB'"; } if (rsTagihan.Rows[j]["NamaTagihan"].ToString() == "BIAYA ADM. PEMBATALAN") { add = " AND [Tipe Mapping] = 'ADM BATAL'"; } if (rsTagihan.Rows[j]["NamaTagihan"].ToString() == "BIAYA ADM. SERAH TERIMA") { add = " AND [Tipe Mapping] = 'ADM ST'"; } if (rsTagihan.Rows[j]["NamaTagihan"].ToString() == "BIAYA ADM. Pengalihan Hak") { add = " AND [Tipe Mapping] = 'ADM GN'"; } if (rsTagihan.Rows[j]["NamaTagihan"].ToString() == "BIAYA ADM. Pindah Unit") { add = " AND [Tipe Mapping] = 'ADM GU'"; } col = "[Normal]"; } else { if (Source == "JUAL") { add = " AND [Tipe Mapping] = '" + Tipe + "'"; } else if (Source == "SEWA") { add = " AND [Tipe Mapping] = '" + Tipe + "2'"; } else if (Source == "SB") { add = " AND [Tipe Mapping] = '" + Tipe + "3'"; } } rsCOA = Db.xls("SELECT " + col + " FROM [MappingCOA$] WHERE 1 = 1" + add, Request.PhysicalApplicationPath.Replace("\\financear\\", "\\root\\") + xls); COA = rsCOA.Rows[0][0].ToString(); if (Akun.SingleInteger("SELECT COUNT(AccountID) FROM Account WHERE AccountID = '" + COA + "' AND Postable = 1") == 0) { isValid = false; x.Append("No. TTS: " + rs.Rows[i]["NoTTS"].ToString().PadLeft(7, '0') + ", MAPPING COA TAGIHAN tidak terdaftar.<br />"); break; } Akun.CBDetail( CBID , SN , COA , 0 , Kredit , 0 , ForexKredit , Notes ); } if (!isValid) { Akun.Execute("DELETE FROM CB WHERE CBID = '" + CBID + "'"); } else { //Update Status Akunting + NoVoucher TTS Db.Execute("UPDATE MS_TTS SET Akunting = 1, TipePosting = " + TipePosting + ",AccDP = " + Cf.BoolToSql(AccDP) + ", NoVoucher = '" + CBID + "' WHERE NoTTS = " + Cf.Pk(rs.Rows[i]["NoTTS"])); //Logfile DataTable rsDetail = Db.Rs("SELECT * FROM MS_TTS WHERE NoTTS = " + Cf.Pk(rs.Rows[i]["NoTTS"])); string KetLog = Cf.LogCapture(rsDetail); Db.Execute("EXEC spLogTTS" + " 'ACC'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + KetLog + "'" + ",'" + Cf.Pk(rs.Rows[i]["NoTTS"]).PadLeft(7, '0') + "'" ); } } } if (x.ToString() != "") { err.Text = "<h2 style='border-top:1px dashed gray; padding-top:10'>Gagal posting:</h2>" + "<div style='margin-left: 40px; padding-top: 10px;'>" + x.ToString() + "</div>" ; } else { Response.Redirect("Accounting.aspx?done=1"); } }
private bool Save() { if (valid()) { DateTime TglTTS = Convert.ToDateTime(tgltts.Text); string Ket = Cf.Str(ket.Text); string Unit = Cf.Str(unit.Text); string Customer = Cf.Str(customer.Text); decimal admbank = Convert.ToDecimal(admBank.Text); decimal lebihbayar = Convert.ToDecimal(lebihBayar.Text); //kurang bayar decimal lbayar = Convert.ToDecimal(lb.Text); //lebih bayar string ManualTTS = manualtts.Text; string ManualBKM = manualbkm.Text != "" ? Cf.Str(manualbkm.Text).PadLeft(6, '0') : ""; string NoBG = ""; DateTime TglBG = DateTime.Today; string Titip = ""; if (carabayar.Text == "CEK GIRO") { NoBG = Cf.Pk(nobg.Text); TglBG = Convert.ToDateTime(tglbg.Text); Titip = Cf.Str(titip.Text); } //khusus kartu kredit string NoKK = "", BankKK = ""; if (carabayar.Text == "KARTU KREDIT") { NoKK = Cf.Pk(nokk.Text); BankKK = Cf.Pk(bankkk.Text); } DataTable rs = Db.Rs("SELECT " + " NoTTS AS [No. TTS]" + ",Tipe" + ",Ref AS [Ref.]" + ",CaraBayar AS [Cara Bayar]" + ",Total AS [Nilai TTS]" + " FROM ISC064_FINANCEAR..MS_TTS" + " WHERE NoTTS = " + NoTTS ); DataTable rsBef = Db.Rs("SELECT " + " CONVERT(varchar, TglTTS, 106) AS [Tanggal TTS]" + ",CONVERT(varchar, TglBKM, 106) AS [Tanggal BKM]" + ",Ket AS [Keterangan]" + ",NoBG AS [No. BG]" + ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]" + ",Titip AS [Pengelola BG]" + ",Unit" + ",Customer" + ",Pph AS [PPH]" + ",ManualTTS AS [Manual TTS]" + ",ManualBKM AS [Manual BKM]" + ", Acc AS [Rekening Bank]" + ", NoFPS AS [No. Faktur Pajak]" + " FROM ISC064_FINANCEAR..MS_TTS" + " WHERE NoTTS = " + NoTTS ); Db.Execute("EXEC spTTSEdit" + " '" + NoTTS + "'" + ",'" + TglTTS + "'" + ",'" + Unit + "'" + ",'" + Customer + "'" + ",'" + Ket + "'" + ",'" + NoBG + "'" + ",'" + TglBG + "'" + ",'" + Titip + "'" ); //manual update Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET " + " Pph = " + Cf.BoolToSql(pph.Checked) + ",ManualTTS = '" + ManualTTS + "'" + ",ManualBKM = '" + ManualBKM + "'" + ", NoFPS = '" + Cf.Str(tbNoFaktur.Text) + "'" + ",NoKK = '" + NoKK + "'" + ",BankKK = '" + BankKK + "'" + " WHERE NoTTS = " + NoTTS); if (delfp.Checked) { Db.Execute("UPDATE ISC064_FINANCEAR..REF_FP SET Status = 0 WHERE NoFPS = '" + tbNoFaktur.Text + "'"); Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET NoFPS = '' WHERE NoTTS = " + NoTTS); } bool FOBO = Db.SingleBool("SELECT FOBO FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS='" + NoTTS + "'"); if (FOBO != true) { decimal Total = Db.SingleDecimal("SELECT Total FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS='" + NoTTS + "'"); decimal total2 = Total + lebihbayar + lbayar - admbank; Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET " + " AdminBank = '" + admbank + "'" + " , Total2 ='" + total2 + "'" + " , LebihBayar ='" + lebihbayar + "'" + " , LB ='" + lbayar + "'" + " WHERE NoTTS = " + NoTTS); } //if (manualbkm.Text != "") //{ // Db.Execute("UPDATE MS_TTS SET " // + " NoBKM = " + manualbkm.Text // + " WHERE NoTTS = " + NoTTS); //} //if(bkmtr.Visible) //{ Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET " + " TglBKM = '" + Convert.ToDateTime(tglbkm.Text) + "'" + " WHERE NoTTS = " + NoTTS); //} Db.Execute("EXEC spSinkronisasi " + NoTTS); Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET Acc = '" + ddlAcc.SelectedValue + "' WHERE NoTTS = " + NoTTS); DataTable rsAft = Db.Rs("SELECT " + " CONVERT(varchar, TglTTS, 106) AS [Tanggal TTS]" + ",CONVERT(varchar, TglBKM, 106) AS [Tanggal BKM]" + ",Ket AS [Keterangan]" + ",NoBG AS [No. BG]" + ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]" + ",Titip AS [Pengelola BG]" + ",Unit" + ",Customer" + ",Pph AS [PPH]" + ",ManualTTS AS [Manual TTS]" + ",ManualBKM AS [Manual BKM]" + ", Acc AS [Rekening Bank]" + ", NoFPS AS [No. Faktur Pajak]" + " FROM ISC064_FINANCEAR..MS_TTS" + " WHERE NoTTS = " + NoTTS ); /*Update status Akunting*/ int Akunting = Db.SingleInteger("SELECT Akunting FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS); if (Akunting == 1) { string NoVoucher = Db.SingleString("SELECT NoVoucher FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS); Akun.InsertAnomali("TTS", NoTTS, Cf.LogCapture(rsBef), Cf.LogCapture(rsAft), "EDIT TTS", "", NoVoucher); } /************************/ //Logfile string ketlog = Cf.LogCapture(rs) + Cf.LogCompare(rsBef, rsAft); Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spLogTTS" + " 'EDIT'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + ketlog + "'" + ",'" + NoTTS.ToString().PadLeft(7, '0') + "'" ); decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS_LOG ORDER BY LogID DESC"); string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE NoTTS = '" + NoTTS + "')"); Db.Execute("UPDATE " + Mi.DbPrefix + "FINANCEAR..MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID); return(true); } else { return(false); } }
private void UpdateSkemaBaru() { if (barunama.Text != "") { string Nama = Cf.Str(barunama.Text); string Tipe = ""; if (barubf.Checked) { Tipe = "BF"; } else if (barudp.Checked) { Tipe = "DP"; } else if (baruang.Checked) { Tipe = "ANG"; } decimal Nominal = Convert.ToDecimal(barunominal.Text); string TipeNominal = ""; if (barupersen.Checked) { TipeNominal = "%"; } else { TipeNominal = "F"; } string TipeJadwal = ""; if (barubln.Checked) { TipeJadwal = "M"; } else if (baruhr.Checked) { TipeJadwal = "D"; } else { TipeJadwal = "F"; } string TglFix = "NULL"; int IntJadwal = 0; if (TipeJadwal == "F") { TglFix = "'" + Cf.Str(Convert.ToDateTime(barulama.Text)) + "'"; } else { IntJadwal = Convert.ToInt32(barulama.Text); } int RefJadwal = Convert.ToInt32(barureferensi.Text); Db.Execute("EXEC " + Mi.DbPrefix + "MARKETINGJUAL..spSkemaTambah" + " " + Nomor + ",'" + Tipe + "'" + ",'" + Nama + "'" + ", " + Nominal + ",'" + TipeNominal + "'" + ", " + TglFix + ",'" + TipeJadwal + "'" + ", " + IntJadwal + ", " + RefJadwal + ", " + Cf.BoolToSql(barupotong.Checked) + ", '" + Nominal + "'" //+ ", " + Cf.BoolToSql(kpr.Checked) ); } }
private bool Save() { if (valid()) { DataTable rsBef = Db.Rs("SELECT " + "CONVERT(VARCHAR,NoUrut) + '. ' + NamaTagihan + ' ('+Tipe+') ' + CONVERT(VARCHAR,TglJT,106) + ' ' + CONVERT(VARCHAR,NilaiTagihan,1) " + "FROM MS_TAGIHAN WHERE NoKontrak = '" + NoKontrak + "' ORDER BY NoUrut"); for (int i = 0; i < rs.Rows.Count; i++) { if (!Response.IsClientConnected) { break; } RadioButton bf = (RadioButton)list.FindControl("bf_" + i); RadioButton dp = (RadioButton)list.FindControl("dp_" + i); RadioButton ang = (RadioButton)list.FindControl("ang_" + i); RadioButton adm = (RadioButton)list.FindControl("adm_" + i); RadioButton dll = (RadioButton)list.FindControl("dll_" + i); TextBox namatagihan = (TextBox)list.FindControl("nama_" + i); TextBox tgljt = (TextBox)list.FindControl("tgl_" + i); TextBox nilaitagihan = (TextBox)list.FindControl("nilai_" + i); CheckBox kpr = (CheckBox)list.FindControl("kpr_" + i); DropDownList jenis = (DropDownList)list.FindControl("jenis_" + i); int NoUrut = Convert.ToInt32(rs.Rows[i]["NoUrut"]); string Tipe = ""; if (bf.Checked) { Tipe = "BF"; } else if (dp.Checked) { Tipe = "DP"; } else if (ang.Checked) { Tipe = "ANG"; } else { Tipe = "ADM"; } string Jenis = ""; if (jenis.SelectedIndex == 0) { Jenis = rs.Rows[i]["Jenis"].ToString(); } else { Jenis = jenis.SelectedItem.ToString(); } string Nama = Cf.Str(namatagihan.Text); DateTime TglJT = Convert.ToDateTime(tgljt.Text); decimal Nilai = Convert.ToDecimal(nilaitagihan.Text); bool KPR = kpr.Checked; string strSqlAnomali = "SELECT" + " NamaTagihan AS [Nama Tagihan]" + ", TglJT AS [Tgl. Jatuh Tempo]" + ", NilaiTagihan AS [Nilai]" + ", Tipe AS [Tipe]" + " FROM MS_TAGIHAN" + " WHERE NoKontrak = '" + NoKontrak + "'" + " AND NoUrut = " + NoUrut ; DataTable AnomaliBef = Db.Rs(strSqlAnomali); Db.Execute("EXEC spTagihanEdit " + " '" + NoKontrak + "'" + ", " + NoUrut + ",'" + Nama + "'" + ",'" + TglJT + "'" + ", " + Nilai + ",'" + Tipe + "'" ); //Response.Write(NoKontrak + " " + TglJT + " " + Nilai + "<br/>"); //Update manual Db.Execute("UPDATE MS_TAGIHAN SET KPR = " + Cf.BoolToSql(KPR) + ", Jenis = '" + Jenis + "' WHERE NoKontrak = '" + NoKontrak + "' AND NoUrut = " + NoUrut); /*Akunting*/ // if(Tipe != rs.Rows[i]["Tipe"].ToString()) // { // bool Akunting = Db.SingleBool("SELECT Akunting FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); // // if(Akunting) // { // DataTable AnomaliAft = Db.Rs(strSqlAnomali); // string NoVoucher = Db.SingleString("SELECT NoVoucher FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); // // Akun.InsertAnomali("JUAL", NoKontrak, Cf.LogCapture(AnomaliBef), Cf.LogCapture(AnomaliAft), "EDIT TAGIHAN", "", NoVoucher); // } // } /**********/ } Tambah(); DataTable rsAft = Db.Rs("SELECT " + "CONVERT(VARCHAR,NoUrut) + '. ' + NamaTagihan + ' ('+Tipe+') ' + CONVERT(VARCHAR,TglJT,106) + ' ' + CONVERT(VARCHAR,NilaiTagihan,1) " + "FROM MS_TAGIHAN WHERE NoKontrak = '" + NoKontrak + "' ORDER BY NoUrut"); DataTable rsDetail = Db.Rs("SELECT" + " MS_KONTRAK.NoKontrak AS [No. Kontrak]" + ",MS_KONTRAK.NoUnit AS [Unit]" + ",MS_CUSTOMER.Nama AS [Customer]" + ",MS_KONTRAK.NilaiKontrak AS [Nilai Kontrak]" + ",MS_KONTRAK.Skema AS [Skema]" + " FROM MS_KONTRAK INNER JOIN MS_CUSTOMER" + " ON MS_KONTRAK.NoCustomer = MS_CUSTOMER.NoCustomer" + " WHERE MS_KONTRAK.NoKontrak = '" + NoKontrak + "'"); string Ket = Cf.LogCapture(rsDetail) + "<br>---EDIT TAGIHAN---<br>" + Cf.LogList(rsBef, rsAft, "JADWAL TAGIHAN"); Db.Execute("EXEC spLogKontrak" + " 'EJT'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Ket + "'" + ",'" + NoKontrak + "'" ); decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KONTRAK_LOG ORDER BY LogID DESC"); string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); Db.Execute("UPDATE MS_KONTRAK_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID); Func.CekKomisi(NoKontrak); return(true); } else { return(false); } }
public static string[,] Breakdown(int Nomor, decimal Netto, DateTime TglKontrak) { DataTable rs = Db.Rs("SELECT * " + " FROM REF_SKEMA_DETAIL" + " WHERE Nomor = " + Nomor + " ORDER BY Baris" ); string[,] x = new string[rs.Rows.Count, 6]; decimal totalbf = 0; int potongbf = 0; for (int i = 0; i < rs.Rows.Count; i++) { x[i, 0] = rs.Rows[i]["Baris"].ToString(); x[i, 1] = rs.Rows[i]["Tipe"].ToString(); x[i, 2] = rs.Rows[i]["Nama"].ToString(); //jadwal DateTime Tgl = TglKontrak; if (rs.Rows[i]["TglFix"] is DBNull) { string tipejadwal = rs.Rows[i]["TipeJadwal"].ToString(); int intjadwal = Convert.ToInt32(rs.Rows[i]["IntJadwal"]); int refjadwal = Convert.ToInt32(rs.Rows[i]["RefJadwal"]); DateTime TglReferensi = TglKontrak; if (refjadwal != 0) { try { TglReferensi = Convert.ToDateTime(x[refjadwal - 1, 3]); } catch { } } if (tipejadwal == "M") { Tgl = TglReferensi.AddMonths(intjadwal); //bulanan } else { Tgl = TglReferensi.AddDays(intjadwal); //harian } } else { Tgl = Convert.ToDateTime(rs.Rows[i]["TglFix"]); //Fix } x[i, 3] = Cf.Day(Tgl); //nominal string tipenominal = rs.Rows[i]["TipeNominal"].ToString(); decimal nominal = Convert.ToDecimal(rs.Rows[i]["Nominal"]); decimal n = nominal; if (tipenominal == "%") { n = Netto * (nominal / 100); } x[i, 4] = Cf.Num(n); if (rs.Rows[i]["Tipe"].ToString() == "BF") { totalbf = totalbf + n; } if ((bool)rs.Rows[i]["BF"]) { potongbf++; } x[i, 5] = Cf.BoolToSql(Convert.ToBoolean(rs.Rows[i]["KPR"])).ToString(); } //pemotongan booking fee if (potongbf > 0) { decimal bf = totalbf / potongbf; for (int i = 0; i < rs.Rows.Count; i++) { if ((bool)rs.Rows[i]["BF"]) { decimal tagihan = Convert.ToDecimal(x[i, 4]); x[i, 4] = Cf.Num(tagihan - bf); } } } //pembulatan ribuan bool RThousand = Db.SingleBool("SELECT RThousand FROM REF_SKEMA WHERE Nomor = " + Nomor); decimal t = 0; for (int i = 0; i < rs.Rows.Count; i++) { if (i != rs.Rows.Count - 1) { decimal native = Convert.ToDecimal(x[i, 4]); decimal rounded = 0; if (RThousand) { rounded = RoundThousand(native); } else { rounded = RoundSatuan(native); } t = t + rounded; x[i, 4] = Cf.Num(rounded); } else { decimal sisa = Netto - t; x[i, 4] = Cf.Num(sisa); } } return(x); }
private bool Save() { if (valid()) { DataTable bef = Db.Rs("SELECT " + " Zoning" + ",ArahHadap AS [Arah Hadap]" + ",Panorama" + ",Panjang" + ",Lebar" + ",Tinggi" + ",LuasSG AS [Luas Tanah]" + ",LuasNett AS [Luas Bangunan]" + ",HadapAtrium AS [Hadap Atrium/Void]" + ",HadapEntrance AS [Hadap Entrance]" + ",HadapEskalator AS [Hadap Eskalator]" + ",HadapLift AS [Hadap Lift]" + ",HadapParkir AS [Hadap Parkir]" + ",HadapAxis AS [Hadap Axis]" + ",Hook AS [Hook]" + ",LebarJalan AS [Lebar Jalan]" + ",Outdoor AS [Outdoor]" + ",NamaJalan AS [Nama Jalan]" + " FROM MS_UNIT " + " WHERE NoStock = '" + NoStock + "'"); string Zoning = Cf.Str(zoning.Text); string ArahHadap = Cf.Str(arahhadap.Text); string Panorama = Cf.Str(panorama.Text); decimal Panjang = Convert.ToDecimal(panjang.Text); decimal Lebar = Convert.ToDecimal(lebar.Text); decimal Tinggi = Convert.ToDecimal(tinggi.Text); decimal LuasSG = Convert.ToDecimal(luassg.Text); decimal LuasNett = Convert.ToDecimal(luasnett.Text); decimal LebarJalan = Convert.ToDecimal(lebarjalan.Text); decimal HargaGimmick = Convert.ToDecimal(hargagimmick.Text); decimal HargaLainLain = Convert.ToDecimal(hargalainlain.Text); string NamaJalan = NJ.Text; Db.Execute("EXEC spUnitEditSpek" + " '" + NoStock + "'" + ",'" + Zoning + "'" + ", " + Panjang + ", " + Lebar + ", " + Tinggi + ", " + LuasSG + ", " + LuasNett + ", " + Cf.BoolToSql(HadapAtrium.Checked) + ", " + Cf.BoolToSql(HadapEntrance.Checked) + ", " + Cf.BoolToSql(HadapEskalator.Checked) + ", " + Cf.BoolToSql(HadapLift.Checked) + ", " + Cf.BoolToSql(HadapParkir.Checked) + ", " + Cf.BoolToSql(HadapAxis.Checked) + ", " + Cf.BoolToSql(Hook.Checked) + ", " + LebarJalan + ", " + Cf.BoolToSql(outdoor.Checked) + ",'" + ArahHadap + "'" + ",'" + Panorama + "'" ); Db.Execute("UPDATE MS_UNIT SET TambahanHargaGimmick = '" + HargaGimmick + "', TambahanHargaLainLain = '" + HargaLainLain + "',NamaJalan = '" + NamaJalan + "' WHERE NoStock = '" + NoStock + "' "); DataTable kon = Db.Rs("SELECT * FROM MS_KONTRAK WHERE NoStock = '" + NoStock + "' AND Status = 'A'"); if (kon.Rows.Count > 0) { Db.Execute("UPDATE MS_KONTRAK SET Revisi = Revisi + 1 WHERE NoKontrak = '" + kon.Rows[0]["NoKontrak"].ToString() + "'"); } DataTable aft = Db.Rs("SELECT " + " Zoning" + ",ArahHadap AS [Arah Hadap]" + ",Panorama" + ",Panjang" + ",Lebar" + ",Tinggi" + ",LuasSG AS [Luas Tanah]" + ",LuasNett AS [Luas Bangunan]" + ",HadapAtrium AS [Hadap Atrium/Void]" + ",HadapEntrance AS [Hadap Entrance]" + ",HadapEskalator AS [Hadap Eskalator]" + ",HadapLift AS [Hadap Lift]" + ",HadapParkir AS [Hadap Parkir]" + ",HadapAxis AS [Hadap Axis]" + ",Hook AS [Hook]" + ",LebarJalan AS [Lebar Jalan]" + ",Outdoor AS [Outdoor]" + ",NamaJalan AS [Nama Jalan]" + " FROM MS_UNIT " + " WHERE NoStock = '" + NoStock + "'"); //Logfile string Ket = Cf.LogCompare(bef, aft); Db.Execute("EXEC spLogUnit" + " 'EDIT'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Ket + "'" + ",'" + NoStock + "'" ); return(true); } else { return(false); } }
protected void ok_Click(object sender, System.EventArgs e) { if (Valid()) { bool StatusBerkas = false; if (status.SelectedValue == "1") { StatusBerkas = true; } string CheckListDokumen = ""; System.Text.StringBuilder x = new System.Text.StringBuilder(); for (int i = 0; i < umum.Items.Count; i++) { if (umum.Items[i].Selected) { x.Append(umum.Items[i].Text + ";"); } } for (int i = 0; i < pn.Items.Count; i++) { if (pn.Items[i].Selected) { x.Append(pn.Items[i].Text + ";"); } } for (int i = 0; i < swasta.Items.Count; i++) { if (swasta.Items[i].Selected) { x.Append(swasta.Items[i].Text + ";"); } } for (int i = 0; i < wira.Items.Count; i++) { if (wira.Items[i].Selected) { x.Append(wira.Items[i].Text + ";"); } } for (int i = 0; i < lain.Items.Count; i++) { if (lain.Items[i].Selected) { x.Append(lain.Items[i].Text + ";"); } } CheckListDokumen = x.ToString(); DataTable rsBef = Db.Rs("SELECT " + "CheckListDokumen AS [Check List Dokumen]" + ", StatusBerkas AS [StatusBerkas]" //+ ", ISNULL(TglSelesaiBerkas,0) AS [Tgl. Selesai Berkas]" + " FROM MS_KONTRAK" + " WHERE NoKontrak = '" + NoKontrak + "'" ); if (tgl.Text != "") { DateTime Tgl = Convert.ToDateTime(tgl.Text); Db.Execute("UPDATE MS_KONTRAK" + " SET CheckListDokumen = '" + CheckListDokumen + "'" + ", StatusBerkas = " + Cf.BoolToSql(StatusBerkas) + ", TglSelesaiBerkas = '" + Tgl + "'" + " WHERE NoKontrak = '" + NoKontrak + "'" ); } else { Db.Execute("UPDATE MS_KONTRAK" + " SET CheckListDokumen = '" + CheckListDokumen + "'" + ", StatusBerkas = " + Cf.BoolToSql(StatusBerkas) //+ ", TglSelesaiBerkas = '" + null + "'" + " WHERE NoKontrak = '" + NoKontrak + "'" ); } DataTable rsAft = Db.Rs("SELECT " + "CheckListDokumen AS [Check List Dokumen]" + ", StatusBerkas AS [StatusBerkas]" //+ ", TglSelesaiBerkas AS [Tgl. Selesai Berkas]" + " FROM MS_KONTRAK" + " WHERE NoKontrak = '" + NoKontrak + "'" ); string Ket = Cf.LogCompare(rsBef, rsAft); Db.Execute("EXEC spLogKontrak" + " 'KPACLB'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Ket + "'" + ",'" + NoKontrak + "'" ); decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_KONTRAK_LOG ORDER BY LogID DESC"); string Project = Db.SingleString("SELECT Project FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); Db.Execute("UPDATE MS_KONTRAK_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID); if (Request.QueryString["NoKontrak"] != null) { this.RegisterStartupScript( "focusScript" , "<script language='javascript' type='text/javascript'>" + "window.close();" + "</script>" ); } else { Response.Redirect("KontrakBerkas.aspx?done=" + NoKontrak); } } }
protected void save_Click(object sender, System.EventArgs e) { if (filevalid()) { if (valid()) { if (pass.Text.Length < 8) { passc.Text = "Password baru harus tediri dari minimal 8 karakter."; passc.ForeColor = Color.Red; } else { passc.Text = ""; string Nama = Cf.Str(nama.Text); string SecLevel = seclevel.SelectedValue; string Password = passMD5.Text; string Email = email.Text; int RotasiPass = Convert.ToInt32(rotasipass.Text); int NoAgent = Convert.ToInt32(agent.SelectedValue); Db.Execute("EXEC spUserDaftar" + " '" + UserID + "'" + ",'" + Password + "'" + ",'" + Nama + "'" + ",'" + SecLevel + "'" + ", " + Cf.BoolToSql(gantipass.Checked) + ", " + RotasiPass ); if (file.PostedFile.FileName.Length != 0) { string path = Request.PhysicalApplicationPath + "Foto\\" + UserID + ".png"; Dfc.UploadFile(".jpg", path, file); Db.Execute("UPDATE USERNAME SET Foto = '" + path + "' WHERE UserID = '" + UserID + "'"); } Db.Execute("UPDATE USERNAME SET Email = '" + Email + "' WHERE UserID = '" + UserID + "'"); DataTable rs = Db.Rs("SELECT " + " UserID AS [Kode / Username]" + ",Nama AS [Nama Lengkap]" + ",SecLevel AS [Security Level]" + ",Email AS [Email]" + ",Foto AS [Foto]" + ",GantiPass AS [Rubah Password di Login Pertama]" + ",RotasiPass AS [Frekuensi Rotasi Password (Bulanan)]" + ",NoAgent AS [Kode Sales]" + " FROM USERNAME WHERE UserID = '" + UserID + "'"); Db.Execute("EXEC spLogUsername" + " 'PUB'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Cf.LogCapture(rs) + "'" + ",'" + UserID + "'" ); Response.Redirect("Pendaftaran.aspx?done=" + UserID); } } } }
private void SaveTagihan() { int CaraBayar = Convert.ToInt32(skema.SelectedValue); decimal PPN = 0, Netto = 0; if (CaraBayar != 0) { string RumusDiskon = diskon2.Text; string RumusDiskon2 = Db.SingleString( "SELECT DiskonKet FROM REF_SKEMA WHERE Nomor = " + CaraBayar); string RumusBunga = bunga2.Text; string RumusBunga2 = ""; decimal Gross = Db.SingleDecimal( "SELECT isnull(sum(Gross),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal surcharge = Convert.ToDecimal(Surcharge.Text); decimal disawal = Db.SingleDecimal("SELECT isnull(sum(DiskonRupiah),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal bung = Db.SingleDecimal("SELECT isnull(sum(BungaNominal),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal Gross2 = Gross; decimal GrossAfterDiskon = Func.SetelahDiskon(RumusDiskon, Gross2); decimal GrossAfterBunga = Func.SetelahBunga(RumusBunga, Gross2); decimal HargaSetelahBunga = GrossAfterDiskon + bung; decimal hrgsetelahdisc = 0; Netto = (CaraBayar != 0) ? Func.SetelahDiskon(RumusDiskon, Gross) : Gross; /* DISKON TAMBAHAN SAAT CLOSING */ decimal DiskonTambahan = 0; if (jenisDiskon.SelectedIndex == 0) { //Diskon lum sum DiskonTambahan = Convert.ToDecimal(diskonLumpSum.Text); } else if (jenisDiskon.SelectedIndex == 1) { //Diskon % bertingkat decimal coba = 0, totaldisc = 0; string[] DiscTambahPersen = diskontambahPersen.Text.Split('+'); decimal dpp = Netto; if (diskontambahPersen.Text != "") { for (int a = 0; a <= DiscTambahPersen.GetUpperBound(0); a++) { coba = Math.Round(Convert.ToDecimal(DiscTambahPersen[a]) * dpp / (decimal)100); dpp -= coba; totaldisc += coba; } } else { totaldisc = 0; } DiskonTambahan = totaldisc; } Db.Execute("UPDATE MS_KONTRAK" + " SET DiskonTambahan = " + DiskonTambahan + " WHERE NoKontrak = '" + NoKontrak + "'"); Netto -= DiskonTambahan; /********************************/ decimal distambah = Db.SingleDecimal("SELECT isnull(sum(DiskonTambahan),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal afterDiscTambahan = HargaSetelahBunga - distambah; decimal NilaiKontrak = afterDiscTambahan; decimal DPP = Math.Round(NilaiKontrak / (decimal)1.1); decimal NilaiPPN = 0; decimal PPNDitanggungPemerintah = 0; if (JenisPPN.SelectedValue == "KONSUMEN") { PPNDitanggungPemerintah = 0; NilaiPPN = NilaiKontrak - DPP; } else { PPNDitanggungPemerintah = DPP * (decimal)0.1; NilaiPPN = 0; } Db.Execute("EXEC spKontrakDiskon" + " '" + NoKontrak + "'" + ", " + Gross + ", " + NilaiKontrak + ",'" + RumusDiskon + "'" + ",'" + Cf.Str(RumusDiskon2) + "'" ); Db.Execute("UPDATE MS_KONTRAK SET DiskonRupiah = '" + nilaiDiskon.Text + "' " + " WHERE NoKontrak = '" + NoKontrak + "'"); Db.Execute("EXEC spKontrakBunga" + " '" + NoKontrak + "'" + ", " + Gross2 + ", " + NilaiKontrak + ",'" + RumusBunga + "'" + ",'" + Cf.Str(RumusBunga2) + "'" ); Db.Execute("UPDATE MS_KONTRAK" + " SET " + " NilaiDPP = " + DPP + " ,NilaiPPN = " + NilaiPPN + " WHERE NoKontrak = '" + NoKontrak + "'"); decimal nilaitg = Db.SingleDecimal("select isnull(sum(nilaikontrak),0) from ms_kontrak WHERE NoKontrak = '" + NoKontrak + "'"); foreach (var r in Func.ListTagihan(CaraBayar, nilaitg, Convert.ToDateTime(tglKontrak.Text))) { if (!Response.IsClientConnected) { break; } Db.Execute("EXEC spTagihanDaftar" + " '" + NoKontrak + "'" + ",'" + r.NamaTagihan + "'" + ",'" + r.TglJt + "'" + ",'" + r.NilaiTagihan + "'" + ",'" + r.TipeTagihan + "'" ); int NoUrut = Db.SingleInteger("SELECT TOP 1 NoUrut FROM MS_TAGIHAN WHERE NoKontrak = '" + NoKontrak + "' ORDER BY NoUrut DESC"); Db.Execute("UPDATE MS_TAGIHAN" + " SET KPR = " + Cf.BoolToSql(r.isKPR) + " WHERE NoKontrak = '" + NoKontrak + "'" + " AND NoUrut = " + NoUrut ); } //string[,] x = Func.Breakdown(CaraBayar, nilaitg, Convert.ToDateTime(tglKontrak.Text)); //for (int i = 0; i <= x.GetUpperBound(0); i++) //{ // if (!Response.IsClientConnected) break; // Db.Execute("EXEC spTagihanDaftar" // + " '" + NoKontrak + "'" // + ",'" + x[i, 2] + "'" // + ",'" + Convert.ToDateTime(x[i, 3]) + "'" // + ", " + Convert.ToDecimal(x[i, 4]) // + ",'" + x[i, 1] + "'" // ); // int NoUrut = Db.SingleInteger("SELECT TOP 1 NoUrut FROM MS_TAGIHAN WHERE NoKontrak = '" + NoKontrak + "' ORDER BY NoUrut DESC"); // Db.Execute("UPDATE MS_TAGIHAN" // + " SET KPR = " + x[i, 5] // + " WHERE NoKontrak = '" + NoKontrak + "'" // + " AND NoUrut = " + NoUrut // ); //} } else { string RumusBunga = bunga2.Text; string RumusBunga2 = ""; decimal Gross = Db.SingleDecimal( "SELECT isnull(sum(Gross),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal surcharge = Convert.ToDecimal(Surcharge.Text); decimal disawal = Db.SingleDecimal("SELECT isnull(sum(DiskonRupiah),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal bung = Db.SingleDecimal("SELECT isnull(sum(BungaNominal),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal Gross2 = Gross; decimal GrossAfterDiskon = Gross2; decimal GrossAfterBunga = Func.SetelahBunga(RumusBunga, Gross2); decimal HargaSetelahBunga = GrossAfterDiskon + bung; decimal NilaiPPN = 0; decimal NilaiKontrak = 0; decimal hrgsetelahdisc = 0; decimal PPNDitanggungPemerintah = 0; Netto = Gross; /* DISKON TAMBAHAN SAAT CLOSING */ decimal DiskonTambahan = 0; if (jenisDiskon.SelectedIndex == 0) { //Diskon lum sum DiskonTambahan = Convert.ToDecimal(diskonLumpSum.Text); } else if (jenisDiskon.SelectedIndex == 1) { //Diskon % bertingkat decimal coba = 0, totaldisc = 0; string[] DiscTambahPersen = diskontambahPersen.Text.Split('+'); decimal dpp = Netto; if (diskontambahPersen.Text != "") { for (int a = 0; a <= DiscTambahPersen.GetUpperBound(0); a++) { coba = Math.Round(Convert.ToDecimal(DiscTambahPersen[a]) * dpp / (decimal)100); dpp -= coba; totaldisc += coba; } } else { totaldisc = 0; } DiskonTambahan = totaldisc; } Db.Execute("UPDATE MS_KONTRAK" + " SET DiskonTambahan = " + DiskonTambahan + " WHERE NoKontrak = '" + NoKontrak + "'"); Netto -= DiskonTambahan; /********************************/ decimal distambah = Db.SingleDecimal("SELECT isnull(sum(DiskonTambahan),0) FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'"); decimal afterDiscTambahan = HargaSetelahBunga - distambah; decimal DPP = Math.Round(afterDiscTambahan / (decimal)1.1); if (JenisPPN.SelectedValue == "KONSUMEN") { PPNDitanggungPemerintah = 0; NilaiPPN = afterDiscTambahan - DPP; } else { PPNDitanggungPemerintah = DPP * (decimal)0.1; NilaiPPN = 0; } Db.Execute("EXEC spKontrakDiskon" + " '" + NoKontrak + "'" + ", " + Gross + ", " + afterDiscTambahan + ",''" + ",''" ); Db.Execute("UPDATE MS_KONTRAK SET DiskonRupiah = '" + nilaiDiskon.Text + "' " + " WHERE NoKontrak = '" + NoKontrak + "'"); Db.Execute("EXEC spKontrakBunga" + " '" + NoKontrak + "'" + ", " + Gross2 + ", " + NilaiKontrak + ",'" + RumusBunga + "'" + ",'" + Cf.Str(RumusBunga2) + "'" ); Db.Execute("UPDATE MS_KONTRAK" + " SET " + " NilaiDPP = " + DPP + " ,NilaiPPN = " + NilaiPPN + " WHERE NoKontrak = '" + NoKontrak + "'"); } }
private bool Save(DataTable rs, int i) { string NoStock = ""; string Jenis = Cf.Str(rs.Rows[i][0]); string Lokasi = Cf.Str(rs.Rows[i][1]); string Lantai = Cf.Str(rs.Rows[i][2]); string Nomor = Cf.Str(rs.Rows[i][3]); decimal Luas = Convert.ToDecimal(rs.Rows[i][4]); //string Project = Cf.Str(rs.Rows[i][23]); string Kategori = Cf.Str(rs.Rows[i][23]); string ParamID = "FormatLantai" + project.SelectedValue; string ParamID2 = "FormatUnit" + project.SelectedValue; string strSql = Db.SingleString("SELECT Value FROM [ISC064_SECURITY].[dbo].[REF_PARAM] WHERE ParamID = '" + ParamID + "'"); string strSql2 = Db.SingleString("SELECT Value FROM [ISC064_SECURITY].[dbo].[REF_PARAM] WHERE ParamID = '" + ParamID2 + "'"); string NoUnit = Lokasi + strSql + Lantai + strSql2 + Nomor; bool x = true; string Aksi = ""; if (Db.SingleInteger("SELECT COUNT(*) FROM MS_UNIT WHERE NoUnit = '" + NoUnit + "'") == 0) { Aksi = "DAFTAR"; NoStock = AutoID(); Db.Execute("EXEC spUnitDaftar " + " '" + NoStock + "'" + ",'" + Jenis + "'" + ",'" + Lokasi + "'" + ",'" + NoUnit + "'" + ", " + Luas ); } else if (overwrite.Checked) { Aksi = "EDIT"; NoStock = Db.SingleString("SELECT NoStock FROM MS_UNIT WHERE NoUnit = '" + NoUnit + "'"); Db.Execute("EXEC spUnitEdit" + " '" + NoStock + "'" + ",'" + Jenis + "'" + ",'" + Lokasi + "'" + ",'" + NoUnit + "'" + ", " + Luas + ", '" + Lantai + "'" + ", '" + Nomor + "'" ); } else { x = false; } if (x) { decimal PriceListMin = Convert.ToDecimal(rs.Rows[i][5]); decimal PriceListRmh = Convert.ToDecimal(rs.Rows[i][6]); decimal PriceListKav = Convert.ToDecimal(rs.Rows[i][7]); decimal BiayaBPHTB = Convert.ToDecimal(rs.Rows[i][8]); decimal BiayaSurat = Convert.ToDecimal(rs.Rows[i][9]); decimal BiayaProses = Convert.ToDecimal(rs.Rows[i][10]); decimal BiayaLain = Convert.ToDecimal(rs.Rows[i][11]); string NamaJalan = Cf.Str(rs.Rows[i][24]); if (NamaJalan == "NA") { NamaJalan = ""; } decimal BiayaTanah = Convert.ToDecimal(rs.Rows[i][25]); Db.Execute("EXEC spUnitPriceList" + " '" + NoStock + "'" + ", " + PriceListMin + ", " + PriceListRmh ); Db.Execute("UPDATE MS_UNIT SET" + " BiayaBPHTB = '" + BiayaBPHTB + "'" + ",BiayaSurat = '" + BiayaSurat + "'" + ",BiayaProses = '" + BiayaProses + "'" + ",BiayaLainLain = '" + BiayaLain + "'" + ",HargaTanah = '" + BiayaTanah + "'" + ",PricelistKavling = '" + PriceListKav + "'" + ",NamaJalan = '" + NamaJalan + "'" + " WHERE NoStock = '" + NoStock + "'" ); Db.Execute("EXEC spPriceListHistory" + " '" + NoStock + "'" + ", " + PriceListMin + ", " + PriceListRmh + ", " + PriceListKav + ",'" + DateTime.Today + "'" ); string Zoning = Cf.Str(rs.Rows[i][12]); if (Zoning == "NA") { Zoning = ""; } decimal Panjang = Convert.ToDecimal(rs.Rows[i][13]); decimal Lebar = Convert.ToDecimal(rs.Rows[i][14]); decimal Tinggi = Convert.ToDecimal(rs.Rows[i][15]); decimal LuasSG = Convert.ToDecimal(rs.Rows[i][16]); decimal LuasNett = Convert.ToDecimal(rs.Rows[i][18]); decimal LuasLebih = Convert.ToDecimal(rs.Rows[i][17]); bool HadapAtrium = false; bool HadapEntrance = false; bool HadapEskalator = false; bool HadapLift = false; bool HadapParkir = false; bool HadapAxis = false; bool Hook = false; decimal LebarJalan = Convert.ToDecimal(rs.Rows[i][19]); bool Outdoor = false; string ArahHadap = Cf.Str(rs.Rows[i][20]); if (ArahHadap == "NA") { ArahHadap = ""; } string Panorama = Cf.Str(rs.Rows[i][21]); if (Panorama == "NA") { Panorama = ""; } string JenisProperti = Cf.Str(rs.Rows[i][22]); if (JenisProperti == "Apartment") { JenisProperti = ""; } Db.Execute("EXEC spUnitEditSpek" + " '" + NoStock + "'" + ",'" + Zoning + "'" + ", " + Panjang + ", " + Lebar + ", " + Tinggi + ", " + LuasSG + ", " + LuasNett + ", " + Cf.BoolToSql(HadapAtrium) + ", " + Cf.BoolToSql(HadapEntrance) + ", " + Cf.BoolToSql(HadapEskalator) + ", " + Cf.BoolToSql(HadapLift) + ", " + Cf.BoolToSql(HadapParkir) + ", " + Cf.BoolToSql(HadapAxis) + ", " + Cf.BoolToSql(Hook) + ", " + LebarJalan + ", " + Cf.BoolToSql(Outdoor) + ",'" + ArahHadap + "'" + ",'" + Panorama + "'" + ",'" + JenisProperti + "'" + ",'" + Kategori + "'" ); Db.Execute("UPDATE MS_UNIT SET" + " LuasLebih = '" + LuasLebih + "'" + " WHERE NoStock = '" + NoStock + "'" ); //Response.Write(Kategori); //int SifatPPN = (Kategori.ToUpper() == "REAL ESTATE") ? 1 : 0; int SifatPPN; if (Kategori == "REAL ESTATE") { SifatPPN = 1; } else if (Kategori == "KOMERSIL") { SifatPPN = 1; } else { SifatPPN = 0; } string No = Db.SingleString("SELECT TOP 1 NoStock FROM MS_UNIT ORDER BY NoStock DESC"); Db.Execute("UPDATE MS_UNIT SET Project='" + project.SelectedValue + "',Lantai = '" + Lantai + "',SifatPPN = " + SifatPPN + ",Nomor='" + Nomor + "' WHERE NoStock = '" + No + "'"); DataTable log = Db.Rs("SELECT " + " NoStock AS [No. Stock]" + ",Jenis AS [Jenis]" + ",Lokasi AS [Lokasi]" + ",NoUnit AS [Unit]" + ",Kategori AS [Kategori Unit]" + ",Lantai AS [Blok]" + ",Nomor" + ",Luas AS [Luas]" + ",PriceListMin AS [Price List Minimum]" + ",PriceList AS [Price List Rumah]" + ",PricelistKavling AS [Price List Kavling]" + ",BiayaBPHTB AS [Biaya BPHTB]" + ",BiayaSurat AS [Biaya Surat]" + ",BiayaProses AS [Biaya Proses]" + ",BiayaLainLain AS [Biaya Lain-Lain]" + ",HargaTanah AS [Harga Tanah]" + ",Zoning" + ",Panjang" + ",Lebar" + ",Tinggi" + ",LuasSG AS [Luas Tanah]" + ",LuasLebih AS [Luas Lebih Tanah]" + ",LuasNett AS [Luas Bangunan]" + ",HadapAtrium AS [Hadap Atrium/Void]" + ",HadapEntrance AS [Hadap Entrance]" + ",HadapEskalator AS [Hadap Eskalator]" + ",HadapLift AS [Hadap Lift]" + ",HadapParkir AS [Hadap Parkir]" + ",HadapAxis AS [Hadap Axis]" + ",Hook AS [Hook]" + ",LebarJalan AS [Lebar Jalan]" + ",Outdoor AS [Outdoor]" + ",NamaJalan AS [Nama Jalan]" + ",ArahHadap AS [Arah Hadap]" + ",Panorama" + ",JenisProperti" + " FROM MS_UNIT" + " WHERE NoStock = '" + NoStock + "'" ); Db.Execute("EXEC spLogUnit" + " '" + Aksi + "'" + ",'" + Act.UserID + "'" + ",'" + Act.IP + "'" + ",'" + Cf.LogCapture(log) + "'" + ",'" + NoStock + "'" ); decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_UNIT_LOG ORDER BY LogID DESC"); Db.Execute("UPDATE MS_UNIT_LOG SET Project = '" + project.Text + "' WHERE LogID = " + LogID); } return(x); }