public frmBetalingenBestand(DataAdapters da) { InitializeComponent(); param = new tblParameters(); betalingen = da.VulBetalingRecords(); dataAdaptor = da; _windowState = new PersistWindowState(this, @"Leden\BetalingenBestand"); PersistControlValue.ReadControlValue(txtFilePrefixB); PersistControlValue.ReadControlValue(txtFileSeqnrB); PersistControlValue.ReadControlValue(txtMsgIDB); PersistControlValue.ReadControlValue(txtOutputLocationIncB); PersistControlValue.ReadControlValue(chkPrintVerslagB); int nbrBetalingen = 0; decimal sumBetalingen = 0; foreach (tblBetaling betaling in betalingen) { if (betaling.Verstuurd) { continue; } sumBetalingen += betaling.TotaalBedrag; nbrBetalingen++; } lblMessage.Text = "Aantal: " + nbrBetalingen.ToString() + " - Bedrag: " + sumBetalingen.ToEuroString(); }
public frmEenmaligeBetaling(DataAdapters da) { InitializeComponent(); param = new tblParameters(); dataAdaptor = da; betalingen = da.VulBetalingRecords(); _windowState = new PersistWindowState(this, @"Leden\EenmaligeBetaling"); PersistControlValue.ReadControlValue(chkFilter); SetChangeMode(false); cboTypeRekening.Items.AddRange(tblBetaling.BetalingTypeDescriptions); InitializeDataListView(olvBetalingen); #region Create Columns OLVColumn colNaam = new OLVColumn("Naam", "Crediteur"); OLVColumn colDatum = new OLVColumn("Datum", "AanmaakDatum"); OLVColumn dlvc03 = new OLVColumn("Omschrijving", "Omschrijving"); OLVColumn dlvc04 = new OLVColumn("End To End Id", "EndToEndId"); OLVColumn colBedrag = new OLVColumn("Bedrag", "TotaalBedrag"); OLVColumn colType = new OLVColumn("Type", "TypeBetaling"); OLVColumn colVerwerkingsDatum = new OLVColumn("Verw, Datun", "GewensteVerwerkingsDatum"); colNaam.Width = 140; colDatum.Width = 90; dlvc03.Width = 200; dlvc04.Width = 130; colBedrag.Width = 70; colType.Width = 70; colVerwerkingsDatum.Width = 90; colNaam.UseInitialLetterForGroup = true; colBedrag.UseInitialLetterForGroup = true; colBedrag.AspectToStringFormat = "{0:C}"; colBedrag.TextAlign = HorizontalAlignment.Right; // dlvc03.UseInitialLetterForGroup = true; colDatum.Sortable = true; colDatum.TextAlign = HorizontalAlignment.Right; colDatum.UseInitialLetterForGroup = true; colVerwerkingsDatum.Sortable = true; colVerwerkingsDatum.TextAlign = HorizontalAlignment.Right; colVerwerkingsDatum.UseInitialLetterForGroup = true; colType.UseInitialLetterForGroup = true; olvBetalingen.Columns.Add(colType); olvBetalingen.Columns.Add(colNaam); olvBetalingen.Columns.Add(dlvc03); olvBetalingen.Columns.Add(dlvc04); olvBetalingen.Columns.Add(colBedrag); olvBetalingen.Columns.Add(colDatum); olvBetalingen.Columns.Add(colVerwerkingsDatum); colType.AspectGetter = delegate(object row) { if (((tblBetaling)row).TypeBetaling == 0) { return("Overig"); } return("Overig"); // Voor het geval er nog meer komen :o) }; colDatum.AspectGetter = delegate(object row) { return(((tblBetaling)row).AanmaakDatum.ToShortDateString()); }; colVerwerkingsDatum.AspectGetter = delegate(object row) { return(((tblBetaling)row).GewensteVerwerkingsDatum.ToShortDateString()); }; dlvc04.AspectGetter = delegate(object row) { return(((tblBetaling)row).FormattedEndToEndId); }; #endregion olvBetalingen.SetObjects(betalingen); #region Vul Crediteuren LedenLijst leden = da.VulLedenLijst(); CrediteurenLijst crediteuren = da.VulCrediteurenRecords(); foreach (tblCrediteur cred in crediteuren) { cboCrediteur.AddRecord(cred.Naam, cred); } foreach (tblLid lid in leden) { if (lid.IsIncasso) { cboCrediteur.AddRecord(lid.VolledigeNaam, lid); } } cboCrediteur.First(); #endregion // Show the first //if (betalingen.Count > 0) // olvBetalingen.Items[0].Selected = true; //else // CmdNew_Click(this, null); // Waarom werkt dit niet: CmdNew.PerformClick(); }
public frmBetalingInhoud(DataAdapters da) { #region Initialize InitializeComponent(); _windowState = new PersistWindowState(this, @"Leden\BetalingInhoud"); localRekeningen = da.VulBetalingRecords(); param = new tblParameters(); var reks = from rek in localRekeningen where !rek.Verstuurd orderby rek.AanmaakDatum select rek; // het gebruik van rekeningen geeft een cast error! Daarom maar reks // weer een mooie Linq. Alleen de OrderBy heeft waarschijnlijk ruzie met grouping van OLV InitializeDataListView(olvVCard); #endregion #region Create Columns OLVColumn colNaam = new OLVColumn("Naam", "IBAN_Creditor"); OLVColumn colDatum = new OLVColumn("Datum", "AanmaakDatum"); OLVColumn dlvc03 = new OLVColumn("Omschrijving", "Omschrijving"); OLVColumn dlvc04 = new OLVColumn("End To End Id", "EndToEndId"); OLVColumn colBedrag = new OLVColumn("Bedrag", "TotaalBedrag"); OLVColumn colType = new OLVColumn("Type", "TypeBetaling"); OLVColumn colVerwerkingsDatum = new OLVColumn("Verw, Datun", "GewensteVerwerkingsDatum"); colNaam.Width = 170; colDatum.Width = 90; dlvc03.Width = 210; dlvc04.Width = 150; colBedrag.Width = 70; colType.Width = 90; colVerwerkingsDatum.Width = 90; colNaam.UseInitialLetterForGroup = true; colBedrag.UseInitialLetterForGroup = true; colBedrag.AspectToStringFormat = "{0:C}"; colBedrag.TextAlign = HorizontalAlignment.Right; // dlvc03.UseInitialLetterForGroup = true; colDatum.Sortable = true; colDatum.TextAlign = HorizontalAlignment.Right; colDatum.UseInitialLetterForGroup = true; colVerwerkingsDatum.Sortable = true; colVerwerkingsDatum.TextAlign = HorizontalAlignment.Right; colVerwerkingsDatum.UseInitialLetterForGroup = true; colType.UseInitialLetterForGroup = true; olvVCard.Columns.Add(colType); olvVCard.Columns.Add(colNaam); olvVCard.Columns.Add(dlvc03); olvVCard.Columns.Add(dlvc04); olvVCard.Columns.Add(colBedrag); olvVCard.Columns.Add(colDatum); olvVCard.Columns.Add(colVerwerkingsDatum); colType.AspectGetter = delegate(object row) { if (((tblBetaling)row).TypeBetaling == 0) { return("Overig"); } return("Overig"); // Voor het geval er nog meer komen :o) }; colDatum.AspectGetter = delegate(object row) { return(((tblBetaling)row).AanmaakDatum.ToShortDateString()); }; colVerwerkingsDatum.AspectGetter = delegate(object row) { return(((tblBetaling)row).GewensteVerwerkingsDatum.ToShortDateString()); }; #endregion olvVCard.SecondarySortColumn = colDatum; olvVCard.SetObjects(reks); }