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);
}