public void fillMedlog() { clsRest objRest = new clsRest(); string retur = objRest.HttpGet2(clsRest.urlBaseType.sync, "Medlog"); XDocument xdoc = XDocument.Parse(retur); var list = from medlog in xdoc.Descendants("Medlog") select medlog; int antal = list.Count(); foreach (var medlog in list) { if ((medlog.Descendants("Nr").First().Value != null) && (medlog.Descendants("Nr").First().Value != "None") && (medlog.Descendants("Nr").First().Value.Length <= 4)) { var Nr = medlog.Descendants("Nr").First().Value.Trim(); var Logdato = medlog.Descendants("Logdato").First().Value.Trim(); var Akt_id = medlog.Descendants("Akt_id").First().Value.Trim(); var Akt_dato = medlog.Descendants("Akt_dato").First().Value.Trim(); tblMedlogRow MedlogRow = (tblMedlogRow)tabletblMedlog.Rows.Add( Nr, Logdato, Akt_id, Akt_dato ); MedlogRow.AcceptChanges(); } } }
public void cvnMedlog() { string ModelName = "Medlog"; var qry = from r in Program.dbData3060.TblMedlemLog select r; foreach (var r in qry) { clsRest objRest = new clsRest(); XElement xml = new XElement(ModelName); Type objectType = r.GetType(); PropertyInfo[] properties = objectType.GetProperties(); foreach (PropertyInfo property in properties) { string Name = property.Name; object Val = property.GetValue(r, null); //string NamePropertyType = property.GetValue(r, null).GetType().Name; xml.Add(new XElement(Name, Val)); if (Name == "Id") { xml.Add(new XElement("Source_id", Val)); xml.Add(new XElement("Source", "Medlog")); } } string strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); string retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Convert", strxml); if (retur != "Status: 404") { clsSQLite.insertStoreXML(Program.AppEngName, false, "sync/Convert", strxml, retur); } } }
public void saveMedlog() { foreach (tblMedlogRow l in tabletblMedlog.Rows) { clsRest objRest = null; XElement xml = null; string retur = null; string strxml = null; switch (l.RowState) { case DataRowState.Added: objRest = new clsRest(); int Id = clsPbs.nextval("Medlogid"); xml = new XElement("Medlog"); xml.Add(new XElement("Id", Id)); xml.Add(new XElement("Source_id", Id)); xml.Add(new XElement("Source", "Medlog")); xml.Add(new XElement("Nr", l.Nr)); xml.Add(new XElement("Logdato", l.Logdato)); xml.Add(new XElement("Akt_id", l.Akt_id)); xml.Add(new XElement("Akt_dato", l.Akt_dato)); strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Medlog", strxml); l.AcceptChanges(); break; } } }
public void save() { string ModelName = "Kreditor"; var qry = from r in Program.memKreditor select r; foreach (var r in qry) { clsRest objRest = new clsRest(); XElement xml = new XElement(ModelName); Type objectType = r.GetType(); PropertyInfo[] properties = objectType.GetProperties(); foreach (PropertyInfo property in properties) { string Name = property.Name; object Val = property.GetValue(r, null); xml.Add(new XElement(Name, Val)); } string strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); string retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Convert", strxml); if (retur != "Status: 404") { clsSQLite.insertStoreXML(Program.AppEngName, false, "sync/Convert", strxml, retur); } } }
public void cvnPbsfiles() { string ModelName = "Pbsfiles"; var qry = from r in Program.dbData3060.Tblpbsfiles select r; foreach (var r in qry) { clsRest objRest = new clsRest(); XElement xml = new XElement(ModelName); Type objectType = r.GetType(); PropertyInfo[] properties = objectType.GetProperties(); foreach (PropertyInfo property in properties) { string Name = property.Name; object Val = property.GetValue(r, null); //string NamePropertyType = property.GetValue(r, null).GetType().Name; xml.Add(new XElement(Name, Val)); } string strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); string retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Convert", strxml); if (retur != "Status: 404") { clsSQLite.insertStoreXML(Program.AppEngName, false, "sync/Convert", strxml, retur); } var qry2 = from r2 in Program.dbData3060.Tblpbsfile where r2.Pbsfilesid == r.Id orderby r2.Seqnr ascending select r2; string TilPBSFile = ""; int i = 0; foreach (var rec_pbsfile in qry2) { if (i++ > 0) { TilPBSFile += "\r\n"; } TilPBSFile += rec_pbsfile.Data; } //char[] c_TilPBSFile = TilPBSFile.ToCharArray(); //byte[] b_TilPBSFile = System.Text.Encoding.GetEncoding("windows-1252").GetBytes(c_TilPBSFile); XElement xml2 = new XElement("Pbsfile"); xml2.Add(new XElement("Id", r.Id)); xml2.Add(new XElement("Pbsfilesid", r.Id)); xml2.Add(new XElement("Data", TilPBSFile)); string strxml2 = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml2.ToString(); string retur2 = objRest.HttpPost2(clsRest.urlBaseType.sync, "Convert", strxml2); if (retur2 != "Status: 404") { clsSQLite.insertStoreXML(Program.AppEngName, false, "sync/Convert", strxml2, retur2); } } }
public void savePerson() { foreach (tblPersonRow p in tabletblPerson.Rows) { clsRest objRest = null; XElement xml = null; string retur = null; string strxml = null; switch (p.RowState) { case DataRowState.Added: objRest = new clsRest(); xml = new XElement("Medlem", new XElement("Nr", p.Nr)); xml.Add(new XElement("Navn", p.Navn)); xml.Add(new XElement("Kaldenavn", p.Kaldenavn)); xml.Add(new XElement("Adresse", p.Adresse)); xml.Add(new XElement("Postnr", p.Postnr)); xml.Add(new XElement("Bynavn", p.Bynavn)); xml.Add(new XElement("Telefon", p.Telefon)); xml.Add(new XElement("Email", p.Email)); xml.Add(new XElement("Kon", p.Kon)); xml.Add(new XElement("FodtDato", ((DateTime)p.FodtDato).ToString("yyyy-MM-dd"))); xml.Add(new XElement("Bank", p.Bank)); strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Medlem", strxml); p.AcceptChanges(); break; case DataRowState.Deleted: objRest = new clsRest(); retur = objRest.HttpDelete2(clsRest.urlBaseType.sync, "Medlem/" + p.Nr); p.AcceptChanges(); break; case DataRowState.Modified: objRest = new clsRest(); xml = new XElement("Medlem", new XElement("Nr", p.Nr)); xml.Add(new XElement("Navn", p.Navn)); xml.Add(new XElement("Kaldenavn", p.Kaldenavn)); xml.Add(new XElement("Adresse", p.Adresse)); xml.Add(new XElement("Postnr", p.Postnr)); xml.Add(new XElement("Bynavn", p.Bynavn)); xml.Add(new XElement("Telefon", p.Telefon)); xml.Add(new XElement("Email", p.Email)); xml.Add(new XElement("Kon", p.Kon)); xml.Add(new XElement("FodtDato", ((DateTime)p.FodtDato).ToString("yyyy-MM-dd"))); xml.Add(new XElement("Bank", p.Bank)); strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Medlem", strxml); p.AcceptChanges(); break; } } }
public static int nextval(string nrserienavn) { clsRest objRest = new clsRest(); string strNextnr = objRest.HttpGet2(clsRest.urlBaseType.sync, "NrSerie/" + nrserienavn); try { return(int.Parse(strNextnr)); } catch (System.InvalidOperationException) { return(0); } }
public void cvnPerson() { string ModelName = "Person"; var qry_medlemmer = from h in Program.karMedlemmer join d1 in Program.dbData3060.TblMedlem on h.Nr equals d1.Nr into details1 from x in details1.DefaultIfEmpty(new TblMedlem { Nr = -1, Kon = null, FodtDato = (DateTime?)null }) //where x.Nr == -1 select new { h.Nr, h.Navn, h.Kaldenavn, h.Adresse, h.Postnr, h.Bynavn, h.Telefon, h.Email, XNr = x == null ? (int?)null : x.Nr, Kon = x == null ? null : x.Kon, FodtDato = x == null ? (DateTime?)null : x.FodtDato, h.Bank }; //var qry = from r in Program.dsMedlemGlobal.Kartotek.AsEnumerable() // select new {r.Nr, r.Navn, r.Kaldenavn, r.Adresse, r.Postnr, r.Bynavn, r.Telefon, r.Email, r.FodtDato, r.Kon, r.Bank}; foreach (var r in qry_medlemmer) { clsRest objRest = new clsRest(); XElement xml = new XElement(ModelName); Type objectType = r.GetType(); PropertyInfo[] properties = objectType.GetProperties(); foreach (PropertyInfo property in properties) { string Name = property.Name; object Val = property.GetValue(r, null); //string NamePropertyType = property.GetValue(r, null).GetType().Name; xml.Add(new XElement(Name, Val)); } string strxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xml.ToString(); string retur = objRest.HttpPost2(clsRest.urlBaseType.sync, "Convert", strxml); if (retur != "Status: 404") { clsSQLite.insertStoreXML(Program.AppEngName, false, "sync/Convert", strxml, retur); } } }
public int OrderFaknrUpdate() { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "orderfaknrupdate"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status != "True") { var qry_fak = from h in xmldata.Descendants("Fak") select new { Key = clsPassXmlDoc.attr_val_string(h, "Key"), Id = clsPassXmlDoc.attr_val_int(h, "Id"), SFakID = clsPassXmlDoc.attr_val_int(h, "SFakID"), SFaknr = clsPassXmlDoc.attr_val_int(h, "SFaknr"), }; var qry = from k in Program.karFakturaer_s where k.faknr > 0 join f in qry_fak on k.fakid equals f.SFakID where f.SFaknr == null select new { f.Key, f.Id, SFaknr = k.faknr, }; int AntalFakturaer = qry.Count(); if (AntalFakturaer > 0) { XElement SFaknrupdatexml = new XElement("SFaknrupdate"); foreach (var k in qry) { XElement fakxml = new XElement("Fak"); fakxml.Add(new XElement("Key", k.Key)); fakxml.Add(new XElement("Id", k.Id)); fakxml.Add(new XElement("SFaknr", k.SFaknr)); SFaknrupdatexml.Add(new XElement(fakxml)); } string strSFaknrupdatexml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + SFaknrupdatexml.ToString(); string result = objRest.HttpPost2(clsRest.urlBaseType.data, "orderfaknrupdate", strSFaknrupdatexml); } return(AntalFakturaer); } return(0); }
private void open() { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "infotekst"); XDocument xdoc = XDocument.Parse(strxmldata); var list = from infotekst in xdoc.Descendants("Infotekst") select infotekst; foreach (var infotekst in list) { recMemInfotekst rec = new recMemInfotekst(); rec.Id = (int)clsPassXmlDoc.attr_val_int(infotekst, "Id"); rec.Navn = clsPassXmlDoc.attr_val_string(infotekst, "Navn"); string Msgtext = clsPassXmlDoc.attr_val_string(infotekst, "Msgtext"); rec.Msgtext = Msgtext.Replace(lf, crlf); this.Add(rec); } }
private void SendModtagPBSfilertoolStripMenuItem_Click(object sender, EventArgs e) { string bigString = null; string smallString = null; clsSFTP objAppEngSFTP = new clsSFTP(); //Send til PBS string Status = "True"; int AntalFilerSendt = 0; clsRest objRest = new clsRest(); while (Status == "True") { string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "tilpbs"); XDocument xmldata = XDocument.Parse(strxmldata); Status = xmldata.Descendants("Status").First().Value; if (Status == "True") { bool bSendt = objAppEngSFTP.WriteTilSFtp(xmldata); if (bSendt) { AntalFilerSendt++; } } } //Modtag fra PBS int AntalFilerModtaget = objAppEngSFTP.ReadFraSFtp(); bigString = String.Format("{0} filer sendt til PBS.\n{1} filer modtaget fra PBS", AntalFilerSendt, AntalFilerModtaget); DialogResult result = DotNetPerls.BetterDialog.ShowDialog( "Send/Modtag PBS filer", //titleString bigString, //bigString smallString, //smallString null, //leftButton "OK", //rightButton global::nsPuls3060.Properties.Resources.Message_info); //iconSet }
private void open() { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "kreditor"); XDocument xdoc = XDocument.Parse(strxmldata); var list = from kreditor in xdoc.Descendants("Kreditor") select kreditor; foreach (var kreditor in list) { recMemKreditor rec = new recMemKreditor(); rec.Id = (int)clsPassXmlDoc.attr_val_int(kreditor, "Id"); rec.Datalevnr = clsPassXmlDoc.attr_val_string(kreditor, "Datalevnr"); rec.Datalevnavn = clsPassXmlDoc.attr_val_string(kreditor, "Datalevnavn"); rec.Pbsnr = clsPassXmlDoc.attr_val_string(kreditor, "Pbsnr"); rec.Delsystem = clsPassXmlDoc.attr_val_string(kreditor, "Delsystem"); rec.Regnr = clsPassXmlDoc.attr_val_string(kreditor, "Regnr"); rec.Kontonr = clsPassXmlDoc.attr_val_string(kreditor, "Kontonr"); rec.Debgrpnr = clsPassXmlDoc.attr_val_string(kreditor, "Debgrpnr"); rec.Sektionnr = clsPassXmlDoc.attr_val_string(kreditor, "Sektionnr"); rec.Transkodebetaling = clsPassXmlDoc.attr_val_string(kreditor, "Transkodebetaling"); this.Add(rec); } }
public clsSFTP() { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "sftp/" + Program.sftpName); XDocument xdoc = XDocument.Parse(strxmldata); string Status = xdoc.Descendants("Status").First().Value; if (Status != "True") { throw new Exception("Getting sftp-data for " + Program.sftpName + " failed."); } m_SftpId = xdoc.Descendants("Id").First().Value; m_SftpNavn = xdoc.Descendants("Navn").First().Value; m_Host = xdoc.Descendants("Host").First().Value; m_Port = xdoc.Descendants("Port").First().Value; m_Certificate = xdoc.Descendants("Certificate").First().Value; m_Pincode = xdoc.Descendants("Pincode").First().Value; m_User = xdoc.Descendants("User").First().Value; m_Outbound = xdoc.Descendants("Outbound").First().Value; m_Inbound = xdoc.Descendants("Inbound").First().Value; m_sftp = new SFtp(); bool success = m_sftp.UnlockComponent("HAFSJOSSH_6pspJCMP1QnW"); if (!success) { throw new Exception(m_sftp.LastErrorText); } m_sftp.ConnectTimeoutMs = 60000; m_sftp.IdleTimeoutMs = 55000; success = m_sftp.Connect(m_Host, int.Parse(m_Port)); if (!success) { throw new Exception(m_sftp.LastErrorText); } Chilkat.SshKey key = new Chilkat.SshKey(); string privKey = m_Certificate; if (privKey == null) { throw new Exception(m_sftp.LastErrorText); } key.Password = m_Pincode; success = key.FromOpenSshPrivateKey(privKey); if (!success) { throw new Exception(m_sftp.LastErrorText); } success = m_sftp.AuthenticatePk(m_User, key); if (!success) { throw new Exception(m_sftp.LastErrorText); } // After authenticating, the SFTP subsystem must be initialized: success = m_sftp.InitializeSftp(); if (!success) { throw new Exception(m_sftp.LastErrorText); } }
public int ReadFraSFtp() { string homedir = m_sftp.RealPath(".", ""); // Open a directory on the server... string handle = m_sftp.OpenDir(m_Outbound); if (handle == null) { throw new Exception(m_sftp.LastErrorText); } // Download the directory listing: Chilkat.SFtpDir dirListing = null; dirListing = m_sftp.ReadDir(handle); if (dirListing == null) { throw new Exception(m_sftp.LastErrorText); } Program.memPbsnetdir = null; //opret ny memPbsnetdir // Iterate over the files. int i; int n = dirListing.NumFilesAndDirs; if (n > 0) { for (i = 0; i <= n - 1; i++) { Chilkat.SFtpFile fileObj = null; fileObj = dirListing.GetFileObject(i); if (!fileObj.IsDirectory) { DateTime testLastAccessTime = fileObj.LastAccessTime; recPbsnetdir rec = new recPbsnetdir { Type = 8, Path = dirListing.OriginalPath, Filename = fileObj.Filename, Size = (int)fileObj.Size32, Atime = Unspecified2Utc(fileObj.LastAccessTime), Mtime = Unspecified2Utc(fileObj.LastModifiedTime), Gid = fileObj.Gid, Uid = fileObj.Uid, Perm = fileObj.Permissions.ToString() }; Program.memPbsnetdir.Add(rec); } } } // Close the directory bool success = m_sftp.CloseHandle(handle); if (!success) { throw new Exception(m_sftp.LastErrorText); } var leftqry_pbsnetdir = from h in Program.memPbsnetdir select h; int AntalFiler = leftqry_pbsnetdir.Count(); if (leftqry_pbsnetdir.Count() > 0) { foreach (var rec_pbsnetdir in leftqry_pbsnetdir) { // Open a file on the server: string fullpath = rec_pbsnetdir.Path + "/" + rec_pbsnetdir.Filename; string filehandle = m_sftp.OpenFile(fullpath, "readOnly", "openExisting"); if (filehandle == null) { throw new Exception(m_sftp.LastErrorText); } int numBytes = (int)rec_pbsnetdir.Size; if (numBytes < 0) { throw new Exception(m_sftp.LastErrorText); } byte[] b_data = null; b_data = m_sftp.ReadFileBytes(handle, numBytes); if (b_data == null) { throw new Exception(m_sftp.LastErrorText); } sendAttachedFile(rec_pbsnetdir.Filename, b_data, false); char[] c_data = System.Text.Encoding.GetEncoding("windows-1252").GetString(b_data).ToCharArray(); string filecontens = new string(c_data); string filecontens2 = filecontens.TrimEnd('\n'); string filecontens3 = filecontens2.TrimEnd('\r'); string filecontens4 = filecontens3.TrimEnd('\n'); XElement xmlPbsfilesAdd = new XElement("Pbsfiles"); xmlPbsfilesAdd.Add(new XElement("Type", rec_pbsnetdir.Type)); xmlPbsfilesAdd.Add(new XElement("Path", rec_pbsnetdir.Path)); xmlPbsfilesAdd.Add(new XElement("Filename", rec_pbsnetdir.Filename)); xmlPbsfilesAdd.Add(new XElement("Size", rec_pbsnetdir.Size)); xmlPbsfilesAdd.Add(new XElement("Atime", rec_pbsnetdir.Atime)); xmlPbsfilesAdd.Add(new XElement("Mtime", rec_pbsnetdir.Mtime)); xmlPbsfilesAdd.Add(new XElement("Transmittime", DateTime.Now)); xmlPbsfilesAdd.Add(new XElement("Data", filecontens4)); string strxmlPbsfilesAdd = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xmlPbsfilesAdd.ToString(); Guid id1 = clsSQLite.insertStoreXML(Program.AppEngName, false, Program.sftpName, strxmlPbsfilesAdd, ""); clsRest objRest = new clsRest(); string strxmldata = objRest.HttpPost2(clsRest.urlBaseType.data, "frapbs", strxmlPbsfilesAdd); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status == "True") { clsSQLite.updateStoreXML(id1, true); } // Close the file. success = m_sftp.CloseHandle(filehandle); if (success != true) { throw new Exception(m_sftp.LastErrorText); } } } return(AntalFiler); }
private void getBetalingsForslag() { int AntalKreditorer = 0; int AntalForslag = 0; clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "overforsel"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status != "True") { return; } var qry_overforsel = from h in xmldata.Descendants("Overforsel") select new clsOverfor { SFakID = clsPassXmlDoc.attr_val_int(h, "SFakID"), }; var qry_Kreditor = from h in Program.karFakturaer_k where h.saldo > 0 join m in Program.karMedlemmer on h.kreditornr.ToString() equals m.Krdktonr where Program.ValidatekBank(m.Bank) join f in qry_overforsel on h.fakid equals f.SFakID into overforsel from f in overforsel.DefaultIfEmpty(new clsOverfor { SFakID = null }) where f.SFakID == null select new { h.fakid, m.Nr, m.Navn, m.Adresse, m.Postnr, m.Bank, h.faknr, h.saldo, }; this.lvwKreditor.Items.Clear(); this.lvwKrdFaktura.Items.Clear(); var antal = qry_Kreditor.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.cmdBetal.Visible = false; pgmForslag.PerformStep(); foreach (var m in qry_Kreditor) { AntalKreditorer++; AntalForslag++; ListViewItem it = lvwKreditor.Items.Add(m.fakid.ToString(), m.Navn, 0); //it.Tag = m; it.SubItems.Add(m.Nr.ToString()); it.SubItems.Add(m.Adresse); it.SubItems.Add(m.Postnr); it.SubItems.Add(m.faknr.ToString()); it.SubItems.Add((((decimal)m.saldo) / 100).ToString()); it.SubItems.Add(m.Bank); pgmForslag.PerformStep(); } this.lvwKreditor.AutoResizeColumns(ColumnHeaderAutoResizeStyle.ColumnContent); if (AntalForslag == 0) { this.Label_Forslagstekst.Text = "Der er ingen forslag"; this.Label_Forslagstekst.Visible = true; this.cmdBetal.Visible = false; } else { this.Label_Forslagstekst.Visible = false; this.cmdBetal.Visible = false; } this.pgmForslag.Visible = false; }
private void ecxelPoster() { DateTime pReadDate = DateTime.Now; string pSheetName = "Poster"; Excel.Application oXL = null;; Excel._Workbook oWB; Excel._Worksheet oSheetPoster; Excel._Worksheet oSheetRegnskab; Excel.Window oWindow; Excel.Range oRng; var rec_regnskab = Program.qryAktivRegnskab(); string SaveAs = rec_regnskab.Eksportmappe + pSheetName + pReadDate.ToString("_yyyyMMdd_hhmmss") + ".xls"; var JournalPoster = from h in Program.karPosteringer join d1 in Program.karKontoplan on h.Konto equals d1.Kontonr into details1 from x in details1.DefaultIfEmpty() orderby h.Nr select new clsJournalposter { ds = (x.Type == "Drift") ? "D" : "S", k = IUAP(x.Type, x.DK), Konto = h.Konto.ToString() + "-" + x.Kontonavn, Dato = h.Dato, Bilag = h.Bilag, Nr = h.Nr, Id = h.Id, Tekst = h.Tekst, Beløb = h.Bruttobeløb, }; clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "personlist"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status != "True") { return; } var MedlemmerAll = from h in xmldata.Descendants("Person") orderby clsPassXmlDoc.attr_val_int(h, "Nr") select new clsMedlemExternAll { Nr = clsPassXmlDoc.attr_val_int(h, "Nr"), Navn = clsPassXmlDoc.attr_val_string(h, "Navn"), Kaldenavn = clsPassXmlDoc.attr_val_string(h, "Kaldenavn"), Adresse = clsPassXmlDoc.attr_val_string(h, "Adresse"), Postnr = clsPassXmlDoc.attr_val_string(h, "Postnr"), Bynavn = clsPassXmlDoc.attr_val_string(h, "Bynavn"), Telefon = clsPassXmlDoc.attr_val_string(h, "Telefon"), Email = clsPassXmlDoc.attr_val_string(h, "Email"), Kon = clsPassXmlDoc.attr_val_string(h, "Kon"), FodtDato = clsPassXmlDoc.attr_val_date(h, "FodtDato"), erMedlem = (clsPassXmlDoc.attr_val_bool(h, "erMedlem")) ? 1 : 0, erPBS = (clsPassXmlDoc.attr_val_bool(h, "Tilmeldtpbs")) ? 1 : 0, }; var erMedlem = from h in MedlemmerAll where h.erMedlem == 1 select h; using (new ExcelUILanguageHelper()) { try { //Start Excel and get Application object. oXL = new Excel.Application(); oXL.Visible = false; //oXL.Visible = true; //For debug //Get a new workbook. oWB = oXL.Workbooks.Add((Missing.Value)); oSheetPoster = (Excel._Worksheet)oWB.ActiveSheet; oWindow = oXL.ActiveWindow; if (pSheetName.Length > 0) { oSheetPoster.Name = pSheetName.Substring(0, pSheetName.Length > 34 ? 34 : pSheetName.Length); } int row = 1; this.MainformProgressBar.Value = 0; this.MainformProgressBar.Minimum = 0; this.MainformProgressBar.Maximum = (from h in Program.karPosteringer select h).Count(); this.MainformProgressBar.Step = 1; this.MainformProgressBar.Visible = true; foreach (clsJournalposter m in JournalPoster) { this.MainformProgressBar.PerformStep(); row++; Type objectType = m.GetType(); PropertyInfo[] properties = objectType.GetProperties(); int col = 0; foreach (PropertyInfo property in properties) { col++; string Name = property.Name; //string NamePropertyType = property.GetValue(m, null).GetType().ToString(); oSheetPoster.Cells[row, col] = property.GetValue(m, null); if (row == 2) { object[] CustomAttributes = property.GetCustomAttributes(false); foreach (var att in CustomAttributes) { Type tp = att.GetType(); if (tp.ToString() == "nsPuls3060.Fieldattr") { Fieldattr attr = (Fieldattr)att; string heading = attr.Heading; oSheetPoster.Cells[1, col] = heading; } } } } } oRng = (Excel.Range)oSheetPoster.Rows[1, Missing.Value]; oRng.Font.Name = "Arial"; oRng.Font.Size = 12; oRng.Font.Strikethrough = false; oRng.Font.Superscript = false; oRng.Font.Subscript = false; oRng.Font.OutlineFont = false; oRng.Font.Shadow = false; oRng.Font.Bold = true; oRng.HorizontalAlignment = Excel.Constants.xlCenter; oRng.VerticalAlignment = Excel.Constants.xlBottom; oRng.WrapText = false; oRng.Orientation = 0; oRng.AddIndent = false; oRng.IndentLevel = 0; oRng.ShrinkToFit = false; oRng.MergeCells = false; string BottomRight = "D" + row.ToString(); oRng = oSheetPoster.get_Range("D2", BottomRight); oRng.NumberFormat = "dd-mm-yyyy"; oSheetPoster.Cells.EntireColumn.AutoFit(); oWindow.SplitRow = 1; oWindow.FreezePanes = true; oSheetPoster.get_Range("A1", Missing.Value).Select(); oSheetRegnskab = (Excel._Worksheet)oWB.Worksheets.Add(System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing); oRng = oSheetRegnskab.get_Range("C2", Missing.Value); oRng.Formula = "Antal medlemmer: " + erMedlem.Count().ToString(); //oXL.Visible = true; //For debug PivotField _pvtField = null; PivotTable _pivot = oSheetPoster.PivotTableWizard( XlPivotTableSourceType.xlDatabase, //SourceType oSheetPoster.get_Range(oSheetPoster.Cells[1, 1], oSheetPoster.Cells[row, 9]), //SourceData oSheetRegnskab.get_Range("A3", Missing.Value), //TableDestination "PivotTable1", //TableName System.Type.Missing, //RowGrand System.Type.Missing, //CollumnGrand System.Type.Missing, //SaveData System.Type.Missing, //HasAutoformat System.Type.Missing, //AutoPage System.Type.Missing, //Reserved System.Type.Missing, //BackgroundQuery System.Type.Missing, //OptimizeCache System.Type.Missing, //PageFieldOrder System.Type.Missing, //PageFieldWrapCount System.Type.Missing, //ReadData System.Type.Missing); //Connection _pvtField = (PivotField)_pivot.PivotFields("ds"); _pvtField.Orientation = XlPivotFieldOrientation.xlRowField; _pvtField = (PivotField)_pivot.PivotFields("k"); _pvtField.Orientation = XlPivotFieldOrientation.xlRowField; _pvtField = (PivotField)_pivot.PivotFields("Konto"); _pvtField.Orientation = XlPivotFieldOrientation.xlRowField; _pvtField = (PivotField)_pivot.PivotFields("Dato"); _pvtField.Orientation = XlPivotFieldOrientation.xlColumnField; _pvtField = (PivotField)_pivot.PivotFields("Beløb"); _pvtField.Orientation = XlPivotFieldOrientation.xlDataField; _pvtField.Function = XlConsolidationFunction.xlSum; _pvtField.NumberFormat = "#,##0"; oSheetRegnskab.Name = "Regnskab"; oRng = oSheetRegnskab.get_Range("D3", Missing.Value); oRng.Select(); bool[] Periods = { false, false, false, false, true, false, false }; oRng.Group(true, true, Missing.Value, Periods); oRng = oSheetRegnskab.get_Range("D4", "P4"); oRng.HorizontalAlignment = Excel.XlHAlign.xlHAlignRight; oSheetRegnskab.PageSetup.LeftHeader = "&14Regnskab Puls 3060"; oSheetRegnskab.PageSetup.CenterHeader = ""; oSheetRegnskab.PageSetup.RightHeader = "&P af &N"; oSheetRegnskab.PageSetup.LeftFooter = "&Z&F"; oSheetRegnskab.PageSetup.CenterFooter = ""; oSheetRegnskab.PageSetup.RightFooter = "&D&T"; oSheetRegnskab.PageSetup.LeftMargin = oXL.InchesToPoints(0.75); oSheetRegnskab.PageSetup.RightMargin = oXL.InchesToPoints(0.75); oSheetRegnskab.PageSetup.TopMargin = oXL.InchesToPoints(1); oSheetRegnskab.PageSetup.BottomMargin = oXL.InchesToPoints(1); oSheetRegnskab.PageSetup.HeaderMargin = oXL.InchesToPoints(0.5); oSheetRegnskab.PageSetup.FooterMargin = oXL.InchesToPoints(0.5); oSheetRegnskab.PageSetup.PrintHeadings = false; oSheetRegnskab.PageSetup.PrintGridlines = true; oSheetRegnskab.PageSetup.CenterHorizontally = false; oSheetRegnskab.PageSetup.CenterVertically = false; oSheetRegnskab.PageSetup.Orientation = XlPageOrientation.xlLandscape; oSheetRegnskab.PageSetup.Draft = false; oSheetRegnskab.PageSetup.PaperSize = XlPaperSize.xlPaperA4; oSheetRegnskab.PageSetup.FirstPageNumber = 1; oSheetRegnskab.PageSetup.Order = XlOrder.xlDownThenOver; oSheetRegnskab.PageSetup.BlackAndWhite = false; oSheetRegnskab.PageSetup.Zoom = 100; oSheetRegnskab.PageSetup.PrintErrors = XlPrintErrors.xlPrintErrorsDisplayed; oWB.ShowPivotTableFieldList = false; for (var i = oWB.Worksheets.Count; i > 0; i--) { Excel._Worksheet oSheetWrk = (Excel._Worksheet)oWB.Worksheets.get_Item(i); if ((oSheetWrk.Name != "Regnskab") && (oSheetWrk.Name != "Poster")) { oSheetWrk.Delete(); } } oSheetRegnskab.get_Range("A1", Missing.Value).Select(); oWB.SaveAs(SaveAs, Excel.XlFileFormat.xlWorkbookNormal, "", "", false, false, Excel.XlSaveAsAccessMode.xlExclusive, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value); oWB.Saved = true; oXL.Visible = true; this.MainformProgressBar.Visible = false; this.sendPoster(SaveAs); //oXL.Quit(); //oXL = null; } catch (Exception theException) { String errorMessage; errorMessage = "Error: "; errorMessage = String.Concat(errorMessage, theException.Message); errorMessage = String.Concat(errorMessage, " Line: "); errorMessage = String.Concat(errorMessage, theException.Source); MessageBox.Show(errorMessage, "Error"); } } }
private void getKontingentForslag() { DateTime KontingentFradato = DateTime.MinValue; DateTime KontingentTildato = DateTime.MinValue; bool tilmeldtpbs = false; bool indmeldelse = false; int AntalMedlemmer = 0; int AntalForslag = 0; double dkontingent; int ikontingent; this.lvwMedlem.Items.Clear(); this.lvwKontingent.Items.Clear(); var antal = 2; 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(); clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "kontingentforslag"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status == "True") { var list = from forslag in xmldata.Descendants("KontingentForslag") select forslag; antal = list.Count(); foreach (var forslag in list) { AntalMedlemmer++; tilmeldtpbs = false; indmeldelse = false; var wNr = forslag.Descendants("Nr").First().Value.Trim(); var wNavn = forslag.Descendants("Navn").First().Value.Trim(); var wAdresse = forslag.Descendants("Adresse").First().Value.Trim(); var wPostnr = forslag.Descendants("Postnr").First().Value.Trim(); KontingentFradato = DateTime.Parse(forslag.Descendants("KontingentFradato").First().Value.Trim()); tilmeldtpbs = (forslag.Descendants("Indmeldelse").First().Value.Trim() == "True") ? true : false; tilmeldtpbs = (forslag.Descendants("Tilmeldtpbs").First().Value.Trim() == "True") ? true : false; AntalForslag++; //tilmeldtpbs = clsPbs.gettilmeldtpbs(m.Nr); switch (KontingentFradato.Month) { case 1: case 2: case 3: case 4: case 5: case 6: KontingentTildato = new DateTime(KontingentFradato.Year, 12, 31); if (indmeldelse) { dkontingent = double.Parse(this.AarskontingentPbs.Text); } else { dkontingent = (tilmeldtpbs) ? double.Parse(this.AarskontingentPbs.Text) : double.Parse(this.Aarskontingent.Text); } break; default: KontingentTildato = new DateTime(KontingentFradato.Year + 1, 12, 31); if (indmeldelse) { dkontingent = double.Parse(this.AarskontingentPbs.Text) * 3 / 2; } else { dkontingent = (tilmeldtpbs) ? double.Parse(this.AarskontingentPbs.Text) * 3 / 2 : double.Parse(this.Aarskontingent.Text) * 3 / 2; } break; } ikontingent = (int)dkontingent; ListViewItem it = lvwKontingent.Items.Add(wNr, wNavn, 0); //it.Tag = m; it.SubItems.Add(wNr); it.SubItems.Add(wAdresse); it.SubItems.Add(wPostnr); 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; }
public int BogforIndBetalinger() { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "bogforindbetalinger"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status != "True") { int saveBetid = 0; var qry_bet = from h in xmldata.Descendants("BogforIndBetalinger") select new { Frapbsid = clsPassXmlDoc.attr_val_int(h, "Frapbsid"), Betid = (int)clsPassXmlDoc.attr_val_int(h, "Betid"), Fakid = clsPassXmlDoc.attr_val_int(h, "Fakid"), Betlinid = clsPassXmlDoc.attr_val_int(h, "Betlinid"), Nr = clsPassXmlDoc.attr_val_int(h, "Nr"), Leverancespecifikation = clsPassXmlDoc.attr_val_string(h, "Leverancespecifikation"), GruppeIndbetalingsbelob = (decimal)clsPassXmlDoc.attr_val_double(h, "GruppeIndbetalingsbelob"), Betalingsdato = clsPassXmlDoc.attr_val_date(h, "Betalingsdato"), Indbetalingsdato = clsPassXmlDoc.attr_val_date(h, "Indbetalingsdato"), Indbetalingsbelob = (decimal)clsPassXmlDoc.attr_val_double(h, "Indbetalingsbelob"), SFakID = (int)clsPassXmlDoc.attr_val_int(h, "SFakID"), SFaknr = clsPassXmlDoc.attr_val_int(h, "SFaknr"), }; var bogf = from s in Program.karFakturaer_s //where s.saldo != 0 join f in qry_bet on s.fakid equals f.SFakID where f.SFaknr != null join m in Program.karMedlemmer on f.Nr equals m.Nr orderby f.Frapbsid, f.Betid, f.Betlinid select new { f.Frapbsid, f.Leverancespecifikation, f.Betid, f.GruppeIndbetalingsbelob, f.Betlinid, f.Fakid, f.Betalingsdato, f.Indbetalingsdato, m.Navn, f.Indbetalingsbelob, f.SFaknr }; int AntalBetalinger = bogf.Count(); 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; XElement SummabogfortUpdatexml = new XElement("SummabogfortUpdate"); foreach (var b in bogf) { if (saveBetid != b.Betid) // ny gruppe { saveBetid = b.Betid; recKladde gkl = new recKladde { Dato = ToDay, //(b.Betalingsdato > b.Indbetalingsdato) ? (DateTime)b.Betalingsdato : (DateTime)b.Indbetalingsdato, Bilag = ++BS1_SidsteNr, Tekst = "Indbetalingskort K 81131945-" + ((DateTime)b.Indbetalingsdato).Day + "." + ((DateTime)b.Indbetalingsdato).Month, Afstemningskonto = "Bank", Belob = b.GruppeIndbetalingsbelob, Kontonr = null, Faknr = null }; Program.karKladde.Add(gkl); XElement betxml = new XElement("Bet"); betxml.Add(new XElement("Id", b.Betid)); betxml.Add(new XElement("Summabogfort", true)); SummabogfortUpdatexml.Add(new XElement(betxml)); } recKladde kl = new recKladde { Dato = ToDay, //(b.Betalingsdato > b.Indbetalingsdato) ? (DateTime)b.Betalingsdato : (DateTime)b.Indbetalingsdato, Bilag = BS1_SidsteNr, Tekst = "F" + b.SFaknr + " " + b.Navn, Afstemningskonto = null, Belob = b.Indbetalingsbelob, Kontonr = 56100, Faknr = b.SFaknr }; Program.karKladde.Add(kl); } string strSummabogfortUpdatexml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + SummabogfortUpdatexml.ToString(); string result = objRest.HttpPost2(clsRest.urlBaseType.data, "bogforindbetalinger", strSummabogfortUpdatexml); Program.karStatus.save(); Program.karKladde.save(); } return(AntalBetalinger); } return(0); }
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; } }
public int Order2Summa() { 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; } } int AntalOrdre = 0; clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "order2summa"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status != "True") { return(AntalOrdre); } var qry_ord = from forslag in xmldata.Descendants("Fak") select forslag; AntalOrdre = qry_ord.Count(); if (AntalOrdre > 0) { DateTime nu = DateTime.Now; DateTime ToDay = new DateTime(nu.Year, nu.Month, nu.Day);; int SidsteSFakID; int SidsteRec_no; try { SidsteSFakID = (from f in Program.karFakturaer_s select f.fakid).Max(); } catch (System.InvalidOperationException) { SidsteSFakID = 0; } try { SidsteRec_no = (from f in Program.karFakturaer_s select f.rec_no).Max(); } catch (System.InvalidOperationException) { SidsteRec_no = 0; } Program.karFakturastr_s = null; Program.karFakturavarer_s = null; XElement SFakIDupdatexml = new XElement("SFakIDupdate"); foreach (var o in qry_ord) { string Key = o.Descendants("Key").First().Value; string strval = o.Descendants("Id").First().Value; int Id = int.Parse(strval); strval = o.Descendants("Nr").First().Value; int Nr = int.Parse(strval); strval = o.Descendants("Advisbelob").First().Value; double Advisbelob = double.Parse(strval.Replace('.', ',')); strval = o.Descendants("Pbsfaknr").First().Value; int Pbsfaknr = int.Parse(strval); strval = o.Descendants("Vnr").First().Value; int Vnr = int.Parse(strval); strval = o.Descendants("Bogfkonto").First().Value; int Bogfkonto = int.Parse(strval); SidsteSFakID++; SidsteRec_no++; int orebelob = (int)Advisbelob * 100; ordtype_s ord = new ordtype_s ( SidsteSFakID, //fakid ToDay, //(o.Betalingsdato > o.Indbetalingsdato) ? (DateTime)o.Betalingsdato : (DateTime)o.Indbetalingsdato, //dato ToDay, //(DateTime)o.Betalingsdato, //forfaldsdato orebelob, //fakbeløb i øre (int)Nr2Debktonr(Nr) //debitornr ); recFakturaer_s rec = new recFakturaer_s { rec_no = SidsteRec_no, rec_data = ord }; Program.karFakturaer_s.Add(rec); var m_rec = (from m in Program.karMedlemmer where m.Nr == Nr select m).First(); recFakturastr_s rec_Fakturastr_s = new recFakturastr_s { Fakid = SidsteSFakID.ToString(), Navn = m_rec.Navn, Adresse = m_rec.Adresse, Postnr = m_rec.Postnr, Bynavn = m_rec.Bynavn, Faknr = (int)Pbsfaknr, Email = m_rec.Email }; Program.karFakturastr_s.Add(rec_Fakturastr_s); recFakturavarer_s rec_Fakturavarer_s = new recFakturavarer_s { Fakid = SidsteSFakID.ToString(), Varenr = (int)Vnr, VareTekst = "Puls 3060 kontingent", Bogfkonto = (int)Bogfkonto, Antal = 1, Fakturabelob = (double)Advisbelob }; Program.karFakturavarer_s.Add(rec_Fakturavarer_s); try { XElement fakxml = new XElement("Fak"); fakxml.Add(new XElement("Key", Key)); fakxml.Add(new XElement("Id", Id)); fakxml.Add(new XElement("SFakID", SidsteSFakID)); SFakIDupdatexml.Add(new XElement(fakxml)); } catch (System.InvalidOperationException) { throw; } } string strSFakIDupdatexml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + SFakIDupdatexml.ToString(); string result = objRest.HttpPost2(clsRest.urlBaseType.data, "order2summa", strSFakIDupdatexml); Program.karFakturaer_s.save(); Program.karFakturastr_s.save(); Program.karFakturavarer_s.save(); try { recStatus rec_Status = (from s in Program.karStatus where s.key == "SidsteSFakID" select s).First(); rec_Status.value = SidsteSFakID.ToString(); } catch (System.InvalidOperationException) { recStatus rec_Status = new recStatus { key = "SidsteSFakID", value = SidsteSFakID.ToString() }; Program.karStatus.Add(rec_Status); } Program.karStatus.save(); } return(AntalOrdre); }
private void getRykkerForslag() { int AntalForslag = 0; string Status = "False"; IEnumerable <clsqry_medlemmer> qry_medlemmer; if (this.RykketTidligere.Checked) { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "tidligererykker"); XDocument xmldata = XDocument.Parse(strxmldata); Status = xmldata.Descendants("Status").First().Value; qry_medlemmer = from h in xmldata.Descendants("RykkerForslag") orderby clsPassXmlDoc.attr_val_int(h, "Nr") select new clsqry_medlemmer { Nr = clsPassXmlDoc.attr_val_int(h, "Nr"), Navn = clsPassXmlDoc.attr_val_string(h, "Navn"), Adresse = clsPassXmlDoc.attr_val_string(h, "Adresse"), Postnr = clsPassXmlDoc.attr_val_string(h, "Postnr"), Betalingsdato = clsPassXmlDoc.attr_val_date(h, "Betalingsdato"), Advisbelob = (decimal)clsPassXmlDoc.attr_val_double(h, "Advisbelob"), Faknr = clsPassXmlDoc.attr_val_int(h, "Faknr") }; } else { clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "rykkerforslag"); XDocument xmldata = XDocument.Parse(strxmldata); Status = xmldata.Descendants("Status").First().Value; qry_medlemmer = from h in xmldata.Descendants("RykkerForslag") orderby clsPassXmlDoc.attr_val_int(h, "Nr") select new clsqry_medlemmer { Nr = clsPassXmlDoc.attr_val_int(h, "Nr"), Navn = clsPassXmlDoc.attr_val_string(h, "Navn"), Adresse = clsPassXmlDoc.attr_val_string(h, "Adresse"), Postnr = clsPassXmlDoc.attr_val_string(h, "Postnr"), Betalingsdato = clsPassXmlDoc.attr_val_date(h, "Betalingsdato"), Advisbelob = (decimal)clsPassXmlDoc.attr_val_double(h, "Advisbelob"), Faknr = clsPassXmlDoc.attr_val_int(h, "Faknr") }; } var antal = qry_medlemmer.Count(); this.lvwMedlem.Items.Clear(); this.lvwRykker.Items.Clear(); 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.cmdRykkere.Visible = false; this.DelsystemBSH.Visible = false; pgmForslag.PerformStep(); foreach (var m in qry_medlemmer) { AntalForslag++; ListViewItem it = lvwMedlem.Items.Add(m.Nr.ToString(), m.Navn, 0); //it.Tag = m; it.SubItems.Add(m.Nr.ToString()); it.SubItems.Add(m.Adresse); it.SubItems.Add(m.Postnr); it.SubItems.Add(string.Format("{0:yyyy-MM-dd}", m.Betalingsdato)); it.SubItems.Add(m.Advisbelob.ToString()); it.SubItems.Add(m.Faknr.ToString()); pgmForslag.PerformStep(); } this.lvwMedlem.AutoResizeColumns(ColumnHeaderAutoResizeStyle.ColumnContent); if (AntalForslag == 0) { this.Label_Forslagstekst.Text = "Der er ingen forslag"; this.Label_Forslagstekst.Visible = true; this.cmdRykkere.Visible = false; this.DelsystemBSH.Visible = false; } else { this.Label_Forslagstekst.Visible = false; //this.cmdRykkere.Visible = true; //this.DelsystemBSH.Visible = true; } this.pgmForslag.Visible = false; }
private void cmdRykkere_Click(object sender, EventArgs e) { string TilPBSFilename; int imax; string keyval; int faknr; double advisbelob; if ((this.cmdRykkere.Text == "Afslut")) { this.Close(); } this.cmdForslag.Visible = false; this.cmdCancel.Visible = false; imax = lvwRykker.Items.Count; this.pgmRykker.Maximum = (imax * 4); this.pgmRykker.Minimum = 0; this.pgmRykker.Value = 0; this.pgmRykker.Visible = true; if ((imax == 0)) { this.Label_Rykkertekst.Text = "Der ikke noget at rykkere"; this.Label_Rykkertekst.Visible = true; } else { XElement headxml = new XElement("TempRykkerforslag"); headxml.Add(new XElement("Betalingsdato", clsUtil.bankdageplus(DateTime.Today, 5))); headxml.Add(new XElement("Bsh", this.DelsystemBSH.Checked)); var i = 0; foreach (ListViewItem lvi in lvwRykker.Items) { this.pgmRykker.Value = ++i; keyval = lvi.Name; advisbelob = double.Parse(lvi.SubItems[5].Text); faknr = int.Parse(lvi.SubItems[6].Text); XElement linxml = new XElement("TempRykkerforslaglinie"); linxml.Add(new XElement("Nr", int.Parse(keyval))); linxml.Add(new XElement("Advisbelob", (decimal)advisbelob)); 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 strxmldata = objRest.HttpPost2(clsRest.urlBaseType.data, "pbs601", strheadxml); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status == "True") { if (this.DelsystemBSH.Checked) //RYKKERE med Indbetalingskort { //objPbs601.faktura_og_rykker_601_action(m_lobnr, fakType.fdrykker); //this.pgmRykker.Value = (imax * 3); //clsSFTP objSFTP = new clsSFTP(); //objSFTP.WriteTilSFtp(m_lobnr); //objSFTP.DisconnectSFtp(); //objSFTP = null; } else //RYKKERE som emails { var qry_email = from rykkeremail in xmldata.Descendants("RykkerEmail") select new { Navn = clsPassXmlDoc.attr_val_string(rykkeremail, "Navn"), Email = clsPassXmlDoc.attr_val_string(rykkeremail, "Email"), Emne = clsPassXmlDoc.attr_val_string(rykkeremail, "Emne"), Tekst = clsPassXmlDoc.attr_val_string(rykkeremail, "Tekst"), }; foreach (var rykkeremail in qry_email) { sendRykkerEmail(rykkeremail.Navn, rykkeremail.Email, rykkeremail.Emne, rykkeremail.Tekst); } } this.pgmRykker.Value = (imax * 3); } } this.pgmRykker.Value = (imax * 4); cmdRykkere.Text = "Afslut"; TilPBSFilename = "PBSNotFound.lst"; this.Label_Rykkertekst.Text = ("Leverance til PBS er gemt i filen " + TilPBSFilename); this.Label_Rykkertekst.Visible = true; this.pgmRykker.Visible = false; }
public void overfoersel_mail(int lobnr) { Chilkat.MailMan mailman = new Chilkat.MailMan(); bool success; success = mailman.UnlockComponent("HAFSJOMAILQ_9QYSMgP0oR1h"); if (success != true) { throw new Exception(mailman.LastErrorText); } // Use the GMail SMTP server mailman.SmtpHost = Program.Smtphost; mailman.SmtpPort = int.Parse(Program.Smtpport); mailman.SmtpSsl = bool.Parse(Program.Smtpssl); // Set the SMTP login/password. mailman.SmtpUsername = Program.Smtpuser; mailman.SmtpPassword = Program.Smtppasswd; XElement headxml = new XElement("OverforselMail"); headxml.Add(new XElement("Lobnr", lobnr)); clsRest objRest = new clsRest(); string strheadxml = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + headxml.ToString(); string result = objRest.HttpPost2(clsRest.urlBaseType.data, "overforselmail", strheadxml); XDocument xmldata = XDocument.Parse(result); string Status = xmldata.Descendants("Status").First().Value; if (Status == "True") { var qry_email = from overforselemail in xmldata.Descendants("OverforselEmail") select new { Navn = clsPassXmlDoc.attr_val_string(overforselemail, "Navn"), Email = clsPassXmlDoc.attr_val_string(overforselemail, "Email"), Tekst = clsPassXmlDoc.attr_val_string(overforselemail, "Tekst"), }; foreach (var msg in qry_email) { // Create a new email object Chilkat.Email email = new Chilkat.Email(); #if (DEBUG) email.Subject = "TEST Bankoverførsel fra Puls 3060: skal sendes til " + Program.MailToName + " " + Program.MailToAddr; email.AddTo(Program.MailToName, Program.MailToAddr); #else email.Subject = "Bankoverførsel fra Puls 3060"; if (msg.Email.Length > 0) { email.AddTo(msg.Navn, msg.Email); email.AddBcc(Program.MailToName, Program.MailToAddr); } else { email.Subject += ": skal sendes til " + msg.Navn; email.AddTo(Program.MailToName, Program.MailToAddr); } #endif email.Body = msg.Tekst; email.From = Program.MailFrom; email.ReplyTo = Program.MailReply; success = mailman.SendEmail(email); if (success != true) { throw new Exception(email.LastErrorText); } } } }
public void NrSerieSetupAll() { clsRest objRest = new clsRest(); string retur = objRest.HttpGet2(clsRest.urlBaseType.data, "nrseriesetupall"); }
private void cmdFakturer_Click(object sender, EventArgs e) { string TilPBSFilename = "Unknown"; //int AntalFakturaer; 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 { XElement headxml = new XElement("TempKontforslag"); headxml.Add(new XElement("Betalingsdato", clsUtil.bankdageplus(this.DatoKontingentForfald.Value, 0))); headxml.Add(new XElement("Bsh", this.DelsystemBSH.Checked)); 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; XElement linxml = new XElement("TempKontforslaglinie"); linxml.Add(new XElement("Nr", int.Parse(keyval))); linxml.Add(new XElement("Advisbelob", (decimal)advisbelob)); linxml.Add(new XElement("Fradato", fradato)); linxml.Add(new XElement("Tildato", tildato)); linxml.Add(new XElement("Indmeldelse", indmeldelse)); linxml.Add(new XElement("Tilmeldtpbs", tilmeldtpbs)); 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, "pbs601", strheadxml); /* * clsPbs601 objPbs601 = new clsPbs601(); * nsPuls3060.clsPbs601.SetLobnr += new nsPuls3060.clsPbs601.Pbs601DelegateHandler(On_clsPbs601_SetLobnr); * * AntalFakturaer = objPbs601.kontingent_fakturer_bs1(); * this.pgmFaktura.Value = imax * 2; * if ((AntalFakturaer > 0)) * { * objPbs601.faktura_og_rykker_601_action(m_lobnr, fakType.fdfaktura); * this.pgmFaktura.Value = (imax * 3); * clsSFTP objSFTP = new clsSFTP(); * TilPBSFilename = objSFTP.WriteTilSFtp(m_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; } }
public int BogforUdBetalinger(int lobnr) { int AntalBetalinger = 0; clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "udbetaling2summa/" + lobnr.ToString()); XDocument xmldata = XDocument.Parse(strxmldata); string Status2 = xmldata.Descendants("Status").First().Value; if (Status2 == "True") { var overforsel = from o in xmldata.Descendants("Overforsel") select new { Id = clsPassXmlDoc.attr_val_int(o, "Id"), Nr = clsPassXmlDoc.attr_val_int(o, "Nr"), SFaknr = clsPassXmlDoc.attr_val_int(o, "SFaknr"), SFakID = clsPassXmlDoc.attr_val_int(o, "SFakID"), Tilpbsid = clsPassXmlDoc.attr_val_int(o, "Tilpbsid"), Betalingsdato = clsPassXmlDoc.attr_val_datetime(o, "Betalingsdato"), Advisbelob = (decimal)clsPassXmlDoc.attr_val_double(o, "Advisbelob"), }; var bogf = from f in Program.karFakturaer_k where f.saldo != 0 join o in overforsel on f.fakid equals o.SFakID where o.Tilpbsid == lobnr join m in Program.karMedlemmer on o.Nr equals m.Nr orderby o.Betalingsdato ascending select new { Fakid = o.Id, m.Navn, o.SFaknr, o.Betalingsdato, o.Advisbelob }; AntalBetalinger = bogf.Count(); if (bogf.Count() > 0) { 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 gkl = new recKladde { Dato = clsUtil.bankdageplus((DateTime)b.Betalingsdato, -1), Bilag = ++BS1_SidsteNr, Tekst = "Overførsel", Afstemningskonto = "Bank", Belob = -b.Advisbelob, Kontonr = null, Faknr = null }; Program.karKladde.Add(gkl); recKladde kl = new recKladde { Dato = clsUtil.bankdageplus((DateTime)b.Betalingsdato, -1), Bilag = BS1_SidsteNr, Tekst = "KF" + b.SFaknr + " " + b.Navn, Afstemningskonto = null, Belob = -b.Advisbelob, Kontonr = 65100, Faknr = b.SFaknr }; Program.karKladde.Add(kl); } Program.karStatus.save(); Program.karKladde.save(); } } return(AntalBetalinger); }
private void excelNotPBS() { DateTime pReadDate = DateTime.Now; string pSheetName = "MedlemNotPBS"; Excel.Application oXL = null;; Excel._Workbook oWB; Excel._Worksheet oSheet; Excel.Window oWindow; Excel.Range oRng; var rec_regnskab = Program.qryAktivRegnskab(); string SaveAs = rec_regnskab.Eksportmappe + pSheetName + pReadDate.ToString("_yyyyMMdd_hhmmss") + ".xls"; clsRest objRest = new clsRest(); string strxmldata = objRest.HttpGet2(clsRest.urlBaseType.data, "personlist"); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status != "True") { return; } var MedlemmerAll = from h in xmldata.Descendants("Person") orderby clsPassXmlDoc.attr_val_int(h, "Nr") select new clsMedlemExternAll { Nr = clsPassXmlDoc.attr_val_int(h, "Nr"), Navn = clsPassXmlDoc.attr_val_string(h, "Navn"), Kaldenavn = clsPassXmlDoc.attr_val_string(h, "Kaldenavn"), Adresse = clsPassXmlDoc.attr_val_string(h, "Adresse"), Postnr = clsPassXmlDoc.attr_val_string(h, "Postnr"), Bynavn = clsPassXmlDoc.attr_val_string(h, "Bynavn"), Telefon = clsPassXmlDoc.attr_val_string(h, "Telefon"), Email = clsPassXmlDoc.attr_val_string(h, "Email"), Kon = clsPassXmlDoc.attr_val_string(h, "Kon"), FodtDato = clsPassXmlDoc.attr_val_date(h, "FodtDato"), erMedlem = (clsPassXmlDoc.attr_val_bool(h, "erMedlem")) ? 1 : 0, erPBS = (clsPassXmlDoc.attr_val_bool(h, "Tilmeldtpbs")) ? 1 : 0, }; var MedlemmerNotPBS = from h in MedlemmerAll where h.erMedlem == 1 && h.erPBS == 0 select new clsMedlemNotPBS { Nr = h.Nr, Navn = h.Navn, Kaldenavn = h.Kaldenavn, Adresse = h.Adresse, Postnr = h.Postnr, Bynavn = h.Bynavn, Telefon = h.Telefon, Email = h.Email, Kon = h.Kon, PBSnr = "03985644", Debgrnr = "00001", Kundenr = 032001610000000 + (int)h.Nr }; using (new ExcelUILanguageHelper()) { try { //Start Excel and get Application object. oXL = new Excel.Application(); oXL.Visible = true; //Get a new workbook. oWB = oXL.Workbooks.Add((Missing.Value)); oSheet = (Excel._Worksheet)oWB.ActiveSheet; oWindow = oXL.ActiveWindow; if (pSheetName.Length > 0) { oSheet.Name = pSheetName.Substring(0, pSheetName.Length > 34 ? 34 : pSheetName.Length); } int row = 1; this.MainformProgressBar.Value = 0; this.MainformProgressBar.Minimum = 0; this.MainformProgressBar.Maximum = (from h in Program.karMedlemmer select h).Count(); this.MainformProgressBar.Step = 1; this.MainformProgressBar.Visible = true; foreach (clsMedlemNotPBS m in MedlemmerNotPBS) { this.MainformProgressBar.PerformStep(); row++; Type objectType = m.GetType(); PropertyInfo[] properties = objectType.GetProperties(); int col = 0; foreach (PropertyInfo property in properties) { col++; string Name = property.Name; //string NamePropertyType = property.GetValue(m, null).GetType().ToString(); oSheet.Cells[row, col] = property.GetValue(m, null); if (row == 2) { object[] CustomAttributes = property.GetCustomAttributes(false); foreach (var att in CustomAttributes) { Type tp = att.GetType(); if (tp.ToString() == "nsPuls3060.Fieldattr") { Fieldattr attr = (Fieldattr)att; string heading = attr.Heading; oSheet.Cells[1, col] = heading; } } } } } oRng = (Excel.Range)oSheet.Rows[1, Missing.Value]; oRng.Font.Name = "Arial"; oRng.Font.Size = 12; oRng.Font.Strikethrough = false; oRng.Font.Superscript = false; oRng.Font.Subscript = false; oRng.Font.OutlineFont = false; oRng.Font.Shadow = false; oRng.Font.Bold = true; oRng.HorizontalAlignment = Excel.Constants.xlCenter; oRng.VerticalAlignment = Excel.Constants.xlBottom; oRng.WrapText = false; oRng.Orientation = 0; oRng.AddIndent = false; oRng.IndentLevel = 0; oRng.ShrinkToFit = false; oRng.MergeCells = false; string BottomRight = "L" + row.ToString(); oRng = oSheet.get_Range("L2", BottomRight); oRng.NumberFormat = "##############"; oSheet.Cells.EntireColumn.AutoFit(); oWindow.SplitRow = 1; oWindow.SplitColumn = 2; oWindow.FreezePanes = true; oSheet.get_Range("A1", Missing.Value).Select(); for (var i = oWB.Worksheets.Count; i > 0; i--) { Excel._Worksheet oSheetWrk = (Excel._Worksheet)oWB.Worksheets.get_Item(i); if (oSheetWrk.Name != "MedlemNotPBS") { oSheetWrk.Delete(); } } oWB.SaveAs(SaveAs, Excel.XlFileFormat.xlWorkbookNormal, "", "", false, false, Excel.XlSaveAsAccessMode.xlExclusive, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value); oWB.Saved = true; oXL.Visible = true; this.MainformProgressBar.Visible = false; this.sendNotPBS(SaveAs); //oXL.Quit(); //oXL = null; } catch (Exception theException) { String errorMessage; errorMessage = "Error: "; errorMessage = String.Concat(errorMessage, theException.Message); errorMessage = String.Concat(errorMessage, " Line: "); errorMessage = String.Concat(errorMessage, theException.Source); MessageBox.Show(errorMessage, "Error"); } } }
public void reindexPerson() { clsRest objRest = new clsRest(); string retur = objRest.HttpGet2(clsRest.urlBaseType.data, "reindex"); }
public bool WriteTilSFtp(XDocument xdoc) { Guid id1 = clsSQLite.insertStoreXML(Program.sftpName, false, Program.AppEngName, xdoc.ToString(), ""); m_SendqueueId = xdoc.Descendants("Sendqueue").Descendants("Id").First().Value; m_PbsfileId = xdoc.Descendants("Pbsfile").Descendants("Id").First().Value; m_TilPBSFilename = xdoc.Descendants("Pbsfile").Descendants("TilPBSFilename").First().Value; m_Transmisionsdato = DateTime.Parse(xdoc.Descendants("Pbsfile").Descendants("Transmisionsdato").First().Value); m_SendData = xdoc.Descendants("Pbsfile").Descendants("SendData").First().Value; bool success; string TilPBSFilename = m_TilPBSFilename; string TilPBSFile = m_SendData; char[] c_TilPBSFile = TilPBSFile.ToCharArray(); byte[] b_TilPBSFile = System.Text.Encoding.GetEncoding("windows-1252").GetBytes(c_TilPBSFile); int FilesSize = b_TilPBSFile.Length; sendAttachedFile(TilPBSFilename, b_TilPBSFile, true); string fullpath = m_Inbound + "/" + TilPBSFilename; string handle = m_sftp.OpenFile(fullpath, "writeOnly", "createTruncate"); if (handle == null) { throw new Exception(m_sftp.LastErrorText); } success = m_sftp.WriteFileBytes(handle, b_TilPBSFile); if (!success) { throw new Exception(m_sftp.LastErrorText); } success = m_sftp.CloseHandle(handle); if (success != true) { throw new Exception(m_sftp.LastErrorText); } clsSQLite.updateStoreXML(id1, true); XElement xmlPbsfilesUpdate = new XElement("Pbsfiles"); xmlPbsfilesUpdate.Add(new XElement("SendqueueId", m_SendqueueId)); xmlPbsfilesUpdate.Add(new XElement("Id", m_PbsfileId)); xmlPbsfilesUpdate.Add(new XElement("Type", 8)); xmlPbsfilesUpdate.Add(new XElement("Path", m_Inbound)); xmlPbsfilesUpdate.Add(new XElement("Filename", TilPBSFilename)); xmlPbsfilesUpdate.Add(new XElement("Size", FilesSize)); xmlPbsfilesUpdate.Add(new XElement("Atime", DateTime.Now)); xmlPbsfilesUpdate.Add(new XElement("Mtime", DateTime.Now)); xmlPbsfilesUpdate.Add(new XElement("Transmittime", m_Transmisionsdato)); string strxmlPbsfilesUpdate = @"<?xml version=""1.0"" encoding=""utf-8"" ?> " + xmlPbsfilesUpdate.ToString();; Guid id2 = clsSQLite.insertStoreXML(Program.AppEngName, false, Program.sftpName, strxmlPbsfilesUpdate, ""); clsRest objRest = new clsRest(); string strxmldata = objRest.HttpPost2(clsRest.urlBaseType.data, "tilpbs", strxmlPbsfilesUpdate); XDocument xmldata = XDocument.Parse(strxmldata); string Status = xmldata.Descendants("Status").First().Value; if (Status == "True") { clsSQLite.updateStoreXML(id2, true); return(true); } else { return(false); } }
public void fillPerson() { clsRest objRest = new clsRest(); string retur = objRest.HttpGet2(clsRest.urlBaseType.sync, "Medlem"); XDocument xdoc = XDocument.Parse(retur); var list = from person in xdoc.Descendants("Person") select person; int antal = list.Count(); foreach (var person in list) { if ((person.Descendants("Nr").First().Value != null) && (person.Descendants("Nr").First().Value != "None")) { var Nr = person.Descendants("Nr").First().Value.Trim(); var Navn = person.Descendants("Navn").First().Value.Trim(); var Kaldenavn = person.Descendants("Kaldenavn").First().Value.Trim(); var Adresse = person.Descendants("Adresse").First().Value.Trim(); var Postnr = person.Descendants("Postnr").First().Value.Trim(); var Bynavn = person.Descendants("Bynavn").First().Value.Trim(); var Telefon = person.Descendants("Telefon").First().Value.Trim(); if (Telefon == "None") { Telefon = ""; } var Email = person.Descendants("Email").First().Value.Trim(); if (Email == "None") { Email = ""; } var Kon = person.Descendants("Kon").First().Value.Trim(); var FodtDato = person.Descendants("FodtDato").First().Value.Trim(); var Bank = person.Descendants("Bank").First().Value.Trim(); if (Bank == "None") { Bank = ""; } tblPersonRow PersonRow = (tblPersonRow)tabletblPerson.Rows.Add( Nr, Navn, Kaldenavn, Adresse, Postnr, Bynavn, Telefon, Email, Kon, FodtDato, Bank ); PersonRow.AcceptChanges(); tblSyncPersonRow SyncPersonRow = (tblSyncPersonRow)tabletblSyncPerson.Rows.Add( Nr, Navn, Kaldenavn, Adresse, Postnr, Bynavn, Telefon, Email, Bank ); SyncPersonRow.AcceptChanges(); } } }