Esempio n. 1
0
        private void cmdAfstemt_Click(object sender, EventArgs e)
        {
            int       count     = 0;
            tblafstem recAfstem = new tblafstem
            {
                udskriv = true
            };

            foreach (ListViewItem lvi in lvwAfstemBank.Items)
            {
                string       keyval       = lvi.Name;
                int          pid          = int.Parse(keyval);
                tblbankkonto recBankkonto = (from b in Program.dbDataTransSumma.tblbankkontos where b.pid == pid select b).First();
                recAfstem.tblbankkontos.Add(recBankkonto);
                count++;
            }
            foreach (ListViewItem lvi in lvwAfstemTrans.Items)
            {
                string  keyval   = lvi.Name;
                int     pid      = int.Parse(keyval);
                tbltran recTrans = (from b in Program.dbDataTransSumma.tbltrans where b.pid == pid select b).First();
                recAfstem.tbltrans.Add(recTrans);
                count++;
            }
            if (count > 0)
            {
                Program.dbDataTransSumma.tblafstems.InsertOnSubmit(recAfstem);
                Program.dbDataTransSumma.SubmitChanges();
                this.lvwAfstemBank.Items.Clear();
                this.lvwAfstemTrans.Items.Clear();
                this.lvwSumBank.Items.Clear();
                this.lvwSumTrans.Items.Clear();
            }
        }
Esempio n. 2
0
        private void importerTransaktionerToolStripMenuItem_Click(object sender, EventArgs e)
        {
            int?     lastBilag      = null;
            string   Kontonavn      = null;
            tblbilag recBilag       = null;
            var      qryPosteringer = from p in Program.karPosteringer
                                      join b in Program.dbDataTransSumma.tbltrans on new { p.Regnskabid, p.Id, p.Nr } equals new { Regnskabid = b.regnskabid, Id = b.id, Nr = b.nr } into tbltrans
            from b in tbltrans.DefaultIfEmpty(new tbltran {
                pid = 0, regnskabid = null, id = null, nr = null
            })
            where b.pid == 0
            orderby p.Regnskabid, p.Bilag, p.Id, p.Nr
            select p;
            int antal = qryPosteringer.Count();

            foreach (var p in qryPosteringer)
            {
                if ((!(p.Bilag == null)) && (lastBilag != p.Bilag))
                {
                    try
                    {
                        recBilag = (from b in Program.dbDataTransSumma.tblbilags
                                    where b.regnskabid == p.Regnskabid && b.bilag == p.Bilag
                                    select b).First();
                    }
                    catch
                    {
                        recBilag = new tblbilag
                        {
                            regnskabid = p.Regnskabid,
                            bilag      = p.Bilag,
                            dato       = p.Dato,
                            udskriv    = true,
                        };
                        Program.dbDataTransSumma.tblbilags.InsertOnSubmit(recBilag);
                    }
                }

                try
                {
                    Kontonavn = (from b in Program.karKontoplan where b.Kontonr == p.Konto select b.Kontonavn).First();
                }
                catch
                {
                    Kontonavn = null;
                }

                tbltran recTrans = new tbltran
                {
                    regnskabid = p.Regnskabid,
                    tekst      = p.Tekst,
                    kontonr    = p.Konto,
                    kontonavn  = Kontonavn,
                    id         = p.Id,
                    nr         = p.Nr,
                    belob      = p.Nettobeløb + p.Momsbeløb,
                    moms       = p.Momsbeløb,
                    debet      = (p.Nettobeløb >= 0) ? p.Nettobeløb : (decimal?)null,
                    kredit     = (p.Nettobeløb < 0) ? -p.Nettobeløb : (decimal?)null,
                };
                Program.dbDataTransSumma.tbltrans.InsertOnSubmit(recTrans);
                if (!(p.Bilag == 0))
                {
                    recBilag.tbltrans.Add(recTrans);
                }
                lastBilag = p.Bilag;
            }
            Program.dbDataTransSumma.SubmitChanges();


            lastBilag = 0;
            var qryKladder = from k in Program.karKladder
                             join b in Program.dbDataTransSumma.tblkladders on new { k.Regnskabid, k.Id } equals new { Regnskabid = b.regnskabid, Id = b.id } into tblkladder
            from b in tblkladder.DefaultIfEmpty(new tblkladder {
                pid = 0, regnskabid = null, id = null
            })
            where b.pid == 0
            orderby k.Regnskabid, k.Bilag, k.Id
            select k;

            antal = qryKladder.Count();
            foreach (var k in qryKladder)
            {
                if ((!(k.Bilag == null)) && (lastBilag != k.Bilag))
                {
                    try
                    {
                        recBilag = (from b in Program.dbDataTransSumma.tblbilags
                                    where b.regnskabid == k.Regnskabid && b.bilag == k.Bilag
                                    select b).First();
                    }
                    catch
                    {
                        recBilag = new tblbilag
                        {
                            regnskabid = k.Regnskabid,
                            bilag      = k.Bilag,
                            dato       = k.Dato,
                            udskriv    = true,
                        };
                        Program.dbDataTransSumma.tblbilags.InsertOnSubmit(recBilag);
                    }
                }

                tblkladder recKladder = new tblkladder
                {
                    regnskabid       = k.Regnskabid,
                    tekst            = k.Tekst,
                    afstemningskonto = k.Afstemningskonto,
                    belob            = k.Belob,
                    konto            = k.Konto,
                    momskode         = k.Momskode,
                    faktura          = k.Faktura,
                    id = k.Id,
                };
                Program.dbDataTransSumma.tblkladders.InsertOnSubmit(recKladder);
                if (!(k.Bilag == 0))
                {
                    recBilag.tblkladders.Add(recKladder);
                }
                lastBilag = k.Bilag;
            }
            Program.dbDataTransSumma.SubmitChanges();
        }
Esempio n. 3
0
        public override DocumentPage GetPage(int pageNumber)
        {
            tblbilag Bilag       = null;
            int      wpageNumber = 0;

            for (int i = 0; i < _BilagPages.Length; i++)
            {
                if ((pageNumber >= wpageNumber) && (pageNumber < wpageNumber + _BilagPages[i]))
                {
                    Bilag = new tblbilag
                    {
                        pid        = _Bilag[i].pid,
                        regnskabid = _Bilag[i].regnskabid,
                        bilag      = _Bilag[i].bilag,
                        dato       = _Bilag[i].dato,
                        udskriv    = _Bilag[i].udskriv
                    };

                    int jMin = (pageNumber - wpageNumber) * _RowsPerPage;
                    int jMax = Math.Min(_Bilag[i].tbltrans.Count(), jMin + _RowsPerPage);
                    Debug.Assert(jMin >= 0);
                    for (int j = jMin; j < jMax; j++)
                    {
                        tbltran Trans = new tbltran
                        {
                            pid        = _Bilag[i].tbltrans[j].pid,
                            regnskabid = _Bilag[i].tbltrans[j].regnskabid,
                            skjul      = _Bilag[i].tbltrans[j].skjul,
                            bilagpid   = _Bilag[i].tbltrans[j].bilagpid,
                            tekst      = _Bilag[i].tbltrans[j].tekst,
                            kontonr    = _Bilag[i].tbltrans[j].kontonr,
                            kontonavn  = _Bilag[i].tbltrans[j].kontonavn,
                            moms       = _Bilag[i].tbltrans[j].moms,
                            debet      = _Bilag[i].tbltrans[j].debet,
                            kredit     = _Bilag[i].tbltrans[j].kredit,
                            id         = _Bilag[i].tbltrans[j].id,
                            nr         = _Bilag[i].tbltrans[j].nr,
                            belob      = _Bilag[i].tbltrans[j].belob,
                            afstem     = _Bilag[i].tbltrans[j].afstem,
                        };
                        Bilag.tbltrans.Add(Trans);
                    }
                    break;
                }
                else
                {
                    wpageNumber += _BilagPages[i];
                }
            }

            var page = new PageElement(Bilag)
            {
                Width  = PageSize.Width,
                Height = PageSize.Height,
            };

            page.Measure(PageSize);
            page.Arrange(new Rect(new Point(0, 0), PageSize));

            return(new DocumentPage(page));
        }
Esempio n. 4
0
        private void opdaterBilagToolStripMenuItem_Click(object sender, EventArgs e)
        {
            var qryPosteringer = from p in Program.karPosteringer
                                 join b in Program.dbDataTransSumma.tbltrans on new { p.Regnskabid, p.Id, p.Nr } equals new { Regnskabid = b.regnskabid, Id = b.id, Nr = b.nr } into tbltrans
            from b in tbltrans.DefaultIfEmpty(new tbltran {
                pid = 0, regnskabid = null, id = null, nr = null
            })
            where b.pid > 0
            orderby p.Regnskabid, p.Bilag, p.Id, p.Nr
            select p;
            int antal = qryPosteringer.Count();

            foreach (var p in qryPosteringer)
            {
                if (p.Sag > 0)
                {
                    try
                    {
                        tbltran recTrans = (from b in Program.dbDataTransSumma.tbltrans
                                            where b.regnskabid == p.Regnskabid && b.id == p.Id && b.nr == p.Nr
                                            select b).First();
                        recTrans.sag = p.Sag;
                    }
                    catch
                    {
                        var x = 1;
                    }
                }
            }
            Program.dbDataTransSumma.SubmitChanges();


            var qryKladder = from k in Program.karKladder
                             join b in Program.dbDataTransSumma.tblkladders on new { k.Regnskabid, k.Id } equals new { Regnskabid = b.regnskabid, Id = b.id } into tblkladder
            from b in tblkladder.DefaultIfEmpty(new tblkladder {
                pid = 0, regnskabid = null, id = null
            })
            where b.pid > 0
            orderby k.Regnskabid, k.Bilag, k.Id
            select k;

            antal = qryKladder.Count();
            foreach (var k in qryKladder)
            {
                if ((!(k.Sag == null)) && (k.Sag > 0))
                {
                    try
                    {
                        tblkladder recKladder = (from b in Program.dbDataTransSumma.tblkladders
                                                 where b.regnskabid == k.Regnskabid && b.id == k.Id
                                                 select b).First();
                        recKladder.sag = k.Sag;
                    }
                    catch
                    {
                        var y = 1;
                    }
                }
            }
            Program.dbDataTransSumma.SubmitChanges();
        }