private void betalingerFraPBSToolStripMenuItem_Click(object sender, EventArgs e) { string bigString = null; string smallString = null; clsSumma objSumma = new clsSumma(); int AntalOrdre = objSumma.Order2Summa(); bigString = String.Format("Antal nye ordre: {0}.", AntalOrdre); if (AntalOrdre > 0) { smallString = String.Format("Åben SummaSummarum\nTryk på ikonet Bilag i venstre side\nbogfør de {0} nye ordre.", AntalOrdre); } else { smallString = "Der er ingen nye odre"; } DialogResult result = DotNetPerls.BetterDialog.ShowDialog( "Betalinger fra PBS", //titleString bigString, //bigString smallString, //smallString null, //leftButton "OK", //rightButton global::nsPuls3060.Properties.Resources.Message_info); //iconSet }
private void betalingerTilKassekladeToolStripMenuItem_Click(object sender, EventArgs e) { string bigString = null; string smallString = null; clsSumma objSumma = new clsSumma(); int AntalFakturaer = objSumma.OrderFaknrUpdate(); int AntalBetalinger = objSumma.BogforIndBetalinger(); bigString = String.Format("Antal bogførte fakturear: {0} \nAntal nye betalinger i kassekladde: {1}.", AntalFakturaer, AntalBetalinger); if (AntalBetalinger > 0) { smallString = "Åben SummaSummarum\nTryk på ikonet Kassekladde i venstre side\nbogfør den nye kassekladde."; } else { smallString = "Der er ingen ny kassekladde"; } DialogResult result = DotNetPerls.BetterDialog.ShowDialog( "Betalinger til Kassekladde", //titleString bigString, //bigString smallString, //smallString null, //leftButton "OK", //rightButton global::nsPuls3060.Properties.Resources.Message_info); //iconSet }
private void betalingerFraPBSToolStripMenuItem_Click(object sender, EventArgs e) { string bigString = null; string smallString = null; int AntalImportFiler = 0; clsPbs601 objPbs601 = new clsPbs601(); clsPbs602 objPbs602 = new clsPbs602(); clsPbs603 objPbs603 = new clsPbs603(); clsPbs686 objPbs686 = new clsPbs686(); clsSFTP objSFTP = new clsSFTP(Program.dbData3060); AntalImportFiler = objSFTP.ReadFraSFtp(Program.dbData3060); //Læs direkte SFTP objSFTP.DisconnectSFtp(); objSFTP = null; //AntalImportFiler = objPbs602.ReadFraPbsFile(); //Læs fra Directory FraPBS int Antal602Filer = objPbs602.betalinger_fra_pbs(Program.dbData3060); int Antal603Filer = objPbs603.aftaleoplysninger_fra_pbs(Program.dbData3060); int Antal686Filer = objPbs686.aftaleoplysninger_fra_pbs(Program.dbData3060); Tuple <int, int> tresult = objPbs601.advis_auto(Program.dbData3060); int AntalAdvis = tresult.Item1; int lobnr = tresult.Item2; if ((AntalAdvis > 0)) { objPbs601.advis_email(Program.dbData3060, lobnr); } clsSumma objSumma = new clsSumma(); int AntalBetalinger = objSumma.BogforIndBetalinger(); if (AntalBetalinger > 0) { bigString = String.Format("Der er {0} bogførte betalinger.", AntalBetalinger); } else { bigString = "Der er ingen nye betalinger"; } smallString = String.Format("Antal indlæste filer fra PBS: {0} \nAntal nye 602 filer: {1}\nAntal nye 603 filer: {3}\nAntal nye 686 filer: {4}\nAntal nye betalinger: {2}.", AntalImportFiler, Antal602Filer, AntalBetalinger, Antal603Filer, Antal686Filer); DialogResult result = DotNetPerls.BetterDialog.ShowDialog( "Filer fra PBS", //titleString bigString, //bigString smallString, //smallString null, //leftButton "OK", //rightButton global::nsPuls3060.Properties.Resources.Message_info); //iconSet }
private void betalingerFraPBSToolStripMenuItem_Click(object sender, EventArgs e) { string bigString = null; string smallString = null; int AntalImportFiler = 0; clsPbs602 objPbs602 = new clsPbs602(); clsPbs603 objPbs603 = new clsPbs603(); clsSFTP objSFTP = new clsSFTP(); AntalImportFiler = objSFTP.ReadFraSFtp(); //Læs direkte SFTP objSFTP.DisconnectSFtp(); objSFTP = null; //AntalImportFiler = objPbs602.ReadFraPbsFile(); //Læs fra Directory FraPBS int Antal602Filer = objPbs602.betalinger_fra_pbs(); int Antal603Filer = objPbs603.aftaleoplysninger_fra_pbs(); clsSumma objSumma = new clsSumma(); int AntalOrdre = objSumma.Order2Summa(); bigString = String.Format("Antal indlæste filer fra PBS: {0} \nAntal nye 602 filer: {1}\nAntal nye 603 filer: {3}\nAntal nye ordre: {2}.", AntalImportFiler, Antal602Filer, AntalOrdre, Antal603Filer); if (AntalOrdre > 0) { smallString = String.Format("Åben SummaSummarum\nTryk på ikonet Bilag i venstre side\nbogfør de {0} nye ordre.", AntalOrdre); } else { smallString = "Der er ingen nye odre"; } DialogResult result = DotNetPerls.BetterDialog.ShowDialog( "Betalinger fra PBS", //titleString bigString, //bigString smallString, //smallString null, //leftButton "OK", //rightButton global::nsPuls3060.Properties.Resources.Message_info); //iconSet }
private void payPalBetalingerToolStripMenuItem_Click(object sender, EventArgs e) { string bigString = null; string smallString = null; clsSumma objSumma = new clsSumma(); int AntalBetalinger = objSumma.BogforPaypalBetalinger(); if (AntalBetalinger > 0) { bigString = String.Format("Der er {0} bogførte betalinger.", AntalBetalinger); } else { bigString = "Der er ingen nye betalinger"; } DialogResult result = DotNetPerls.BetterDialog.ShowDialog( "PayPal Betalinger", //titleString bigString, //bigString smallString, //smallString null, //leftButton "OK", //rightButton global::nsPuls3060.Properties.Resources.Message_info); //iconSet }
private void cmdBetal_Click(object sender, EventArgs e) { string TilPBSFilename = "Unknown"; int AntalBetalinger; int lobnr; int imax; string keyval; string Navn; int Nr; string Kaldenavn; string Email; int faknr; decimal advisbelob; string Bank; if ((this.cmdBetal.Text == "Afslut")) { this.Close(); } this.cmdForslag.Visible = false; this.cmdCancel.Visible = false; imax = lvwKrdFaktura.Items.Count; this.pgmBetal.Maximum = (imax * 4); this.pgmBetal.Minimum = 0; this.pgmBetal.Value = 0; this.pgmBetal.Visible = true; Program.dbData3060.tempBetalforslags.DeleteAllOnSubmit(Program.dbData3060.tempBetalforslags); Program.dbData3060.SubmitChanges(); if ((imax == 0)) { this.Label_Betaltekst.Text = "Der ikke noget at betale"; this.Label_Betaltekst.Visible = true; } else { nsPbs3060.tempBetalforslag rec_tempBetalforslag = new nsPbs3060.tempBetalforslag { betalingsdato = DateTime.Now, }; Program.dbData3060.tempBetalforslags.InsertOnSubmit(rec_tempBetalforslag); var i = 0; foreach (ListViewItem lvi in lvwKrdFaktura.Items) { this.pgmBetal.Value = ++i; keyval = lvi.Name; Navn = lvi.Text; Nr = int.Parse(lvi.SubItems[1].Text); faknr = int.Parse(lvi.SubItems[4].Text); advisbelob = decimal.Parse(lvi.SubItems[5].Text); Bank = lvi.SubItems[6].Text; Kaldenavn = lvi.SubItems[7].Text; Email = lvi.SubItems[8].Text; nsPbs3060.tempBetalforslaglinie rec_tempBetalforslaglinie = new nsPbs3060.tempBetalforslaglinie { Nr = Nr, Navn = Navn, Kaldenavn = Kaldenavn, Email = Email, fakid = int.Parse(keyval), advisbelob = (decimal)advisbelob, bankregnr = Bank.Substring(0, 4), bankkontonr = Bank.Substring(5, 10), faknr = faknr, }; rec_tempBetalforslag.tempBetalforslaglinies.Add(rec_tempBetalforslaglinie); } Program.dbData3060.SubmitChanges(); clsOverfoersel objOverfoersel = new clsOverfoersel(); Tuple <int, int> t = objOverfoersel.kreditor_fakturer_os1(Program.dbData3060); AntalBetalinger = t.Item1; lobnr = t.Item2; this.pgmBetal.Value = imax * 2; if ((AntalBetalinger > 0)) { objOverfoersel.krdfaktura_overfoersel_action(Program.dbData3060, lobnr); this.pgmBetal.Value = (imax * 3); //clsSFTP objSFTP = new clsSFTP(Program.dbData3060); //TilPBSFilename = objSFTP.WriteTilSFtp(Program.dbData3060, lobnr); //objSFTP.DisconnectSFtp(); //objSFTP = null; clsBankUdbetalingsUdskrift objBankUdbetalingsUdskrift = new clsBankUdbetalingsUdskrift(); objBankUdbetalingsUdskrift.BankUdbetalingsUdskrifter(Program.dbData3060, lobnr); objBankUdbetalingsUdskrift = null; objOverfoersel.overfoersel_mail(Program.dbData3060, lobnr); clsSumma objSumma = new clsSumma(); objSumma.BogforUdBetalinger(lobnr); } this.pgmBetal.Value = (imax * 4); cmdBetal.Text = "Afslut"; this.Label_Betaltekst.Text = ("Leverance til PBS i filen " + TilPBSFilename); this.Label_Betaltekst.Visible = true; this.pgmBetal.Visible = false; } }
private void cmdBetal_Click(object sender, EventArgs e) { string TilPBSFilename = "Unknown"; int AntalBetalinger; int imax; string keyval; int Nr; int faknr; decimal advisbelob; string Bank; if ((this.cmdBetal.Text == "Afslut")) { this.Close(); } this.cmdForslag.Visible = false; this.cmdCancel.Visible = false; imax = lvwKrdFaktura.Items.Count; this.pgmBetal.Maximum = (imax * 4); this.pgmBetal.Minimum = 0; this.pgmBetal.Value = 0; this.pgmBetal.Visible = true; Program.dbData3060.TempBetalforslag.DeleteAllOnSubmit(Program.dbData3060.TempBetalforslag); Program.dbData3060.SubmitChanges(); if ((imax == 0)) { this.Label_Betaltekst.Text = "Der ikke noget at betale"; this.Label_Betaltekst.Visible = true; } else { TempBetalforslag rec_tempBetalforslag = new TempBetalforslag { Betalingsdato = DateTime.Now, }; Program.dbData3060.TempBetalforslag.InsertOnSubmit(rec_tempBetalforslag); var i = 0; foreach (ListViewItem lvi in lvwKrdFaktura.Items) { this.pgmBetal.Value = ++i; keyval = lvi.Name; Nr = int.Parse(lvi.SubItems[1].Text); faknr = int.Parse(lvi.SubItems[4].Text); advisbelob = decimal.Parse(lvi.SubItems[5].Text); Bank = lvi.SubItems[6].Text; TempBetalforslaglinie rec_tempBetalforslaglinie = new TempBetalforslaglinie { Nr = Nr, Fakid = int.Parse(keyval), Advisbelob = (decimal)advisbelob, Bankregnr = Bank.Substring(0, 4), Bankkontonr = Bank.Substring(5, 10), Faknr = faknr, }; rec_tempBetalforslag.TempBetalforslaglinie.Add(rec_tempBetalforslaglinie); } Program.dbData3060.SubmitChanges(); clsOverfoersel objOverfoersel = new clsOverfoersel(); nsPuls3060.clsOverfoersel.SetLobnr += new nsPuls3060.clsOverfoersel.OverfoerselDelegateHandler(On_clsOverfoersel_SetLobnr); AntalBetalinger = objOverfoersel.kreditor_fakturer_os1(); this.pgmBetal.Value = imax * 2; if ((AntalBetalinger > 0)) { objOverfoersel.krdfaktura_overfoersel_action(m_lobnr); this.pgmBetal.Value = (imax * 3); clsSFTP objSFTP = new clsSFTP(); TilPBSFilename = objSFTP.WriteTilSFtp(m_lobnr); objSFTP.DisconnectSFtp(); objSFTP = null; objOverfoersel.overfoersel_mail(m_lobnr); clsSumma objSumma = new clsSumma(); objSumma.BogforUdBetalinger(m_lobnr); } this.pgmBetal.Value = (imax * 4); cmdBetal.Text = "Afslut"; this.Label_Betaltekst.Text = ("Leverance til PBS i filen " + TilPBSFilename); this.Label_Betaltekst.Visible = true; this.pgmBetal.Visible = false; } }
private void cmdBetal_Click(object sender, EventArgs e) { string TilPBSFilename = "Unknown"; int imax; string keyval; int Nr; int faknr; decimal advisbelob; string Bank; if ((this.cmdBetal.Text == "Afslut")) { this.Close(); } this.cmdForslag.Visible = false; this.cmdCancel.Visible = false; imax = lvwKrdFaktura.Items.Count; this.pgmBetal.Maximum = (imax * 4); this.pgmBetal.Minimum = 0; this.pgmBetal.Value = 0; this.pgmBetal.Visible = true; if ((imax == 0)) { this.Label_Betaltekst.Text = "Der ikke noget at betale"; this.Label_Betaltekst.Visible = true; } else { XElement headxml = new XElement("TempBetalforslag"); headxml.Add(new XElement("Betalingsdato", DateTime.Now)); var i = 0; foreach (ListViewItem lvi in lvwKrdFaktura.Items) { this.pgmBetal.Value = ++i; keyval = lvi.Name; Nr = int.Parse(lvi.SubItems[1].Text); faknr = int.Parse(lvi.SubItems[4].Text); advisbelob = decimal.Parse(lvi.SubItems[5].Text); Bank = lvi.SubItems[6].Text; XElement linxml = new XElement("TempBetalforslaglinie"); linxml.Add(new XElement("Nr", Nr)); linxml.Add(new XElement("Fakid", int.Parse(keyval))); linxml.Add(new XElement("Advisbelob", (decimal)advisbelob)); linxml.Add(new XElement("Bankregnr", Bank.Substring(0, 4))); linxml.Add(new XElement("Bankkontonr", Bank.Substring(5, 10))); linxml.Add(new XElement("Faknr", faknr)); headxml.Add(new XElement(linxml)); } clsRest objRest = new clsRest(); string strheadxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + headxml.ToString(); string result = objRest.HttpPost2(clsRest.urlBaseType.data, "overforsel", strheadxml); XDocument xmldata = XDocument.Parse(result); string Status = xmldata.Descendants("Status").First().Value; this.pgmBetal.Value = imax * 2; if (Status == "True") { this.pgmBetal.Value = (imax * 3); int lobnr = int.Parse(xmldata.Descendants("Lobnr").First().Value); int antal = int.Parse(xmldata.Descendants("Antal").First().Value); int sendqueueid = int.Parse(xmldata.Descendants("Sendqueueid").First().Value); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "tilpbs/" + sendqueueid.ToString()); XDocument xmldata2 = XDocument.Parse(strxmldata); string Status2 = xmldata2.Descendants("Status").First().Value; if (Status2 == "True") { clsSFTP objAppEngSFTP = new clsSFTP(); bool bSendt = objAppEngSFTP.WriteTilSFtp(xmldata2); if (bSendt) { overfoersel_mail(lobnr); } objAppEngSFTP.DisconnectSFtp(); objAppEngSFTP = null; } clsSumma objSumma = new clsSumma(); objSumma.BogforUdBetalinger(lobnr); } this.pgmBetal.Value = (imax * 4); cmdBetal.Text = "Afslut"; this.Label_Betaltekst.Text = ("Leverance til PBS i filen " + TilPBSFilename); this.Label_Betaltekst.Visible = true; this.pgmBetal.Visible = false; } }