Exemple #1
0
        private void opdaterRSMembershipToolStripMenuItem_Click(object sender, EventArgs e)
        {
            puls3060_dkEntities jdb       = new puls3060_dkEntities();
            clsPbs602           objPbs602 = new clsPbs602();

            objPbs602.betalinger_til_rsmembership(Program.dbData3060, jdb);
        }
Exemple #2
0
        private void testEmailRykkerToolStripMenuItem_Click(object sender, EventArgs e)
        {
            puls3060_dkEntities jdb       = new puls3060_dkEntities();
            clsPbs601           objPbs601 = new clsPbs601();
            Tuple <int, int>    tresult   = objPbs601.rykker_auto(Program.dbData3060, jdb);
            int AntalRykker = tresult.Item1;
            int lobnr       = tresult.Item2;

            if ((AntalRykker > 0))
            {
                objPbs601.rykker_email(Program.dbData3060, lobnr);
            }
            objPbs601 = null;
        }
Exemple #3
0
        private void payPalTilPBSNyeMedlemmerToolStripMenuItem_Click(object sender, EventArgs e)
        {
            puls3060_dkEntities jdb       = new puls3060_dkEntities();
            clsPbs601           objPbs601 = new clsPbs601();
            Tuple <int, int>    tresultc  = objPbs601.rsmembeshhip_fakturer_auto(Program.dbData3060, jdb);
            int AntalKontingent           = tresultc.Item1;
            int lobnrc = tresultc.Item2;

            if ((AntalKontingent > 0))
            {
                objPbs601.faktura_og_rykker_601_action(Program.dbData3060, lobnrc, fakType.fdrsmembership);
                clsSFTP objSFTPc = new clsSFTP(Program.dbData3060);
                objSFTPc.WriteTilSFtp(Program.dbData3060, lobnrc);
                objSFTPc.DisconnectSFtp();
                objSFTPc = null;
            }
        }
        private int JobWorker(string jobname)
        {
            try
            {
                if (Enum.IsDefined(typeof(enumTask), jobname))
                {
                    Program.Log(string.Format("Medlem3060Service {0} begin", jobname));
                    dbData3060DataContext m_dbData3060 = new dbData3060DataContext(Program.dbConnectionString());
                    enumTask job = StringToEnum <enumTask>(jobname);
                    switch (job)
                    {
                    case enumTask.ReceiveFilesFromPBS:
                        clsSFTP objSFTP          = new clsSFTP(m_dbData3060);
                        int     AntalImportFiler = objSFTP.ReadFraSFtp(m_dbData3060);  //Læs direkte SFTP
                        objSFTP.DisconnectSFtp();
                        objSFTP = null;

                        clsPbs602 objPbs602     = new clsPbs602();
                        int       Antal602Filer = objPbs602.betalinger_fra_pbs(m_dbData3060);
                        if (Antal602Filer > 0)
                        {
                            Program.Log(string.Format("Medlem3060Service {0} begin", "Betalinger til RSMembership"));
                            puls3060_dkEntities jdb = new puls3060_dkEntities();
                            objPbs602.betalinger_til_rsmembership(m_dbData3060, jdb);
                            Program.Log(string.Format("Medlem3060Service {0} end", "Betalinger til RSMembership"));
                        }
                        objPbs602 = null;

                        clsPbs603 objPbs603     = new clsPbs603();
                        int       Antal603Filer = objPbs603.aftaleoplysninger_fra_pbs(m_dbData3060);
                        objPbs603 = null;

                        clsPbs686 objPbs686     = new clsPbs686();
                        int       Antal686Filer = objPbs686.aftaleoplysninger_fra_pbs(m_dbData3060);
                        objPbs686 = null;

                        break;

                    case enumTask.SendEmailAdvis:
                        clsPbs601        objPbs601a = new clsPbs601();
                        Tuple <int, int> tresult    = objPbs601a.advis_auto(m_dbData3060);
                        int AntalAdvis = tresult.Item1;
                        int lobnra     = tresult.Item2;
                        if ((AntalAdvis > 0))
                        {
                            objPbs601a.advis_email(m_dbData3060, lobnra);
                        }
                        objPbs601a = null;
                        break;

                    case enumTask.ProcessType602Files:
                        break;

                    case enumTask.ProcessType603Files:
                        break;

                    case enumTask.SendKontingentFileToPBS:
                        clsPbsHelper objPbsHelperd = new clsPbsHelper();
                        objPbsHelperd.PbsAutoKontingent(m_dbData3060);
                        objPbsHelperd = null;
                        break;

                    case enumTask.LoadSchedule:
                        LoadSchedule();
                        break;

                    case enumTask.KontingentNyeMedlemmer:
                        puls3060_dkEntities cjdb       = new puls3060_dkEntities();
                        clsPbs601           objPbs601c = new clsPbs601();
                        Tuple <int, int>    tresultc   = objPbs601c.rsmembeshhip_fakturer_auto(m_dbData3060, cjdb);
                        int AntalKontingent            = tresultc.Item1;
                        int lobnrc = tresultc.Item2;
                        if ((AntalKontingent > 0))
                        {
                            objPbs601c.faktura_og_rykker_601_action(m_dbData3060, lobnrc, fakType.fdrsmembership);
                            clsSFTP objSFTPc = new clsSFTP(m_dbData3060);
                            objSFTPc.WriteTilSFtp(m_dbData3060, lobnrc);
                            objSFTPc.DisconnectSFtp();
                            objSFTPc = null;

                            Tuple <int, int> tresultd = objPbs601c.advis_autoxxx(m_dbData3060, lobnrc);
                            int AntalAdvisd           = tresultd.Item1;
                            int lobnrd = tresultd.Item2;
                            if ((AntalAdvisd > 0))
                            {
                                objPbs601c.advis_email(m_dbData3060, lobnrd);
                            }
                            objPbs601c = null;
                        }
                        break;

                    case enumTask.SendEmailRykker:
                        puls3060_dkEntities bjdb       = new puls3060_dkEntities();
                        clsPbs601           objPbs601b = new clsPbs601();
                        Tuple <int, int>    tresultb   = objPbs601b.rykker_auto(m_dbData3060, bjdb);
                        int AntalRykker = tresultb.Item1;
                        int lobnrb      = tresultb.Item2;
                        if ((AntalRykker > 0))
                        {
                            objPbs601b.rykker_email(m_dbData3060, lobnrb);
                        }
                        objPbs601b = null;
                        break;

                    case enumTask.UpdateMedlemStatus:
                        m_dbData3060.UpdateMedlemStatus();
                        break;

                    case enumTask.UpdateKanSlettes:
                        clsPbsHelper objPbsHelpera = new clsPbsHelper();
                        objPbsHelpera.opdaterKanSlettes();
                        break;

                    case enumTask.JobQMaintenance:
                        clsPbsHelper objPbsHelperb = new clsPbsHelper();
                        objPbsHelperb.JobQMaintenance(m_dbData3060);
                        break;

                    case enumTask.SendEmailKviteringer:
                        puls3060_dkEntities djdb       = new puls3060_dkEntities();
                        clsPbs601           objPbs601d = new clsPbs601();
                        objPbs601d.rsmembeshhip_betalinger_auto(m_dbData3060, djdb);
                        break;

                    default:
                        break;
                    }
                }
                Program.Log(string.Format("Medlem3060Service {0} end", jobname));
                return(0);
            }
            catch (Exception e)
            {
                Program.Log(string.Format("Medlem3060Service JobWorker() for {0} failed with message: {1}", jobname, e.Message));
                return(-1);
            }
        }
Exemple #5
0
        public int BogforPaypalBetalinger()
        {
            var rec_regnskab = Program.qryAktivRegnskab();

            if (rec_regnskab.Afsluttet == true)
            {
                return(0);
            }

            DateTime?Startdato = rec_regnskab.Start;
            DateTime?Slutdato  = rec_regnskab.S**t;

            if (rec_regnskab.DatoLaas != null)
            {
                if (rec_regnskab.DatoLaas > Startdato)
                {
                    Startdato = rec_regnskab.DatoLaas;
                }
            }
            puls3060_dkEntities  jdb       = new puls3060_dkEntities();
            clsPbs602            objPbs602 = new clsPbs602();
            MemBogfoeringsKlader bogf      = objPbs602.konter_paypal_betalinger_fra_rsmembership(jdb, (DateTime)Startdato, (DateTime)Slutdato);

            int AntalBetalinger = 0;

            if (bogf.Count() > 0)
            {
                DateTime nu    = DateTime.Now;
                DateTime ToDay = new DateTime(nu.Year, nu.Month, nu.Day);;

                int BS1_SidsteNr = 0;
                try
                {
                    recStatus rec_Status = (from s in Program.karStatus where s.key == "BS1_SidsteNr" select s).First();
                    BS1_SidsteNr = int.Parse(rec_Status.value);
                }
                catch (System.InvalidOperationException)
                {
                }

                Program.karKladde = null;
                foreach (var b in bogf)
                {
                    recKladde kl = new recKladde
                    {
                        Dato             = b.Dato,
                        Bilag            = b.Bilag + BS1_SidsteNr,
                        Tekst            = b.Tekst,
                        Afstemningskonto = b.Afstemningskonto,
                        Belob            = b.Belob,
                        Kontonr          = b.Kontonr,
                        Faknr            = b.Faknr,
                        Sagnr            = b.Sagnr
                    };
                    Program.karKladde.Add(kl);
                    AntalBetalinger = (int)b.Bilag;
                }
                Program.karStatus.save();
                Program.karKladde.save();
                Program.dbData3060.SubmitChanges();
            }
            return(AntalBetalinger);
        }
Exemple #6
0
        private void cmdRSMembership_Fakturer_Click(object sender, EventArgs e)
        {
            string   TilPBSFilename = "Unknown";
            int      AntalFakturaer;
            int      lobnr;
            int      imax;
            string   keyval;
            DateTime fradato;
            DateTime tildato;
            bool     tilmeldtpbs;
            bool     indmeldelse;

            double advisbelob;

            if ((this.cmdFakturer.Text == "Afslut"))
            {
                this.Close();
            }
            this.cmdForslag.Visible = false;
            this.cmdCancel.Visible  = false;
            imax = lvwKontingent.Items.Count;
            this.pgmFaktura.Maximum = (imax * 4);
            this.pgmFaktura.Minimum = 0;
            this.pgmFaktura.Value   = 0;
            this.pgmFaktura.Visible = true;
            if ((imax == 0))
            {
                this.Label_Fakturatekst.Text    = "Der ikke noget at fakturere";
                this.Label_Fakturatekst.Visible = true;
            }
            else
            {
                puls3060_dkEntities  jdb = new puls3060_dkEntities();
                Memkontingentforslag memKontingentforslag = new Memkontingentforslag();
                var i = 0;
                foreach (ListViewItem lvi in lvwKontingent.Items)
                {
                    this.pgmFaktura.Value = ++i;
                    keyval      = lvi.Name;
                    fradato     = DateTime.Parse(lvi.SubItems[4].Text);
                    advisbelob  = double.Parse(lvi.SubItems[5].Text);
                    tildato     = DateTime.Parse(lvi.SubItems[6].Text);
                    indmeldelse = (lvi.SubItems[7].Text == "J") ? true : false;
                    tilmeldtpbs = (lvi.SubItems[8].Text == "J") ? true : false;

                    recKontingentforslag rec_Kontingentforslag = new recKontingentforslag
                    {
                        betalingsdato = clsOverfoersel.bankdageplus(this.DatoKontingentForfald.Value, 0),
                        bsh           = this.DelsystemBSH.Checked,
                        user_id       = int.Parse(keyval),
                        membership_id = 6,
                        advisbelob    = (decimal)advisbelob,
                        fradato       = fradato,
                        tildato       = tildato,
                        indmeldelse   = indmeldelse,
                        tilmeldtpbs   = tilmeldtpbs,
                    };
                    memKontingentforslag.Add(rec_Kontingentforslag);
                }

                clsPbs601 objPbs601 = new clsPbs601();

                Tuple <int, int> tresult = objPbs601.rsmembeshhip_kontingent_fakturer_bs1(Program.dbData3060, jdb, memKontingentforslag);
                AntalFakturaer        = tresult.Item1;
                lobnr                 = tresult.Item2;
                this.pgmFaktura.Value = imax * 2;
                if ((AntalFakturaer > 0))
                {
                    objPbs601.faktura_og_rykker_601_action(Program.dbData3060, lobnr, fakType.fdrsmembership);
                    this.pgmFaktura.Value = (imax * 3);
                    clsSFTP objSFTP = new clsSFTP(Program.dbData3060);
                    TilPBSFilename = objSFTP.WriteTilSFtp(Program.dbData3060, lobnr);
                    objSFTP.DisconnectSFtp();
                    objSFTP = null;
                }
                this.pgmFaktura.Value           = (imax * 4);
                cmdFakturer.Text                = "Afslut";
                this.DelsystemBSH.Visible       = false;
                this.Label_Fakturatekst.Text    = ("Leverance til PBS i filen " + TilPBSFilename);
                this.Label_Fakturatekst.Visible = true;
                this.pgmFaktura.Visible         = false;
            }
        }
Exemple #7
0
        private void getRSMembership_KontingentForslag_old()
        {
            puls3060_dkEntities jdb = new puls3060_dkEntities();
            DateTime            KontingentFradato = DateTime.MinValue;
            DateTime            KontingentTildato = DateTime.MinValue;
            bool tilmeldtpbs    = false;
            bool indmeldelse    = false;
            int  AntalMedlemmer = 0;
            int  AntalForslag   = 0;
            int  ikontingent;
            int  iNr = 0;

            var qry_rsmembership = from s in jdb.ecpwt_rsmembership_membership_subscribers
                                   where s.membership_id == 6 && s.status != 3
                                   join tf in jdb.ecpwt_rsmembership_transactions on s.from_transaction_id equals tf.id
                                   join tl in jdb.ecpwt_rsmembership_transactions on s.last_transaction_id equals tl.id
                                   join m in jdb.ecpwt_rsmembership_subscribers on s.user_id equals m.user_id
                                   join u in jdb.ecpwt_users on s.user_id equals u.id
                                   select new
            {
                Nr                      = m.f14,
                Navn                    = u.name,
                Adresse                 = m.f1,
                Postnr                  = m.f4,
                indmeldelsesDato        = tf.date,
                kontingentBetaltTilDato = s.membership_end,
                Kontingent              = tl.price,
                s.user_id,
                tl.user_data
            };


            this.lvwMedlem.Items.Clear();
            this.lvwKontingent.Items.Clear();

            var antal = qry_rsmembership.Count();

            this.pgmForslag.Show();
            this.pgmForslag.Maximum          = antal;
            this.pgmForslag.Minimum          = 0;
            this.pgmForslag.Value            = 0;
            this.pgmForslag.Step             = 1;
            this.pgmForslag.Visible          = true;
            this.Label_Forslagstekst.Visible = false;
            this.cmdFakturer.Visible         = false;
            this.DelsystemBSH.Visible        = false;

            pgmForslag.PerformStep();

            var rsm = qry_rsmembership.ToArray();

            foreach (var m in rsm)
            {
                bool bSelected = true;
                AntalMedlemmer++;
                tilmeldtpbs = false;
                indmeldelse = false;

                if (m.Nr == "")
                {
                    iNr = 10000 + m.user_id;
                }
                else
                {
                    iNr = int.Parse(m.Nr);
                }

                bool erMedlemPusterummet = ((from um in jdb.ecpwt_user_usergroup_map
                                             join g in jdb.ecpwt_usergroups on um.group_id equals g.id
                                             where g.title == "Pusterummet" && um.user_id == m.user_id
                                             select um.user_id).Count() > 0);

                if (erMedlemPusterummet)
                {
                    bSelected = false;
                }
                else //Er medlem
                {
                    if ((m.kontingentBetaltTilDato != null) && (m.kontingentBetaltTilDato > m.indmeldelsesDato))  //'Der findes en kontingent-betaling
                    {
                        if (m.kontingentBetaltTilDato > this.DatoBetaltKontingentTil.Value)   //der er betalt kontingent efter DatoBetaltKontingentTil
                        {
                            bSelected = false;
                        }
                        else
                        {
                            if (m.kontingentBetaltTilDato >= m.indmeldelsesDato)
                            {
                                KontingentFradato = ((DateTime)m.kontingentBetaltTilDato);
                            }
                        }
                    }
                    else  //Der findes ingen kontingent-betaling
                    {
                        KontingentFradato = (DateTime)m.indmeldelsesDato;
                        indmeldelse       = true;
                    }
                }


                if (bSelected)
                {
                    DateTime TodayMinus90 = DateTime.Now.AddDays(-90);
                    var      qry_fak      = from f in Program.dbData3060.tblfaks where f.Nr == iNr && f.betalingsdato > TodayMinus90
                                            join t in Program.dbData3060.tblrsmembership_transactions on f.id equals t.id
                                            select f;

                    if (qry_fak.Count() > 0) //Der findes en opkrævning
                    {
                        bSelected = false;
                    }
                }


                if (bSelected)
                {
                    AntalForslag++;
                    tilmeldtpbs       = (bool)Program.dbData3060.erPBS(iNr);
                    KontingentTildato = KontingentFradato.AddMonths(12);
                    ikontingent       = (int)m.Kontingent;

                    ListViewItem it = lvwKontingent.Items.Add(m.user_id.ToString(), m.Navn, 0);
                    //it.Tag = m;
                    it.SubItems.Add(m.user_id.ToString());
                    it.SubItems.Add(m.Adresse);
                    it.SubItems.Add(m.Postnr);
                    it.SubItems.Add(string.Format("{0:dd-MM-yyy}", KontingentFradato));
                    it.SubItems.Add(ikontingent.ToString());
                    it.SubItems.Add(string.Format("{0:dd-MM-yyy}", KontingentTildato));
                    it.SubItems.Add((indmeldelse) ? "J" : "N");
                    it.SubItems.Add((tilmeldtpbs) ? "J" : "N");
                }
                pgmForslag.PerformStep();
            }
            this.lvwKontingent.AutoResizeColumns(ColumnHeaderAutoResizeStyle.ColumnContent);

            if (AntalForslag == 0)
            {
                this.Label_Forslagstekst.Text    = "Der er ingen forslag";
                this.Label_Forslagstekst.Visible = true;
                this.cmdFakturer.Visible         = false;
                this.DelsystemBSH.Visible        = false;
            }
            else
            {
                this.Label_Forslagstekst.Visible = false;
                this.cmdFakturer.Visible         = true;
                this.DelsystemBSH.Visible        = true;
            }
            this.pgmForslag.Visible = false;
        }