Exemple #1
0
        private void cmdKopier_Click(object sender, EventArgs e)
        {
            FrmMain frmMain = this.ParentForm as FrmMain;

            try
            {
                FrmNyfaktura frmNyfaktura = frmMain.GetChild("Ny faktura") as FrmNyfaktura;
                tblfak       recFak       = this.bsTblfak.Current as tblfak;
                frmNyfaktura.AddNyFaktura(recFak);
            }
            catch { }
        }
Exemple #2
0
        public void AddNyFaktura(tblfak recFak)
        {
            var qry = from k in recFak.tblfaklins
                      select new tblwfaklin
            {
                varenr      = k.varenr,
                tekst       = k.tekst,
                konto       = k.konto,
                momskode    = k.momskode,
                antal       = k.antal,
                enhed       = k.enhed,
                pris        = k.pris,
                rabat       = k.rabat,
                moms        = k.moms,
                nettobelob  = k.nettobelob,
                bruttobelob = k.bruttobelob,
            };
            int antal = qry.Count();

            if (antal > 0)
            {
                tblwfak recwFak = new tblwfak
                {
                    sk    = recFak.sk,
                    dato  = recFak.dato,
                    konto = recFak.konto,
                };

                foreach (var k in qry)
                {
                    recwFak.tblwfaklins.Add(k);
                }
                this.tblwfakBindingSource.Add(recwFak);
            }
            this.tblwfakBindingSource.MoveLast();
        }
Exemple #3
0
        public void ImportSalgsfakturaer()
        {
            int?   lastFakid    = null;
            tblfak recFak       = null;
            var    rec_regnskab = Program.qryAktivRegnskab();
            var    qrySFak      = from sfv in Program.karFakturavarer_s
                                  join sf in Program.karFakturaer_s on new { fakid = sfv.Fakid } equals new { fakid = sf.fakid }
            where sf.faknr != 0 && sf.faktype == 0
            join fl in Program.dbDataTransSumma.tblfaklins
            on new
            {
                regnskabsid = (int?)rec_regnskab.Rid,
                fakid       = (int?)sfv.Fakid,
                sk          = "S",
                line        = (int?)sfv.Line
            }
            equals new
            {
                regnskabsid = fl.regnskabid,
                fakid       = fl.fakid,
                sk          = fl.sk,
                line        = fl.faklinnr
            }
            into tblfaklin
            from fl in tblfaklin.DefaultIfEmpty(new tblfaklin {
                pid = 0, fakpid = 0, regnskabid = null
            })
            where fl.pid == 0
            orderby sfv.Fakid, sfv.Line
                   select new
            {
                Regnskabid  = rec_regnskab.Rid,
                Sk          = "S",
                Fakid       = sfv.Fakid,
                Faknr       = sf.faknr,
                Dato        = sf.dato,
                debitornr   = sf.debitornr,
                Faklinnr    = sfv.Line,
                Varenr      = sfv.Varenr,
                Tekst       = sfv.VareTekst,
                Konto       = sfv.Bogfkonto,
                Momskode    = KarKontoplan.getMomskode(sfv.Bogfkonto),
                Antal       = sfv.Antal,
                Enhed       = sfv.Enhed,
                Pris        = sfv.Pris,
                Rabat       = sfv.Rabat,
                Moms        = sfv.Moms,
                Nettobelob  = sfv.Nettobelob,
                Bruttobelob = sfv.Bruttobelob,
            };

            int antal = qrySFak.Count();

            foreach (var s in qrySFak)
            {
                if ((!(s.Fakid == 0)) && (lastFakid != s.Fakid))
                {
                    try
                    {
                        recFak = (from f in Program.dbDataTransSumma.tblfaks
                                  where f.regnskabid == rec_regnskab.Rid && f.sk == "S" && f.fakid == s.Fakid
                                  select f).First();
                    }
                    catch
                    {
                        recFak = new tblfak
                        {
                            udskriv    = true,
                            regnskabid = s.Regnskabid,
                            sk         = s.Sk,
                            fakid      = s.Fakid,
                            faknr      = s.Faknr,
                            dato       = s.Dato,
                            konto      = s.debitornr
                        };
                        Program.dbDataTransSumma.tblfaks.InsertOnSubmit(recFak);
                    }
                }


                tblfaklin recFaklin = new tblfaklin
                {
                    sk          = s.Sk,
                    regnskabid  = s.Regnskabid,
                    fakid       = s.Fakid,
                    faklinnr    = s.Faklinnr,
                    varenr      = s.Varenr.ToString(),
                    tekst       = s.Tekst,
                    konto       = s.Konto,
                    momskode    = s.Momskode,
                    antal       = s.Antal,
                    enhed       = s.Enhed,
                    pris        = s.Pris,
                    rabat       = s.Rabat,
                    moms        = s.Moms,
                    nettobelob  = s.Nettobelob,
                    bruttobelob = s.Bruttobelob
                };
                Program.dbDataTransSumma.tblfaklins.InsertOnSubmit(recFaklin);
                if (!(s.Fakid == 0))
                {
                    recFak.tblfaklins.Add(recFaklin);
                }
                lastFakid = s.Fakid;
            }
            Program.dbDataTransSumma.SubmitChanges();
        }