private void CariAkun(string index, TBAkunGrup akunGrup, List <ListAkun> listAkun, string bulan, string tahun)
    {
        int urutan = 1;

        foreach (var item in akunGrup.TBAkuns)
        {
            listAkun.Add(new ListAkun
            {
                TBAkunGrup = item.TBAkunGrup,
                IDAkun     = item.IDAkun,
                Nomor      = "&nbsp&nbsp&nbsp" + index + "." + urutan,
                Kode       = item.Kode,
                Grup       = false,
                ClassWarna = string.Empty,
                Nama       = item.Nama,
                Nominal    = (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                          .Where(item2 =>
                                                                 item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() - 1 &&
                                                                 item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt()).ToArray(), false) < 0 && item.TBAkunGrup.EnumSaldoNormal == (int)PilihanDebitKredit.Kredit ?

                              Math.Abs(Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                                   .Where(item2 =>
                                                                          item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() - 1 &&
                                                                          item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt()).ToArray(), false)) :

                              (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                           .Where(item2 =>
                                                                  item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() - 1 &&
                                                                  item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt()).ToArray(), false)))
            });

            urutan++;
        }
    }
Exemple #2
0
    private decimal HitungSaldo(string _idAkunGrup, string bulan, string tahun)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            PenggunaLogin pengguna = (PenggunaLogin)Session["PenggunaLogin"];

            decimal saldo    = 0;
            var     akunGrup = db.TBAkunGrups.FirstOrDefault(item => item.IDAkunGrup == (_idAkunGrup).ToInt());

            foreach (var item in akunGrup.TBAkuns.Where(item2 => item2.IDTempat == pengguna.IDTempat))
            {
                saldo += (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                      .Where(item2 =>
                                                             item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() &&
                                                             item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                             item2.TBJurnal.Keterangan.Contains("#SaldoAwal") &&
                                                             item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false) < 0 &&
                          item.TBAkunGrup.EnumSaldoNormal == (int)PilihanDebitKredit.Kredit ?

                          Math.Abs(Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                               .Where(item2 =>
                                                                      item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() &&
                                                                      item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() && item2.TBJurnal.Keterangan.Contains("#SaldoAwal") &&
                                                                      item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false)) :

                          (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                       .Where(item2 =>
                                                              item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() &&
                                                              item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() && item2.TBJurnal.Keterangan.Contains("#SaldoAwal") &&
                                                              item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false)));
            }
            return(saldo);
        }
    }
Exemple #3
0
    private List <ListAkun> LoadNeracaAktiva(DataClassesDatabaseDataContext db)
    {
        PenggunaLogin pengguna             = (PenggunaLogin)Session["PenggunaLogin"];
        decimal       TotalSaldoAwalAktiva = 0;

        List <ListAkun> listAkun = new List <ListAkun>();
        var             result   = db.TBAkunGrups.Where(item => item.IDAkunGrupParent == null &&
                                                        (item.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Aktiva) &&
                                                        (item.IDAkunGrup != 4 && item.IDAkunGrup != 5)).ToArray();

        //CARI AKUN GRUP
        CariAkunGrup2("1", result, listAkun);

        TotalSaldoAwalAktiva = (Akuntansi_Class.HitungSaldo(db.TBJurnalDetails
                                                            .Where(item2 =>
                                                                   item2.TBJurnal.Tanggal.Value.Month == (DropDownListBulan.SelectedItem.Value).ToInt() &&
                                                                   item2.TBJurnal.Tanggal.Value.Year == (DropDownListTahun.SelectedItem.Value).ToInt() &&
                                                                   item2.TBJurnal.Keterangan.Contains("#SaldoAwal") &&
                                                                   item2.TBAkun.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Aktiva &&
                                                                   item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false));

        RepeaterLaporanAktiva.DataSource = listAkun;
        RepeaterLaporanAktiva.DataBind();

        LabelTotalSaldoAktiva.Text = (TotalSaldoAwalAktiva).ToFormatHarga();


        return(listAkun);
    }
Exemple #4
0
    private void CariAkun(string index, TBAkunGrup akunGrup, List <ListAkun> listAkun, string bulan, string tahun, int idtempat)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            PenggunaLogin pengguna = (PenggunaLogin)Session["PenggunaLogin"];


            int urutan = 1;
            var DataJurnalSaldoAwal = db.TBJurnals.Where(item => item.Keterangan.Contains("#SaldoAwal") &&
                                                         item.Tanggal.Value.Month.ToString() == bulan && item.IDTempat == pengguna.IDTempat);

            foreach (var item in akunGrup.TBAkuns)
            {
                listAkun.Add(new ListAkun
                {
                    TBAkunGrup = item.TBAkunGrup,
                    IDAkun     = item.IDAkun,
                    Nomor      = "&nbsp&nbsp&nbsp" + index + "." + urutan,
                    Kode       = item.Kode,
                    Grup       = false,
                    ClassWarna = string.Empty,
                    Nama       = item.Nama,
                    Nominal    = item.TBAkunSaldoAwals.FirstOrDefault(item2 => item.IDAkun == item2.IDAkun &&
                                                                      item2.TanggalSaldoAwal.Value.Month.ToString() == bulan) == null ?

                                 ((Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                               .Where(item2 =>
                                                                      item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() - 1 &&
                                                                      item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                                      item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false) < 0 && item.TBAkunGrup.EnumSaldoNormal == (int)PilihanDebitKredit.Kredit ?

                                   Math.Abs(Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                                        .Where(item2 =>
                                                                               item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() - 1 &&
                                                                               item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                                               item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false))

                                                                            :

                                   (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                                .Where(item2 =>
                                                                       item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() - 1 &&
                                                                       item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                                       item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false)))) :

                                 DataJurnalSaldoAwal.FirstOrDefault(item2 => item2.TBJurnalDetails.FirstOrDefault().IDAkun == item.IDAkun) != null ? DataJurnalSaldoAwal.FirstOrDefault(item2 => item2.TBJurnalDetails.FirstOrDefault().IDAkun == item.IDAkun).IDTempat == pengguna.IDTempat ?
                                 item.TBAkunGrup.EnumSaldoNormal == (int)PilihanDebitKredit.Kredit ?
                                 Math.Abs(DataJurnalSaldoAwal.FirstOrDefault(item2 => item2.TBJurnalDetails.FirstOrDefault().IDAkun == item.IDAkun).TBJurnalDetails.FirstOrDefault().Kredit.Value) :
                                 DataJurnalSaldoAwal.FirstOrDefault(item2 => item2.TBJurnalDetails.FirstOrDefault().IDAkun == item.IDAkun).TBJurnalDetails.FirstOrDefault().Debit.Value :
                                 0 : 0,                                                /*: 0,*/

                    StatusSaldoAwal = DataJurnalSaldoAwal.FirstOrDefault(item2 => item2.TBJurnalDetails.FirstOrDefault().IDAkun == item.IDAkun) == null ? true : false
                });

                urutan++;
            }
        }
    }
Exemple #5
0
    protected void Page_Load(object sender, EventArgs e)
    {
        if (!IsPostBack)
        {
            DropDownListBulan.DataSource     = Akuntansi_Class.DropdownlistBulanLaporan();
            DropDownListBulan.DataValueField = "Value";
            DropDownListBulan.DataTextField  = "Text";
            DropDownListBulan.DataBind();
            DropDownListBulan.SelectedValue = (DateTime.Now.Month).ToString();

            LoadData();
        }
    }
Exemple #6
0
    public static decimal LaporanArusKas(string tahun)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            var ArusKas = db.TBAkuns
                          .Where(item => item.IDAkunGrup == (int)PilihanAkunGrup.Aset)
                          .Select(item =>
                                  Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                              .Where(item2 => item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt()).ToArray(), false)).ToArray();

            return(ArusKas.Sum(item => item));
        }
    }
    protected void Page_Load(object sender, EventArgs e)
    {
        if (!IsPostBack)
        {
            DropDownListBulan.Items.Clear();
            DropDownListBulan.Items.AddRange(Akuntansi_Class.DropdownlistBulanLaporan());
            DropDownListBulan.SelectedValue = DateTime.Now.Month.ToString();

            DropDownListTahun.Items.Clear();
            DropDownListTahun.Items.AddRange(Akuntansi_Class.DropdownlistTahunLaporan());
            DropDownListTahun.SelectedValue = DateTime.Now.Year.ToString();

            LoadData();
        }
    }
Exemple #8
0
    protected void ButtonExcel_Click(object sender, EventArgs e)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            PenggunaLogin Pengguna = (PenggunaLogin)Session["PenggunaLogin"];

            var _result = Akuntansi_Class.LaporanLabaRugi(DropDownListBulan.SelectedValue, DropDownListTahun.SelectedValue, true, Pengguna, "LabaRugi");
            LinkDownload.Visible = true;

            if (LinkDownload.Visible)
            {
                LinkDownload.HRef = Akuntansi_Class.LinkDownload;
            }
        }
    }
Exemple #9
0
    protected void ButtonExport_Click(object sender, EventArgs e)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            PenggunaLogin Pengguna = (PenggunaLogin)Session["PenggunaLogin"];

            var _result = Akuntansi_Class.LaporanBukuBesar(TextBoxTanggalPeriode1.Text, TextBoxTanggalPeriode2.Text, (DropDownListAkun.SelectedValue).ToInt(), true, Pengguna);
            LinkDownload.Visible = true;

            if (LinkDownload.Visible)
            {
                LinkDownload.HRef = Akuntansi_Class.LinkDownload;
            }
        }
    }
    protected void Page_Load(object sender, EventArgs e)
    {
        if (!IsPostBack)
        {
            using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
            {
                DropDownListBulan.Items.Clear();
                DropDownListBulan.Items.AddRange(Akuntansi_Class.DropdownlistBulanLaporan());
                DropDownListBulan.SelectedValue = DateTime.Now.Month.ToString();

                DropDownListTahun.Items.Clear();
                DropDownListTahun.Items.AddRange(Akuntansi_Class.DropdownlistTahunLaporan());
                DropDownListTahun.SelectedValue = DateTime.Now.Year.ToString();

                LoadNeraca(db);
            }
        }
    }
Exemple #11
0
    private void LoadData2(string _tgl1, string _tgl2)
    {
        PenggunaLogin Pengguna = (PenggunaLogin)Session["PenggunaLogin"];

        var _result = Akuntansi_Class.LaporanLabaRugi(false, Pengguna, "LabaRugi", _tgl1, _tgl2);

        #region MOD TEST
        LabelPenjualan.Text          = _result["NamaAkunPenjualan"];
        LabelNominalPenjualan.Text   = (_result["NominalAkunPenjualan"]).ToFormatHarga();
        LabelCOGS.Text               = _result["NamaAkunCOGS"];
        LabelNominalCOGS.Text        = (_result["NominalCOGS"]).ToFormatHarga();
        LabelNominalGrossProfit.Text = (_result["NominalGrossProfit"]).ToFormatHarga();
        LabelTotalOPEX.Text          = (_result["NominalOPEX"]).ToFormatHarga();
        LabelNominalEBIT.Text        = (_result["NominalEBIT"]).ToFormatHarga();
        #endregion

        RepeaterPemasukan.DataSource = _result["Pemasukan"];
        RepeaterPemasukan.DataBind();

        RepeaterPengeluaran.DataSource = _result["Pengeluaran"];
        RepeaterPengeluaran.DataBind();

        RepeaterPengeluaranTax.DataSource = _result["PengeluaranTax"];
        RepeaterPengeluaranTax.DataBind();

        var NetIncome = _result["NominalNetIncome"];

        if (NetIncome >= 0)
        {
            PanelProfit.Visible       = true;
            PanelLoss.Visible         = false;
            LabelNetIncomeProfit.Text = (NetIncome).ToFormatHarga();
        }
        else
        {
            PanelProfit.Visible     = false;
            PanelLoss.Visible       = true;
            LabelNetIncomeLoss.Text = (NetIncome).ToFormatHarga();
        }


        ButtonPrint2.OnClientClick = "return popitup('LabaRugiPrint.aspx" + "?Periode1=" + TextBoxTanggalPeriode1.Text + "&Periode2=" + TextBoxTanggalPeriode1.Text + "')";
    }
Exemple #12
0
    private void LoadData()
    {
        PenggunaLogin Pengguna = (PenggunaLogin)Session["PenggunaLogin"];

        var _result = Akuntansi_Class.LaporanLabaRugi(DropDownListBulan.SelectedValue, DropDownListTahun.SelectedValue, false, Pengguna, "LabaRugi");

        #region MOD TEST
        LabelPenjualan.Text          = _result["NamaAkunPenjualan"];
        LabelNominalPenjualan.Text   = Parse.ToFormatHarga(_result["NominalAkunPenjualan"]);
        LabelCOGS.Text               = _result["NamaAkunCOGS"];
        LabelNominalCOGS.Text        = Parse.ToFormatHarga(_result["NominalCOGS"]);
        LabelNominalGrossProfit.Text = Parse.ToFormatHarga(_result["NominalGrossProfit"]);
        LabelTotalOPEX.Text          = Parse.ToFormatHarga(_result["NominalOPEX"]);
        LabelNominalEBIT.Text        = Parse.ToFormatHarga(_result["NominalEBIT"]);
        #endregion

        RepeaterPemasukan.DataSource = _result["Pemasukan"];
        RepeaterPemasukan.DataBind();

        RepeaterPengeluaran.DataSource = _result["Pengeluaran"];
        RepeaterPengeluaran.DataBind();

        RepeaterPengeluaranTax.DataSource = _result["PengeluaranTax"];
        RepeaterPengeluaranTax.DataBind();

        var NetIncome = _result["NominalNetIncome"];

        if (NetIncome >= 0)
        {
            PanelProfit.Visible       = true;
            PanelLoss.Visible         = false;
            LabelNetIncomeProfit.Text = Parse.ToFormatHarga(NetIncome);
        }
        else
        {
            PanelProfit.Visible     = false;
            PanelLoss.Visible       = true;
            LabelNetIncomeLoss.Text = Parse.ToFormatHarga(NetIncome);
        }

        ButtonPrint.OnClientClick = "return popitup('LabaRugiPrint.aspx" + "?Bulan=" + DropDownListBulan.SelectedValue + "&Tahun=" + DropDownListTahun.SelectedValue + "')";
    }
Exemple #13
0
    private void CariAkun(string index, TBAkunGrup akunGrup, List <ListAkun> listAkun, string bulan, string tahun)
    {
        PenggunaLogin pengguna = (PenggunaLogin)Session["PenggunaLogin"];
        int           urutan   = 1;

        //BANU, disini orderby
        foreach (var item in akunGrup.TBAkuns.OrderBy(item => item.Kode))
        {
            listAkun.Add(new ListAkun
            {
                TBAkunGrup = item.TBAkunGrup,
                Nomor      = "&nbsp&nbsp&nbsp" + index + "." + urutan,
                Kode       = item.Kode,
                Grup       = false,
                ClassWarna = string.Empty,
                Nama       = item.Nama,
                Nominal    = (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                          .Where(item2 =>
                                                                 item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() &&
                                                                 item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                                 item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false) < 0 && item.TBAkunGrup.EnumSaldoNormal == (int)PilihanDebitKredit.Kredit && item.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Pasiva ?

                              Math.Abs(Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                                   .Where(item2 =>
                                                                          item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() &&
                                                                          item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                                          item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false)) :

                              (Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                           .Where(item2 =>
                                                                  item2.TBJurnal.Tanggal.Value.Month == (bulan).ToInt() &&
                                                                  item2.TBJurnal.Tanggal.Value.Year == (tahun).ToInt() &&
                                                                  item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false))),
                GeneralLedger       = "return popitup('/WITAkuntansi/BukuBesar.aspx?id=" + item.IDAkun + "&month=" + DropDownListBulan.SelectedItem.Value + "')",
                StatusGeneralLedger = true
            });

            urutan++;
        }
    }
Exemple #14
0
    private List <ListAkun> LoadNeracaPasiva(DataClassesDatabaseDataContext db)
    {
        PenggunaLogin pengguna                = (PenggunaLogin)Session["PenggunaLogin"];
        decimal       TotalSaldoAwalPasiva    = 0;
        decimal       LabaRugiBerjalan        = 0;
        decimal       LabaRugiBulanSebelumnya = 0;

        List <ListAkun> listAkun = new List <ListAkun>();
        var             result   = db.TBAkunGrups.Where(item => item.IDAkunGrupParent == null &&
                                                        (item.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Pasiva) &&
                                                        (item.IDAkunGrup != 4 && item.IDAkunGrup != 5)).ToArray();

        //CARI AKUN GRUP
        CariAkunGrup2("1", result, listAkun);

        var dataBulanIni        = Akuntansi_Class.LaporanLabaRugi(DropDownListBulan.SelectedItem.Value, DropDownListTahun.SelectedItem.Value, false, pengguna, "");
        var dataBulanSebelumnya = Akuntansi_Class.LaporanLabaRugi(((DropDownListBulan.SelectedItem.Value).ToInt() - 1).ToString(), DropDownListTahun.SelectedItem.Value, false, pengguna, "");

        LabaRugiBerjalan        = dataBulanIni["TotalLabaRugi"];
        LabaRugiBulanSebelumnya = dataBulanSebelumnya["TotalLabaRugi"];

        TotalSaldoAwalPasiva = Math.Abs((Akuntansi_Class.HitungSaldo(db.TBJurnalDetails
                                                                     .Where(item2 =>
                                                                            item2.TBJurnal.Tanggal.Value.Month == (DropDownListBulan.SelectedItem.Value).ToInt() &&
                                                                            item2.TBJurnal.Tanggal.Value.Year == (DropDownListTahun.SelectedItem.Value).ToInt() &&
                                                                            item2.TBJurnal.Keterangan.Contains("#SaldoAwal") &&
                                                                            item2.TBAkun.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Pasiva &&
                                                                            item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false)));

        LabelLabaRugiBulanBerjalan.Text   = (LabaRugiBerjalan).ToFormatHarga();
        LabelLabaRugiBulanSebelumnya.Text = (LabaRugiBulanSebelumnya).ToFormatHarga();

        RepeaterLaporanPasiva.DataSource = listAkun;
        RepeaterLaporanPasiva.DataBind();

        LabelTotalSaldoPasiva.Text = (TotalSaldoAwalPasiva).ToFormatHarga();

        return(listAkun);
    }
Exemple #15
0
    private List <ListAkun> LoadNeraca(DataClassesDatabaseDataContext db)
    {
        PenggunaLogin   pengguna = (PenggunaLogin)Session["PenggunaLogin"];
        List <ListAkun> listAkun = new List <ListAkun>();

        var result = db.TBAkunGrups.Where(item => item.IDAkunGrupParent == null &&
                                          (item.IDAkunGrup != 4 && item.IDAkunGrup != 5)).ToArray();

        decimal TotalAktiva             = 0;
        decimal TotalPasiva             = 0;
        decimal LabaRugiBerjalan        = 0;
        decimal LabaRugiBulanSebelumnya = 0;

        //CARI AKUN GRUP
        CariAkunGrup("1", result, listAkun);

        var dataBulanIni        = Akuntansi_Class.LaporanLabaRugi(DropDownListBulan.SelectedItem.Value, DropDownListTahun.SelectedItem.Value, false, pengguna, "");
        var dataBulanSebelumnya = Akuntansi_Class.LaporanLabaRugi(((DropDownListBulan.SelectedItem.Value).ToInt() - 1).ToString(), DropDownListTahun.SelectedItem.Value, false, pengguna, "");


        LabaRugiBerjalan        = dataBulanIni["TotalLabaRugi"];
        LabaRugiBulanSebelumnya = dataBulanSebelumnya["TotalLabaRugi"];

        TotalAktiva = listAkun.Where(item => item.Grup == false).Where(item => item.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Aktiva).Sum(item2 => item2.Nominal);
        TotalPasiva = listAkun.Where(item => item.Grup == false).Where(item => item.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Pasiva).Sum(item2 => item2.Nominal) + LabaRugiBerjalan +
                      LabaRugiBulanSebelumnya;

        LabelLabaRugiBulanBerjalan.Text   = (LabaRugiBerjalan).ToFormatHarga();
        LabelLabaRugiBulanSebelumnya.Text = (LabaRugiBulanSebelumnya).ToFormatHarga();

        LabelTotalSaldoAktiva.Text = (TotalAktiva).ToFormatHarga();
        LabelTotalSaldoPasiva.Text = (TotalPasiva).ToFormatHarga();

        RepeaterLaporan.DataSource = listAkun;
        RepeaterLaporan.DataBind();
        ButtonPrint.OnClientClick = "return popitup('NeracaPrint.aspx" + "?Bulan=" + DropDownListBulan.SelectedItem.Value + "&Tahun=" + DropDownListTahun.SelectedItem.Text + "')";

        return(listAkun);
    }
    private List <ListAkun> LoadNeraca(DataClassesDatabaseDataContext db)
    {
        PenggunaLogin   pengguna = (PenggunaLogin)Session["PenggunaLogin"];
        List <ListAkun> listAkun = new List <ListAkun>();

        var result = db.TBAkunGrups.Where(item => item.IDAkunGrupParent == null &&
                                          (item.IDAkunGrup != 4 && item.IDAkunGrup != 5)).ToArray();

        decimal TotalAktiva             = 0;
        decimal TotalPasiva             = 0;
        decimal LabaRugiBerjalan        = 0;
        decimal LabaRugiBulanSebelumnya = 0;

        int bulan = int.Parse(Request.QueryString["Bulan"]);
        int tahun = int.Parse(Request.QueryString["Tahun"]);

        //CARI AKUN GRUP
        CariAkunGrup("1", result, listAkun);

        var dataBulanIni        = Akuntansi_Class.LaporanLabaRugi(bulan.ToString(), tahun.ToString(), false, pengguna, "");
        var dataBulanSebelumnya = Akuntansi_Class.LaporanLabaRugi((bulan - 1).ToString(), tahun.ToString(), false, pengguna, "");


        LabaRugiBerjalan        = dataBulanIni["TotalLabaRugi"];
        LabaRugiBulanSebelumnya = dataBulanSebelumnya["TotalLabaRugi"];

        TotalAktiva = listAkun.Where(item => item.Grup == false).Where(item => item.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Aktiva).Sum(item2 => item2.Nominal);
        TotalPasiva = listAkun.Where(item => item.Grup == false).Where(item => item.TBAkunGrup.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Pasiva).Sum(item2 => item2.Nominal) + LabaRugiBerjalan +
                      LabaRugiBulanSebelumnya;

        LabelLabaRugiBulanBerjalan.Text   = LabaRugiBerjalan.ToFormatHarga();
        LabelLabaRugiBulanSebelumnya.Text = LabaRugiBulanSebelumnya.ToFormatHarga();

        LabelTotalSaldoAktiva.Text = TotalAktiva.ToFormatHarga();
        LabelTotalSaldoPasiva.Text = TotalPasiva.ToFormatHarga();

        return(listAkun);
    }
Exemple #17
0
    public static Dictionary <string, dynamic> LaporanArusKas(string bulan, string tahun)
    {
        Dictionary <string, dynamic> Result = new Dictionary <string, dynamic>();

        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            var Akun = db.TBAkuns
                       .Where(item => item.IDAkunGrup == (int)PilihanAkunGrup.Aset)
                       .Select(item => new
            {
                Nama      = item.Kode + " - " + item.Nama,
                BulanLalu = Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                        .Where(item2 =>
                                                               item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt() &&
                                                               item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() - 1).ToArray(), false),

                BulanIni = Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                       .Where(item2 =>
                                                              item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt() &&
                                                              item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt()).ToArray(), false)
            }).ToArray()
                       .Select(item => new
            {
                item.Nama,
                item.BulanLalu,
                item.BulanIni,
                Perubahan = item.BulanIni - item.BulanLalu
            });

            Result.Add("LaporanArusKas", Akun);
            Result.Add("TotalBulanLalu", Akun.Sum(item => item.BulanLalu));
            Result.Add("TotalBulanIni", Akun.Sum(item => item.BulanIni));
            Result.Add("TotalPerubahan", Akun.Sum(item => item.Perubahan));
        }

        return(Result);
    }
Exemple #18
0
    private void LoadData2(string _tgl1, string _tgl2)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            PenggunaLogin Pengguna = (PenggunaLogin)Session["PenggunaLogin"];

            #region DEFAULT
            TBStore _store = db.TBStores.FirstOrDefault();

            var Bulan = Request.QueryString["Bulan"];
            var Tahun = Request.QueryString["Tahun"];

            LabelPeriode.Text      = "Bulan " + Bulan + "/" + Tahun;
            LabelNamaPencetak.Text = Pengguna.NamaLengkap;
            LabelTanggalCetak.Text = DateTime.Now.ToString("d MMMM yyyy");

            LabelNamaStore.Text    = _store.Nama;
            LabelAlamatStore.Text  = _store.Alamat;
            LabelTeleponStore.Text = _store.TeleponLain + " / " + _store.Handphone;
            LabelWebsite.Text      = _store.Website;
            #endregion

            var _result = Akuntansi_Class.LaporanLabaRugi(false, Pengguna, "LabaRugi", _tgl1, _tgl2);

            RepeaterPemasukan.DataSource = _result["Pemasukan"];
            RepeaterPemasukan.DataBind();

            RepeaterPengeluaran.DataSource = _result["Pengeluaran"];
            RepeaterPengeluaran.DataBind();

            #region MOD TEST
            LabelPenjualan.Text          = _result["NamaAkunPenjualan"];
            LabelNominalPenjualan.Text   = Parse.ToFormatHarga(_result["NominalAkunPenjualan"]);
            LabelCOGS.Text               = _result["NamaAkunCOGS"];
            LabelNominalCOGS.Text        = Parse.ToFormatHarga(_result["NominalCOGS"]);
            LabelNominalGrossProfit.Text = Parse.ToFormatHarga(_result["NominalGrossProfit"]);
            LabelTotalOPEX.Text          = Parse.ToFormatHarga(_result["NominalOPEX"]);
            LabelNominalEBIT.Text        = Parse.ToFormatHarga(_result["NominalEBIT"]);
            #endregion

            RepeaterPemasukan.DataSource = _result["Pemasukan"];
            RepeaterPemasukan.DataBind();

            RepeaterPengeluaran.DataSource = _result["Pengeluaran"];
            RepeaterPengeluaran.DataBind();

            RepeaterPengeluaranTax.DataSource = _result["PengeluaranTax"];
            RepeaterPengeluaranTax.DataBind();

            var NetIncome = _result["NominalNetIncome"];

            if (NetIncome >= 0)
            {
                PanelProfit.Visible       = true;
                PanelLoss.Visible         = false;
                LabelNetIncomeProfit.Text = NetIncome.ToFormatHarga();
            }
            else
            {
                PanelProfit.Visible     = false;
                PanelLoss.Visible       = true;
                LabelNetIncomeLoss.Text = NetIncome.ToFormatHarga();
            }
        }
    }
Exemple #19
0
    public static Dictionary <string, dynamic> LaporanLabaRugi(string bulan, string tahun, bool _excel, PenggunaLogin pengguna, string tipeLaporan)
    {
        Dictionary <string, dynamic> Result = new Dictionary <string, dynamic>();

        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            var Pemasukan = db.TBAkuns
                            .Where(item => item.TBAkunGrup.IDAkunGrupParent == 4)
                            .Select(item => new
            {
                item.IDAkun,
                item.Nama,
                Saldo = HitungSaldo(item.TBJurnalDetails
                                    .Where(item2 =>
                                           item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt() &&
                                           item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() &&
                                           item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), true)
            }).ToArray();

            var Pengeluaran = db.TBAkuns
                              .Where(item => item.TBAkunGrup.IDAkunGrupParent == 5)
                              .Select(item => new
            {
                TBAkunGrup = item.TBAkunGrup,
                item.Nama,
                item.IDAkun,
                Saldo = HitungSaldo(item.TBJurnalDetails
                                    .Where(item2 =>
                                           item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt() &&
                                           item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() &&
                                           item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), true)
            }).ToArray();

            var OPEX = Pengeluaran.Where(item => item.TBAkunGrup.Nama != "Taxation" && item.IDAkun != 404 && item.Nama != "Beban Bunga");
            var PengeluaranTaxInterest = Pengeluaran.Where(item => item.TBAkunGrup.Nama == "Taxation" || item.Nama == "Beban Bunga");


            decimal TotalPemasukan   = Pemasukan.Sum(item => item.Saldo);
            decimal TotalPengeluaran = Pengeluaran.Sum(item => item.Saldo);
            decimal TotalLabaRugi    = TotalPemasukan - TotalPengeluaran;

            #region MOD TEST
            string  NamaAkunPenjualan    = Pemasukan.FirstOrDefault(item => item.Nama.ToUpper() == "PENJUALAN").Nama;
            decimal NominalAkunPenjualan = Pemasukan.FirstOrDefault(item => item.Nama.ToUpper() == "PENJUALAN").Saldo;

            string  NamaAkunCOGS       = Pengeluaran.FirstOrDefault(item => item.Nama == "Harga Pokok Penjualan").Nama;
            decimal NominalCOGS        = Pengeluaran.FirstOrDefault(item => item.Nama == "Harga Pokok Penjualan").Saldo;
            decimal NominalGrossProfit = NominalAkunPenjualan - NominalCOGS;
            decimal NominalOPEX        = OPEX.Sum(item2 => item2.Saldo);
            decimal NominalEBIT        = NominalGrossProfit - NominalOPEX + Pemasukan.Where(item => item.IDAkun != 388).Sum(item2 => item2.Saldo);
            decimal NominalNetIncome   = NominalEBIT - PengeluaranTaxInterest.Sum(item => item.Saldo);

            Result.Add("NamaAkunPenjualan", NamaAkunPenjualan);
            Result.Add("NominalAkunPenjualan", NominalAkunPenjualan);
            Result.Add("NamaAkunCOGS", NamaAkunCOGS);
            Result.Add("NominalOPEX", NominalOPEX);
            Result.Add("NominalCOGS", NominalCOGS);
            Result.Add("NominalGrossProfit", NominalGrossProfit);
            Result.Add("NominalEBIT", NominalEBIT);
            Result.Add("NominalNetIncome", NominalNetIncome);

            #endregion

            Result.Add("Pemasukan", Pemasukan.Where(item => item.IDAkun != 388));
            Result.Add("Pengeluaran", OPEX);
            Result.Add("PengeluaranTax", PengeluaranTaxInterest);
            Result.Add("TotalPemasukan", TotalPemasukan);
            Result.Add("TotalPengeluaran", TotalPengeluaran);
            Result.Add("TotalLabaRugi", TotalLabaRugi);

            if (_excel)
            {
                string _bulan = DateTime.Parse(int.Parse(bulan) + "/" + "01" + "/" + "2016").ToString("MMMM", new CultureInfo("id-ID"));

                if (tipeLaporan == "LabaRugi")
                {
                    #region EXCEL LABA RUGI
                    Excel_Class    Excel_Class = new Excel_Class(pengguna, "Laba Rugi", _bulan + " - " + tahun, 5);
                    ExcelWorksheet Worksheet   = Excel_Class.Worksheet;

                    using (var range = Worksheet.Cells[1, 1, 2, 2])
                    {
                        range.Style.Font.Bold           = true;
                        range.Merge                     = true;
                        range.Style.HorizontalAlignment = ExcelHorizontalAlignment.Center;
                        range.Style.VerticalAlignment   = ExcelVerticalAlignment.Center;
                    }
                    Excel_Class.Content(1, 1, "Pemasukan");

                    using (var range = Worksheet.Cells[1, 3, 2, 4])
                    {
                        range.Style.Font.Bold           = true;
                        range.Merge                     = true;
                        range.Style.HorizontalAlignment = ExcelHorizontalAlignment.Center;
                        range.Style.VerticalAlignment   = ExcelVerticalAlignment.Center;
                    }
                    Excel_Class.Content(1, 3, "Pengeluaran");

                    Worksheet.Cells[3, 1].Value = "Akun";
                    Worksheet.Cells[3, 2].Value = "Saldo";
                    Worksheet.Cells[3, 3].Value = "Akun";
                    Worksheet.Cells[3, 4].Value = "Saldo";

                    int index = 4;

                    foreach (var item in Pemasukan)
                    {
                        Excel_Class.Content(index, 1, item.Nama);
                        Excel_Class.Content(index, 2, item.Saldo);
                        index++;
                    }

                    index = 4;

                    foreach (var item in Pengeluaran)
                    {
                        Excel_Class.Content(index, 3, item.Nama);
                        Excel_Class.Content(index, 4, item.Saldo);
                        index++;
                    }

                    Excel_Class.Save();

                    linkDownload = Excel_Class.LinkDownload;
                    #endregion
                }
                else
                {
                    var AktivaPasiva = db.TBAkuns.Where(item =>
                                                        item.TBAkunGrup.IDAkunGrupParent != 4 &&
                                                        item.TBAkunGrup.IDAkunGrupParent != 5)
                                       .ToArray()
                                       .Select(item => new
                    {
                        item.TBAkunGrup.EnumJenisAkunGrup,
                        item.TBAkunGrup.EnumSaldoNormal,
                        Grup = item.TBAkunGrup.Nama,
                        item.Nama,
                        Saldo = Akuntansi_Class.HitungSaldo(item.TBJurnalDetails
                                                            .Where(item2 =>
                                                                   item2.TBJurnal.Tanggal.Value.Month == bulan.ToInt() &&
                                                                   item2.TBJurnal.Tanggal.Value.Year == tahun.ToInt() &&
                                                                   item2.TBJurnal.IDTempat == pengguna.IDTempat).ToArray(), false)
                    })
                                       .Select(item => new
                    {
                        item.EnumJenisAkunGrup,
                        item.EnumSaldoNormal,
                        item.Grup,
                        item.Nama,
                        Saldo = (item.Saldo < 0) && item.EnumSaldoNormal == (int)PilihanDebitKredit.Kredit ? Math.Abs(item.Saldo) : item.Saldo
                    });

                    var _aktiva = AktivaPasiva.Where(item => item.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Aktiva);
                    var _pasiva = AktivaPasiva.Where(item => item.EnumJenisAkunGrup == (int)PilihanJenisAkunGrup.Pasiva);

                    #region EXCEL NERACA
                    Excel_Class    Excel_Class = new Excel_Class(pengguna, "Laba Rugi", _bulan + " - " + tahun, 5);
                    ExcelWorksheet Worksheet   = Excel_Class.Worksheet;

                    using (var range = Worksheet.Cells[1, 1, 2, 3])
                    {
                        range.Style.Font.Bold           = true;
                        range.Merge                     = true;
                        range.Style.HorizontalAlignment = ExcelHorizontalAlignment.Center;
                        range.Style.VerticalAlignment   = ExcelVerticalAlignment.Center;
                    }
                    Excel_Class.Content(1, 1, "Aktiva");

                    using (var range = Worksheet.Cells[1, 4, 2, 6])
                    {
                        range.Style.Font.Bold           = true;
                        range.Merge                     = true;
                        range.Style.HorizontalAlignment = ExcelHorizontalAlignment.Center;
                        range.Style.VerticalAlignment   = ExcelVerticalAlignment.Center;
                    }
                    Excel_Class.Content(1, 4, "Pasiva");

                    Worksheet.Cells[3, 1].Value = "Tipe";
                    Worksheet.Cells[3, 2].Value = "Akun";
                    Worksheet.Cells[3, 3].Value = "Saldo";
                    Worksheet.Cells[3, 4].Value = "Tipe";
                    Worksheet.Cells[3, 5].Value = "Akun";
                    Worksheet.Cells[3, 6].Value = "Saldo";


                    int index = 4;

                    foreach (var item in _aktiva)
                    {
                        Excel_Class.Content(index, 1, item.Grup);
                        Excel_Class.Content(index, 2, item.Nama);
                        Excel_Class.Content(index, 3, item.Saldo);
                        index++;
                    }

                    index = 4;

                    foreach (var item in _pasiva)
                    {
                        Excel_Class.Content(index, 4, item.Grup);
                        Excel_Class.Content(index, 5, item.Nama);
                        Excel_Class.Content(index, 6, item.Saldo);
                        index++;
                    }
                    Excel_Class.Content(index + 1, 4, "Laba/Rugi Bulan Berjalan");
                    Excel_Class.Content(index + 1, 5, "");
                    Excel_Class.Content(index + 1, 6, TotalLabaRugi);

                    Excel_Class.Save();

                    linkDownload = Excel_Class.LinkDownload;
                    #endregion
                }
            }
        }

        return(Result);
    }
Exemple #20
0
    protected void ButtonExcel_Click(object sender, EventArgs e)
    {
        using (DataClassesDatabaseDataContext db = new DataClassesDatabaseDataContext())
        {
            PenggunaLogin pengguna = (PenggunaLogin)Session["PenggunaLogin"];

            Excel_Class    Excel_Class = new Excel_Class(pengguna, "Neraca", DropDownListBulan.SelectedItem.Text + " " + DropDownListTahun.SelectedItem.Text, 4);
            var            result      = new Excel_Class(pengguna, "Neraca", DropDownListBulan.SelectedItem.Text + " " + DropDownListTahun.SelectedItem.Text, 4);
            ExcelWorksheet Worksheet   = Excel_Class.Worksheet;

            Excel_Class.Header(1, "No");
            Excel_Class.Header(2, "Kode");
            Excel_Class.Header(3, "Nama");
            Excel_Class.Header(4, "Nominal");

            Excel_Class.SetBackground(1, 1, Color.Black);
            Excel_Class.SetBackground(1, 2, Color.Black);
            Excel_Class.SetBackground(1, 3, Color.Black);
            Excel_Class.SetBackground(1, 4, Color.Black);
            Excel_Class.SetColor(1, 1, Color.White);
            Excel_Class.SetColor(1, 2, Color.White);
            Excel_Class.SetColor(1, 3, Color.White);
            Excel_Class.SetColor(1, 4, Color.White);

            int index = 2;

            foreach (var item in LoadNeraca(db))
            {
                if (item.TBAkunGrup == null)
                {
                    Excel_Class.SetBackground(index, 1, Color.LightGreen);
                    Excel_Class.SetBackground(index, 2, Color.LightGreen);
                    Excel_Class.SetBackground(index, 3, Color.LightGreen);
                    Excel_Class.SetBackground(index, 4, Color.LightGreen);
                    Excel_Class.SetColor(index, 1, Color.Black);
                    Excel_Class.SetColor(index, 2, Color.Black);
                    Excel_Class.SetColor(index, 3, Color.Black);
                    Excel_Class.SetColor(index, 4, Color.Black);
                }
                else
                {
                    if (item.Grup == true)
                    {
                        Excel_Class.SetBackground(index, 1, Color.LightYellow);
                        Excel_Class.SetBackground(index, 2, Color.LightYellow);
                        Excel_Class.SetBackground(index, 3, Color.LightYellow);
                        Excel_Class.SetBackground(index, 4, Color.LightYellow);
                        Excel_Class.SetColor(index, 1, Color.Black);
                        Excel_Class.SetColor(index, 2, Color.Black);
                        Excel_Class.SetColor(index, 3, Color.Black);
                        Excel_Class.SetColor(index, 4, Color.Black);
                    }
                }
                Excel_Class.Content(index, 1, item.Nomor.Replace("&nbsp", ""));
                Excel_Class.Content(index, 2, item.Grup == true ? string.Empty : item.Kode);
                Excel_Class.Content(index, 3, item.Nama);
                Excel_Class.Content(index, 4, item.Grup == true ? string.Empty : item.Nominal.ToString());

                index++;
            }

            List <ListAkun> listAkun = new List <ListAkun>();
            var             result2  = db.TBAkunGrups.Where(item => item.IDAkunGrupParent == null &&
                                                            (item.IDAkunGrup != 4 && item.IDAkunGrup != 5)).ToArray();

            //CARI AKUN GRUP
            CariAkunGrup("1", result2, listAkun);

            var dataBulanIni        = Akuntansi_Class.LaporanLabaRugi(DropDownListBulan.SelectedItem.Value, DropDownListTahun.SelectedItem.Value, false, pengguna, "");
            var dataBulanSebelumnya = Akuntansi_Class.LaporanLabaRugi(((DropDownListBulan.SelectedItem.Value).ToInt() - 1).ToString(), DropDownListTahun.SelectedItem.Value, false, pengguna, "");


            decimal LabaRugiBerjalan        = dataBulanIni["TotalLabaRugi"];
            decimal LabaRugiBulanSebelumnya = dataBulanSebelumnya["TotalLabaRugi"];

            Excel_Class.Content(index, 1, "Laba Rugi Bulan Berjalan");
            Excel_Class.Content(index, 2, "");
            Excel_Class.Content(index, 3, "");
            Excel_Class.Content(index, 4, LabaRugiBerjalan);

            Excel_Class.Content(index + 1, 1, "Laba Rugi Bulan Sebelumnya");
            Excel_Class.Content(index + 1, 2, "");
            Excel_Class.Content(index + 1, 3, "");
            Excel_Class.Content(index + 1, 4, LabaRugiBulanSebelumnya);

            Excel_Class.Save();

            LinkDownload.Visible = true;
            ButtonExcel.Visible  = false;
            if (LinkDownload.Visible)
            {
                LinkDownload.HRef = Excel_Class.LinkDownload;
            }
        }
    }