private void Valid(string Username)
{
Session["SalahPass"] = null;
//Logfile otorisasi
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",Total"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ " FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS);
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spLogTTS"
+ " 'R-TTS'"
+ ",'" + Username + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
Tampil();
}
private void Valid(string Username)
{
Session["SalahPass"] = null;
//Logfile otorisasi
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",Total"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ " FROM MS_TTS WHERE NoTTS = " + NoTTS);
Db.Execute("EXEC spLogTTS"
+ " 'R-TTS'"
+ ",'" + Username + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Tampil();
}
private void Tampil()
{
list.Visible = true;
reprint.Visible = false;
Js.AutoPrint(this);
//increment
Db.Execute("UPDATE " + Mi.DbPrefix + "FINANCEAR..MS_TTS SET PrintTTS = PrintTTS + 1 WHERE NoTTS = " + NoTTS);
//Logfile
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",Total"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ " FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS);
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spLogTTS"
+ " 'P-TTS'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
}
protected void btnbaru_ServerClick(object sender, System.EventArgs e)
{
if (validbaru())
{
DataTable rs = Db.Rs("SELECT "
+ " NoTTS AS [No. TTS]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Total AS [Nilai TTS]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
DataTable rsBef = Db.Rs("SELECT "
+ " NoSlip AS [No. Slip]"
+ ",CONVERT(varchar, TglSetoran, 106) AS [Tanggal Setoran]"
+ ",Bank AS [Rekening]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
int NoSlip = Db.SingleInteger("SELECT ISNULL(MAX(NoSlip),0)+1 FROM MS_TTS");
DateTime TglSetoran = Convert.ToDateTime(tglsetoran.Text);
string Bank = Cf.Str(bank.Text);
Db.Execute("UPDATE MS_TTS SET "
+ " NoSlip = " + NoSlip
+ ",TglSetoran = CONVERT(datetime, '" + TglSetoran + "', 101)"
+ ",Bank = '" + Bank + "'"
+ " WHERE NoTTS = " + NoTTS);
DataTable rsAft = Db.Rs("SELECT "
+ " NoSlip AS [No. Slip]"
+ ",CONVERT(varchar, TglSetoran, 106) AS [Tanggal Setoran]"
+ ",Bank AS [Rekening]"
+ " FROM MS_TTS"
+ " WHERE NoTTS = " + NoTTS
);
//Logfile
string ketlog = Cf.LogCapture(rs)
+ Cf.LogCompare(rsBef, rsAft);
Db.Execute("EXEC spLogTTS"
+ " 'EDIT'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + ketlog + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("TTSEdit.aspx?done=1&NoTTS=" + NoTTS);
}
}
private void Valid(string Username)
{
Session["SalahPass"] = null;
//Logfile otorisasi
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",Total"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ ",NoFPS AS [No. FPS]"
+ " FROM MS_TTS WHERE NoTTS = " + NoTTS);
Db.Execute("EXEC spLogTTS"
+ " 'R-FPS'"
+ ",'" + Username + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Tampil();
string file = Param.PathFilePDFFinanceAR + NoTTS + Project + "_FPS.pdf";
bool exist = System.IO.File.Exists(file);
if (exist)
{
System.IO.File.Delete(file);
}
ConvertPdf();
Response.Redirect(Param.PathLinkFilePDFFinanceAR + NoTTS + Project + "_FPS.pdf");
}
private void Tampil()
{
list.Visible = true;
reprint.Visible = false;
Js.AutoPrint(this);
//increment
Db.Execute("UPDATE MS_TTS SET PrintBKM = PrintBKM + 1 WHERE NoTTS = " + NoTTS);
//Logfile
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",Total"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ ",NoBKM AS [No. BKM]"
+ ",CONVERT(varchar, TglBKM, 106) AS [Tanggal BKM]"
+ " FROM MS_TTS WHERE NoTTS = " + NoTTS);
Db.Execute("EXEC spLogTTS"
+ " 'P-BKM'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + Cf.LogCapture(rs) + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
}
protected void save_Click(object sender, System.EventArgs e)
{
if (valid())
{
DataTable tts = Db.Rs("SELECT TOP 1 * FROM MIGRATE_PEMBAYARAN WHERE NoKontrak = '" + NoKontrak + "' AND NoTTS = '" + NoTTS + "' AND Approved = 0");
if (tts.Rows.Count > 0)
{
DataTable kon = Db.Rs("SELECT * FROM MS_KONTRAK WHERE NoKontrak = '" + NoKontrak + "'");
DataTable cus = Db.Rs("SELECT * FROM MS_CUSTOMER WHERE NoCustomer = '" + kon.Rows[0]["NoCustomer"] + "'");
TextBox tgltts = (TextBox)list.FindControl("tgltts_0");
TextBox nobkm = (TextBox)list.FindControl("nobkm_0");
TextBox tglbkm = (TextBox)list.FindControl("tglbkm_0");
RadioButtonList cb = (RadioButtonList)list.FindControl("cb_0");
DropDownList rek = (DropDownList)list.FindControl("rek_0");
DateTime TglTTS = Convert.ToDateTime(tgltts.Text);
string Unit = Cf.Str(kon.Rows[0]["NoUnit"]);
string Customer = Cf.Str(cus.Rows[0]["Nama"]);
string CaraBayar = cb.SelectedValue;
string Ket = "";
//decimal AdminBank = 0;
//if (Cf.isMoney(admBank)) { AdminBank = Convert.ToDecimal(admBank.Text); }
//decimal LebihBayar = 0;
//if (Cf.isMoney(lebihBayar)) { LebihBayar = Convert.ToDecimal(lebihBayar.Text); }
//// Logic Create Format Penomoran TTS Reset Per Year
//// Get Year Terakhir TTS
//int rsYearTTS = 0;
//if (Db.SingleInteger("SELECT COUNT(*) FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE Year(TglTTS) = " + TglTTS.Year) > 0)
//{
// rsYearTTS = Db.SingleInteger("SELECT TOP 1 YEAR(TglTTS) FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE Year(TglTTS) = " + TglTTS.Year + " ORDER BY TglTTS DESC");
//}
//int rsYearInput = TglTTS.Year;
//string idTTS = "1";
//int PadLeftId = 6;
//// Set increment Nomor jika sama tahun
//if (rsYearTTS == rsYearInput)
//{
// int c = Db.SingleInteger("SELECT COUNT(NoTTS) FROM " + Mi.DbPrefix + "FINANCEAR..MS_TTS WHERE Year(TglTTS) = " + TglTTS.Year);
// bool hasfound = false;
// while (!hasfound)
// {
// if (!Response.IsClientConnected) break;
// c++;
// if (isUniqueTTS(c, TglTTS, PadLeftId))
// {
// idTTS = c.ToString();
// hasfound = true;
// }
// }
//}
//string NoTTS = idTTS.PadLeft(PadLeftId, '0')
// + "/" + "TTS"
// + "/" + Cf.Roman(TglTTS.Month)
// + "/" + TglTTS.Year.ToString();
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spTTSRegistrasiMigrate"
+ " '" + NoTTS + "'"
+ ",'" + TglTTS + "'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'JUAL'"
+ ",'" + NoKontrak + "'"
+ ",'" + Unit + "'"
+ ",'" + Customer + "'"
+ ",'" + CaraBayar + "'"
+ ",'" + Ket + "'"
);
////khusus cek giro
//if (carabayar.SelectedValue == "BG")
//{
// string NoBG = Cf.Pk(nobg.Text);
// DateTime TglBG = Convert.ToDateTime(tglbg.Text);
// Db.Execute("EXEC spTTSRegistrasiBG"
// + " '" + NoTTS + "'"
// + ",'" + NoBG + "'"
// + ",'" + TglBG + "'"
// );
//}
//if (anonim.SelectedIndex > 0)
//{
// Db.Execute("UPDATE MS_TTS SET ANOID = '" + Cf.Str(anonim.SelectedValue) + "' WHERE NoTTS = '" + NoTTS + "'");
// Db.Execute("UPDATE CbANO SET StatusANO = 1 WHERE ANOID='" + Cf.Str(anonim.SelectedValue) + "' ", Cnn);
//}
//DataTable rs3 = Db.Rs("SELECT * FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak ='" + Ref + "'");
//decimal nilaiTTR = 0;
//if (rs3.Rows[0]["NoTTR"].ToString() != "")
//{
// string NoStock = Db.SingleString("SELECT NoStock FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + Ref + "'");
// int NoReservasi = Db.SingleInteger("SELECT NoReservasi FROM ISC064_MARKETINGJUAL..MS_RESERVASI WHERE NoStock = '" + NoStock + "'");
// DataTable rs2 = Db.Rs("SELECT * FROM ISC064_MARKETINGJUAL..MS_TTR WHERE NoReservasi = '" + NoReservasi + "' AND Status = 'BARU'");
// string NoTTR = Db.SingleString("SELECT NoTTR FROM ISC064_MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + Ref + "'");
// if (rs2.Rows.Count > 0)
// {
// nilaiTTR = Db.SingleDecimal("SELECT ISNULL(SUM(Total),0) FROM ISC064_MARKETINGJUAL..MS_TTR WHERE NoTTR = '" + NoTTR + "'");
// Db.Execute("UPDATE ISC064_MARKETINGJUAL..MS_TTR SET Status = 'POST' WHERE NoReservasi = '" + NoReservasi + "'");
// }
//}
//decimal total2 = Convert.ToDecimal(gt.Text) + nilaiTTR - AdminBank;
//Db.Execute("UPDATE MS_TTS"
// + " SET Acc = '" + tts.Rows[0]["Rekening"] + "'"
// + ", SumberBayar = 0"
// //+ ", AdminBank='" + AdminBank + "' "
// + ", Total2 = '" + total2 + "'"
// //+ ", LebihBayar = '" + LebihBayar + "'"
// + " WHERE NoTTS = '" + NoTTS + "'");
System.Text.StringBuilder alokasi = new System.Text.StringBuilder();
int NoTagihan = 0;
decimal total = 0;
DataTable rsa = Db.Rs("SELECT * FROM MIGRATE_PEMBAYARAN WHERE NoKontrak = '" + NoKontrak + "' AND NoTTS = '" + NoTTS + "' AND Approved = 0");
for (int i = 0; i < rsa.Rows.Count; i++)
{
TextBox lunas = (TextBox)list.FindControl("nilai_" + i);
DropDownList tag = (DropDownList)list.FindControl("tag_" + i);
string Tipe = Db.SingleString("SELECT Tipe FROM MS_TAGIHAN WHERE NoKontrak = '" + NoKontrak + "' AND NoUrut = '" + tag.SelectedValue + "'");
if (lunas.Text != "")
{
NoTagihan = Convert.ToInt16(tag.SelectedValue);
string NamaTagihan = Cf.Str(tag.SelectedItem.Text)
+ " (" + Tipe + ")";
decimal Nilai = Convert.ToDecimal(lunas.Text);// +nilaiTTR;
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spTTSAlokasi "
+ " '" + NoTTS + "'"
+ ", " + NoTagihan
+ ", " + Nilai
);
total += Nilai;
alokasi.Append(NamaTagihan + " " + Cf.Num(Nilai) + "<br>");
}
}
Db.Execute("UPDATE " + Mi.DbPrefix + "FINANCEAR..MS_TTS"
+ " SET Acc = '" + rek.SelectedValue + "'"
+ ", SumberBayar = 0"
//+ ", AdminBank='" + AdminBank + "' "
+ ", Total2 = '" + total + "'"
//+ ", LebihBayar = '" + LebihBayar + "'"
+ " WHERE NoTTS = '" + NoTTS + "'");
//BKM
if (tts.Rows[0]["NoBKM"] != "")
{
DateTime TglBKM = Convert.ToDateTime(tglbkm.Text);
string NoBKM = nobkm.Text;
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spPostingTTS '" + NoTTS + "','" + TglBKM + "'");
Db.Execute("UPDATE " + Mi.DbPrefix + "FINANCEAR..MS_TTS SET ManualBKM = ManualTTS, NoBKM = '" + NoBKM + "' WHERE NoTTS = '" + NoTTS + "'");
Db.Execute("UPDATE MS_PELUNASAN SET NoBKM = '" + NoBKM + "' WHERE NoTTS = '" + NoTTS + "'");
}
Db.Execute("UPDATE MIGRATE_PEMBAYARAN SET Approved = 1 WHERE NoKontrak = '" + NoKontrak + "' AND NoTTS = '" + NoTTS + "'");
DataTable rs = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",Total"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ ", Acc AS [Rekening Bank]"
+ " FROM " + Mi.DbPrefix + "FINANCEAR.. MS_TTS WHERE NoTTS = '" + NoTTS + "'");
string KetLog = Cf.LogCapture(rs)
+ "<br>***ALOKASI PEMBAYARAN:<br>"
+ alokasi.ToString();
Db.Execute("EXEC " + Mi.DbPrefix + "FINANCEAR..spLogTTS"
+ " 'REGIS'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + KetLog + "'"
+ ",'" + NoTTS.ToString() + "'"
);
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);
}
Response.Redirect("MigratePembayaran2.aspx?No=" + NoKontrak);
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
Act.NoCache();
Act.CekInt("NoTTS");
DataTable rs = Db.Rs("SELECT * FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS + " AND Status = 'BARU' AND Acc <> '' AND Acc <> '0'");
if (rs.Rows.Count == 0)
{
Response.Redirect("/CustomError/Deleted.html");
}
else
{
DataTable rsHeader = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",NoSlip AS [Slip Setoran]"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ ",Titip AS [Pengelola BG]"
+ ",Total"
+ ",NoFPS AS [No. Faktur Pajak]"
+ " FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS);
string StatusLama = rs.Rows[0]["Status"].ToString();
#region logfile
string Tipe = Db.SingleString("SELECT Tipe FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS);
string Tb = Sc.MktTb(Tipe);
string strSql = "";
if (Tipe != "TENANT")
{
strSql = "SELECT "
+ " CASE NoTagihan"
+ " WHEN 0 THEN 'UNALLOCATED ' + CONVERT(varchar,NilaiPelunasan,1)"
+ " ELSE (SELECT NamaTagihan FROM ISC064_MARKETINGJUAL..MS_TAGIHAN WHERE NoUrut = l.NoTagihan AND NoKontrak = l.NoKontrak)"
+ " + ' ' + CONVERT(varchar,NilaiPelunasan,1)"
+ " END AS NamaTagihan"
+ " FROM ISC064_MARKETINGJUAL..MS_PELUNASAN AS l "
+ " WHERE NoTTS = " + NoTTS;
}
else
{
strSql = "SELECT "
+ " NamaTagihan + ' ' + CONVERT(varchar,NilaiTagihan,1) "
+ " FROM ISC064_MARKETINGJUAL..MS_TAGIHAN AS l "
+ " WHERE NoTTS = " + NoTTS;
}
#endregion
DataTable rsDetil = Db.Rs(strSql);
string NoBKM = AutoID;
Db.Execute("EXEC ISC064_FINANCEAR..spPostingTTS " + NoTTS + ",'" + NoBKM + "','" + TglBKM + "'");
Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET ManualBKM = ManualTTS WHERE NoTTS = " + NoTTS);
//Ambil Stok No. FP
DataTable fp = Db.Rs("SELECT * FROM ISC064_FINANCEAR..REF_FP WHERE Status = 0");
if (fp.Rows.Count > 0)
{
Db.Execute("UPDATE ISC064_FINANCEAR..MS_TTS SET"
+ " NoFPS = '" + fp.Rows[0]["NoFPS"].ToString() + "'"
+ " WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE ISC064_FINANCEAR..REF_FP SET"
+ " Status = 1"
+ " WHERE NoFPS = '" + fp.Rows[0]["NoFPS"].ToString() + "'");
}
//Log
string KetLog = Cf.LogCapture(rsHeader)
+ Cf.LogList(rsDetil, "ALOKASI PELUNASAN")
;
Db.Execute("EXEC ISC064_FINANCEAR..spLogTTS"
+ " 'POST'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'***BUKA KWITANSI***<br>" + 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);
Response.Redirect("TTSEdit.aspx?NoTTS=" + NoTTS + "&done=1");
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
Act.NoCache();
Act.CekInt("NoTTS");
DataTable rs = Db.Rs("SELECT * FROM MS_TTS WHERE NoTTS = " + NoTTS);
if (rs.Rows.Count == 0)
{
Response.Redirect("/CustomError/Deleted.html");
}
else
{
DataTable rsHeader = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",NoSlip AS [Slip Setoran]"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ ",Titip AS [Pengelola BG]"
+ ",Total"
+ ",NoFPS"
+ " FROM MS_TTS WHERE NoTTS = " + NoTTS);
string StatusLama = rs.Rows[0]["Status"].ToString();
decimal NilaiKembali = Convert.ToDecimal(rs.Rows[0]["Total"]);
#region logfile
string Tipe = Db.SingleString("SELECT Tipe FROM MS_TTS WHERE NoTTS = " + NoTTS);
string Tb = Sc.MktTb(Tipe);
string strSql = "";
if (Tipe != "TENANT")
{
strSql = "SELECT "
+ " CASE NoTagihan"
+ " WHEN 0 THEN 'UNALLOCATED ' + CONVERT(varchar,NilaiPelunasan,1)"
+ " ELSE (SELECT NamaTagihan FROM "+ Tb + "..MS_TAGIHAN WHERE NoUrut = l.NoTagihan AND NoKontrak = l.NoKontrak)"
+ " + ' ' + CONVERT(varchar,NilaiPelunasan,1)"
+ " END AS NamaTagihan"
+ " FROM " + Tb + "..MS_PELUNASAN AS l "
+ " WHERE NoTTS = " + NoTTS;
}
else
{
strSql = "SELECT "
+ " NamaTagihan + ' ' + CONVERT(varchar,NilaiTagihan,1) "
+ " FROM " + Tb + "..MS_TAGIHAN AS l "
+ " WHERE NoTTS = " + NoTTS;
}
#endregion
DataTable rsDetil = Db.Rs(strSql);
Db.Execute("EXEC spTTSVoid " + NoTTS);
Db.Execute("UPDATE MS_TTS SET Total2 = 0 WHERE NoTTS = " + NoTTS);
string StatusBaru = Db.SingleString(
"SELECT Status FROM MS_TTS WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN_KPA SET STATUS='VOID', NilaiPelunasan = 0 WHERE NoTTS=" + NoTTS);
if (StatusLama != "VOID" && StatusBaru == "VOID")
{
string logr = "";
if (Request.QueryString["r"] != null)
{
logr = "REIMBURSE<br>";
Db.Execute("UPDATE MS_TTS SET NilaiKembali = " + NilaiKembali + " WHERE NoTTS = " + NoTTS);
}
if (Request.QueryString["fp"] != null)
{
string nofp = Db.SingleString("SELECT NoFPS FROM MS_TTS WHERE NoTTS = " + NoTTS);
logr = "BATAL FP<br>";
Db.Execute("UPDATE MS_TTS SET NoFPS = '', PrintFPS = 0 WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE REF_FP SET Status = 0 WHERE NoFPS = '" + nofp + "'");
}
/*Update status Akunting*/
int Akunting = Db.SingleInteger("SELECT Akunting FROM MS_TTS WHERE NoTTS = " + NoTTS);
if (Akunting == 1)
{
string NoVoucher = Db.SingleString("SELECT NoVoucher FROM MS_TTS WHERE NoTTS = '" + NoTTS + "'");
Akun.InsertAnomali("TTS", NoTTS, "", "", "VOID TTS", "", NoVoucher);
}
/************************/
//Log
string KetLog = logr
+ Cf.LogCapture(rsHeader)
+ Cf.LogList(rsDetil, "ALOKASI PELUNASAN")
;
Db.Execute("EXEC spLogTTS"
+ " 'VOID'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'" + KetLog + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
string Project = Db.SingleString("SELECT Project FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = (SELECT Ref FROM MS_TTS WHERE NoTTS = '" + NoTTS + "')");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("TTSEdit.aspx?NoTTS=" + NoTTS + "&done=1");
}
else
{
//Tidak bisa dihapus
nodel.Visible = true;
}
}
}
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'"//jangan diganti!!!!!!! bisa merubah flow program dibawah
+ " WHEN 'UJ' THEN 'UANG JAMINAN'"
+ " WHEN 'DN' THEN 'DISKON'"
+ " WHEN 'MB' THEN 'MERCHANT BANKING'"
+ " WHEN 'PP' THEN 'PENGHAPUSAN PIUTANG'"
+ " END AS CaraBayar2"
+ " FROM ISC064_FINANCEAR..MS_TTS WHERE NoTTS = " + NoTTS;
DataTable rs = Db.Rs(strSql);
if (rs.Rows.Count == 0)
{
Response.Redirect("/CustomError/Deleted.html");
}
else
{
System.Configuration.AppSettingsReader s = new System.Configuration.AppSettingsReader();
string JenisPPN = Db.SingleString("SELECT JenisPPN FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_KONTRAK WHERE NoKontrak = '" + Cf.Pk(rs.Rows[0]["Ref"]) + "'");
string HeaderPajak = "";
if (JenisPPN == "PEMERINTAH")
{
HeaderPajak = (string)s.GetValue("NoFPSPemerintah", typeof(string));
}
else if (JenisPPN == "KONSUMEN")
{
HeaderPajak = (string)s.GetValue("NoFPSKonsumen", typeof(string));
}
// lblNoFaktur.Text = HeaderPajak;
tbNoFaktur.Text = rs.Rows[0]["NoFPS"].ToString();
delfp.Enabled = rs.Rows[0]["NoFPS"].ToString() != "" ? true : false;
//bkmtr.Visible = false;
tglbkm.Text = Cf.Day(rs.Rows[0]["TglBKM"]);
if (rs.Rows[0]["TglBKM"] is DBNull)
{
tglbkm.Text = Cf.Day(rs.Rows[0]["TglTTS"]);
}
tgltts.Text = Cf.Day(rs.Rows[0]["TglTTS"]);
ket.Text = rs.Rows[0]["Ket"].ToString();
admBank.Text = Cf.Num(Convert.ToDecimal(rs.Rows[0]["AdminBank"]));
lebihBayar.Text = Cf.Num(Convert.ToDecimal(rs.Rows[0]["LebihBayar"])); //kurang bayar
lb.Text = Cf.Num(Convert.ToDecimal(rs.Rows[0]["LB"])); //lebih bayar
btnlog.Attributes["onclick"] = "location.href='LogPk.aspx?Tb=MS_TTS_LOG&Pk=" + NoTTS.PadLeft(7, '0') + "'";
btnslip.Attributes["onclick"] = "location.href='TTSSlip.aspx?NoTTS=" + NoTTS + "'";
btnvoid.Attributes["onclick"] = "if(confirm('"
+ "Apakah anda ingin membatalkan TTS nomor : " + NoTTS + " ?\\n"
+ "Perhatian bahwa proses ini TIDAK bisa dibalik."
+ "'))"
+ "{location.href='TTSVoid.aspx?NoTTS=" + NoTTS + "'}";
btnvoidfp.Attributes["onclick"] = "if(confirm('"
+ "Apakah anda ingin membatalkan TTS nomor : " + NoTTS + " dan membatalkan faktur pajaknya ?\\n"
+ "Perhatian bahwa proses ini TIDAK bisa dibalik."
+ "'))"
+ "{location.href='TTSVoid.aspx?fp=1&NoTTS=" + NoTTS + "'}";
btnvoid2.Attributes["onclick"] = "if(confirm('"
+ "Apakah anda ingin membatalkan dan mengembalikan uang TTS nomor : " + NoTTS + " ?\\n"
+ "Perhatian bahwa proses ini TIDAK bisa dibalik."
+ "'))"
+ "{location.href='TTSVoid.aspx?r=1&NoTTS=" + NoTTS + "'}";
//btnkw.Attributes["onclick"] = "if(confirm('"
// + "Apakah anda ingin membuka kwitansi untuk TTS nomor : "+NoTTS+" ?"
// + "'))"
// + "{location.href='TTSBkm.aspx?NoTTS="+NoTTS+"&TglBKM="+tglbkm.Text+"'}";
btnbatalkw.Attributes["onclick"] = "if(confirm('"
+ "Apakah anda ingin membatalkan kwitansi untuk TTS nomor : " + NoTTS + " ?\\n"
+ "Perhatian bahwa proses ini TIDAK bisa dibalik."
+ "'))"
+ "{location.href='TTSBkmVoid.aspx?NoTTS=" + NoTTS + "'}";
printTTS.HRef = "PrintTTS.aspx?NoTTS=" + NoTTS;
printBKM.HRef = "PrintBKM.aspx?NoTTS=" + NoTTS;
printFPS.HRef = "PrintFPS.aspx?NoTTS=" + NoTTS;
unit.Text = rs.Rows[0]["Unit"].ToString();
customer.Text = rs.Rows[0]["Customer"].ToString();
printTTS.InnerHtml = printTTS.InnerHtml + " (" + rs.Rows[0]["PrintTTS"] + ")";
printBKM.InnerHtml = printBKM.InnerHtml + " (" + rs.Rows[0]["PrintBKM"] + ")";
printFPS.InnerHtml = printFPS.InnerHtml + " (" + rs.Rows[0]["PrintFPS"] + ")";
kasir.Text = rs.Rows[0]["UserID"].ToString();
ip.Text = rs.Rows[0]["IP"].ToString();
tglInput.Text = Cf.Date(rs.Rows[0]["TglInput"]);
carabayar.Text = rs.Rows[0]["CaraBayar2"].ToString();
if (rs.Rows[0]["CaraBayar"].ToString() == "BG")
{
nobg.Text = rs.Rows[0]["NoBG"].ToString();
tglbg.Text = Cf.Day(rs.Rows[0]["TglBG"]);
titip.Text = rs.Rows[0]["Titip"].ToString();
tolak.Text = rs.Rows[0]["Tolak"].ToString();
if (tolak.Text != "")
{
tolak.Text = "Tolakan : " + tolak.Text;
}
}
if (rs.Rows[0]["CaraBayar"].ToString() == "KK")
{
nokk.Text = rs.Rows[0]["NoKK"].ToString();
bankkk.Text = rs.Rows[0]["BankKK"].ToString();
}
nilai.Text = Cf.Num(rs.Rows[0]["Total"]);
pph.Checked = (bool)rs.Rows[0]["Pph"];
string stat = rs.Rows[0]["Status"].ToString();
status.Text = stat;
if ((decimal)rs.Rows[0]["NilaiKembali"] != 0)
{
status.Text = status.Text
+ "<br><font style='font-size:9pt'>Reimburse : "
+ Cf.Num(rs.Rows[0]["NilaiKembali"]) + "</font>";
}
if (stat == "VOID")
{
status.ForeColor = Color.Red;
//tidak boleh void 2x
btnvoid.Disabled = true;
btnvoidfp.Disabled = true;
btnvoid2.Disabled = true;
//tidak bisa akses program-program bkm
printBKM.Visible = false;
printFPS.Visible = false;
btnkw.Enabled = false;
btnbatalkw.Disabled = true;
manualbkm.Enabled = false;
trAdm.Visible = false;
trLb.Visible = false;
tbNoFaktur.Enabled = false;
}
else if (stat == "POST")
{
status.ForeColor = Color.Blue;
bkminfo.Text = rs.Rows[0]["NoBKM"].ToString().PadLeft(7, '0')
+ " (" + Cf.Day(rs.Rows[0]["TglBKM"]) + ")";
//gak bisa void sebelum kw-nya dibatalkan
btnvoid.Disabled = true;
btnvoidfp.Disabled = true;
btnvoid2.Disabled = true;
btnslip.Disabled = true; //gak bisa edit slip
btnkw.Enabled = false; //gak boleh posting kw 2x
//set bkm
bkmtr.Visible = true;
tglbkm.Text = Cf.Day(rs.Rows[0]["TglBKM"]);
}
else
{
//belum ada kwitansi
printBKM.Visible = false;
printFPS.Visible = false;
btnbatalkw.Disabled = true;
manualbkm.Enabled = false;
tbNoFaktur.Enabled = false;
if (rs.Rows[0]["NoFPS"].ToString() == "")
{
btnvoidfp.Disabled = true;
}
}
FillTb(rs.Rows[0]["Tipe"].ToString());
if (rs.Rows[0]["Tipe"].ToString() != "TENANT")
{
alokasi.InnerHtml = "<a href='CustomerLunas.aspx?Tipe=" + rs.Rows[0]["Tipe"] + "&Ref=" + rs.Rows[0]["Ref"] + "'>"
+ "<b>Alokasi Pelunasan</b></a>";
}
manualtts.Text = rs.Rows[0]["ManualTTS"].ToString();
manualbkm.Text = rs.Rows[0]["ManualBKM"].ToString();
ddlAcc.Items.Add(new ListItem("Tidak berubah: " + rs.Rows[0]["Acc"].ToString(), rs.Rows[0]["Acc"].ToString()));
ddlAcc.SelectedIndex = ddlAcc.Items.Count - 1;
if (Func.CekAkunting(NoTTS))
{
lblAkunting.Text = "Transaksi sudah pernah diposting ke Akunting";
}
else
{
lblAkunting.Text = "";
}
if (Convert.ToInt16(rs.Rows[0]["SumberBayar"]) == 0)
{
sumberbayar.Text = "Dari Customer";
}
else
{
sumberbayar.Text = "Dari Bank";
}
// LeBron James, Kobe Bryant, Kevin Durant, Chris Paul, Dwight Howard.
if (rs.Rows[0]["Acc"].ToString() == "" || rs.Rows[0]["Acc"].ToString() == "0")
{
btnkw.Enabled = false;
}
if (Convert.ToBoolean(rs.Rows[0]["FOBO"]))
{
ok.Enabled = save.Enabled = false;
btnvoid.Attributes["disabled"] = "true;";
btnvoidfp.Attributes["disabled"] = "true;";
btnvoid2.Attributes["disabled"] = "true;";
}
if (Convert.ToInt32(rs.Rows[0]["PrintBKM"]) > 0)
{
//ok.Enabled = false;
//save.Enabled = false;
alasan.Text = "Kuitansi Sudah Beredar";
}
//Warning untuk kuitansi yang fobonya sudah ditarik
string fobo = Convert.ToInt32(rs.Rows[0]["FOBO"]).ToString();
string statTTS = rs.Rows[0]["Status"].ToString();
if ((fobo == "1") && (statTTS == "POST"))
{
statusFOBO.Text = "Data sudah ditarik ke Accounting";
tglbkm.Enabled = tgltts.Enabled = false;
btnbatalkw.Disabled = true;
}
}
}
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);
}
}
protected void Page_Load(object sender, System.EventArgs e)
{
Act.Pass();
Act.NoCache();
Act.CekInt("NoTTS");
DataTable rs = Db.Rs("SELECT * FROM MS_TTS WHERE NoTTS = " + NoTTS + " AND Status = 'BARU' AND Acc <> '' AND Acc <> '0'");
if (rs.Rows.Count == 0)
{
Response.Redirect("/CustomError/Deleted.html");
}
else
{
DataTable rsHeader = Db.Rs("SELECT "
+ " CONVERT(varchar, TglTTS, 106) AS [Tanggal]"
+ ",Tipe"
+ ",Ref AS [Ref.]"
+ ",Unit"
+ ",Customer"
+ ",CaraBayar AS [Cara Bayar]"
+ ",Ket AS [Keterangan]"
+ ",NoSlip AS [Slip Setoran]"
+ ",NoBG AS [No. BG]"
+ ",CONVERT(varchar, TglBG, 106) AS [Tanggal BG]"
+ ",Titip AS [Pengelola BG]"
+ ",Total"
+ ",NoFPS AS [No. Faktur Pajak]"
+ " FROM MS_TTS WHERE NoTTS = " + NoTTS);
string StatusLama = rs.Rows[0]["Status"].ToString();
#region logfile
string Tipe = Db.SingleString("SELECT Tipe FROM MS_TTS WHERE NoTTS = " + NoTTS);
string Tb = Sc.MktTb(Tipe);
string strSql = "";
if (Tipe != "TENANT")
{
strSql = "SELECT "
+ " CASE NoTagihan"
+ " WHEN 0 THEN 'UNALLOCATED ' + CONVERT(varchar,NilaiPelunasan,1)"
+ " ELSE (SELECT NamaTagihan FROM "+ Tb + "..MS_TAGIHAN WHERE NoUrut = l.NoTagihan AND NoKontrak = l.NoKontrak)"
+ " + ' ' + CONVERT(varchar,NilaiPelunasan,1)"
+ " END AS NamaTagihan"
+ " FROM " + Tb + "..MS_PELUNASAN AS l "
+ " WHERE NoTTS = " + NoTTS;
}
else
{
strSql = "SELECT "
+ " NamaTagihan + ' ' + CONVERT(varchar,NilaiTagihan,1) "
+ " FROM " + Tb + "..MS_TAGIHAN AS l "
+ " WHERE NoTTS = " + NoTTS;
}
#endregion
string Project = Db.SingleString("SELECT Project FROM MS_TTS WHERE NoTTS = '" + NoTTS + "'");
string NoBKM2 = Numerator.BKM(TglBKM.Month, TglBKM.Year, Project);
DataTable rsDetil = Db.Rs(strSql);
Db.Execute("EXEC spPostingTTS " + NoTTS + ",'" + TglBKM + "'");
Db.Execute("UPDATE MS_TTS SET ManualBKM = ManualTTS, NoBKM2='" + NoBKM2 + "', TglFP = '" + TglBKM + "' WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN SET NoBKM2='" + NoBKM2 + "' WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN_KPA SET SudahCair=1 WHERE NoTTS=" + NoTTS);
//Ambil Stok No. FP
string TipeTagihan = Db.SingleString("SELECT Tipe FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_TAGIHAN WHERE NoUrut = (SELECT TOP 1 NoTagihan FROM " + Mi.DbPrefix + "MARKETINGJUAL..MS_PELUNASAN WHERE NoTTS = '" + NoTTS + "')");
DataTable rsHeader2 = new DataTable();
if (TipeTagihan == "BF" || TipeTagihan == "DP" || TipeTagihan == "ANG")
{
DataTable fp = Db.Rs("SELECT * FROM REF_FP WHERE Status = 0 AND CONVERT(varchar,TglTerimaFP,112) < = '" + Cf.Tgl112(TglBKM) + "' AND Project = '" + Project + "'"); //disini
if (fp.Rows.Count > 0)
{
Db.Execute("UPDATE MS_TTS SET"
+ " NoFPS = '" + fp.Rows[0]["NoFPS"].ToString() + "'"
+ " WHERE NoTTS = " + NoTTS);
Db.Execute("UPDATE REF_FP SET"
+ " Status = 1"
+ " WHERE NoFPS = '" + fp.Rows[0]["NoFPS"].ToString() + "'");
rsHeader2 = Db.Rs("SELECT "
+ "NoFPS AS [No. Faktur Pajak]"
+ " FROM MS_TTS WHERE NoTTS = " + NoTTS);
}
}
DataTable StockFPS = Db.Rs("SELECT * FROM REF_FP WHERE CONVERT(varchar,TglTerimaFP,112) <= '" + Cf.Tgl112(Convert.ToDateTime(rs.Rows[0]["TglTTS"])) + "' AND Status = 0 AND Project = '" + Project + "'");
string kett = "";
if (StockFPS.Rows.Count >= 0)
{
if (StockFPS.Rows.Count <= 100)
{
kett = "Sisa No. Faktur Pajak yang tersedia : " + StockFPS.Rows.Count + ". Segera hub pihak Pajak.";
}
else
{
kett = "No. Faktur Pajak tersedia.";
}
}
string noSSP = AutoNoSSP();
Db.Execute("UPDATE MS_TTS SET NoSSP = '" + noSSP + "' WHERE NoTTS = '" + NoTTS + "' AND Project = '" + Project + "'");
// Log
string KetLog = Cf.LogCapture(rsHeader)
+ Cf.LogCapture(rsHeader2)
+ Cf.LogList(rsDetil, "ALOKASI PELUNASAN")
+ Environment.NewLine
+ "Warning : " + kett
;
Db.Execute("EXEC spLogTTS"
+ " 'POST'"
+ ",'" + Act.UserID + "'"
+ ",'" + Act.IP + "'"
+ ",'***BUKA KWITANSI***<br>" + KetLog + "'"
+ ",'" + NoTTS.ToString().PadLeft(7, '0') + "'"
);
decimal LogID = Db.SingleDecimal("SELECT TOP 1 LogID FROM MS_TTS_LOG ORDER BY LogID DESC");
Db.Execute("UPDATE MS_TTS_LOG SET Project = '" + Project + "' WHERE LogID = " + LogID);
Response.Redirect("TTSEdit.aspx?NoTTS=" + NoTTS + "&done=1");
}
}
