Auteur Topic: berekend veld naar tabel schrijven (gelezen 8157 keer)

adri · « **Gepost op:** 11 februari 2012, 19:28:13 »

hallo,
ik voeg hierbij mijn db als voorbeeld.
Probleem 1: op mijn form nieuwe belegging heb ik een berekend veld (aankoop totaal), maar ik krijg dat niet weggeschreven naar mijn tabel transacties.
iemand een idee?

dizzl · « **Reactie #1 Gepost op:** 12 februari 2012, 10:27:17 »

=([Aankoop Aantal]*[Aankoop Prijs Eenheid])+[Aankoop Kosten] is niet je besturingselement hé.

Je moet je besturingselementbron dus instellen op [Aankoop Totaal].

Ik heb bij verlaten van de velden die deel uitmaken van de berekening een procedure ingesteld die de waarde in Aankoop_Totaal berekent.

adri · « **Reactie #2 Gepost op:** 12 februari 2012, 11:30:14 »

bedankt dizzl,
had al van alles geprobeerd maar het lukte me niet.
heb nog een andere, soortgelijke vraag ivm met deze db.
heb in de tabel ook een veld 'aantal in portefeuille'; daar zou ik graag een getal krijgen met een berekening : aantal aankoop - aantal verkoop.
bij de aankoop geef ik een getal in: dat zou dan in dat veld kunnen komen (aantal verkoop is nog nul?

)
later , als ik verkoop geef ik weer een getal in (misschien gedeeeltelijke verkoop) en dan zou een herberekening van aantal in portefeuille moeten gebeuren.
moet ik dit oplossen met een query???

dizzl · « **Reactie #3 Gepost op:** 12 februari 2012, 17:06:24 »

Daarvoor snap ik te weinig van waar je naartoe wilt.
Is het verkopen een 'nieuwe' transactie? of wil je gewoon een huidig record aanpassen.
Welk formulier gebruik je?

Stegisoft · « **Reactie #4 Gepost op:** 13 februari 2012, 04:11:53 »

Beste Dizzl,

Ik heb de database aangepast.
Klik op aankoop_totaal in ontwerp en dan ziet je bij eigenschappen / gebeurtenis en bij focus dat ik in VB had geprogrammeerd.
Nu wordt het wel in de tabel weggeschreven.

Wel een opmerking:
Best laten zien dat het om een formulier of tabel gaat want op termijn kan je moeilijkheden hebben.
Dus
Tbl_transactie of transactie_T
Ttvl of T laat duidelijk zien dat om een tabel gaat.

Groetjes

Stegisoft

dizzl · « **Reactie #5 Gepost op:** 13 februari 2012, 06:29:18 »

Code: [Selecteer]

Private Sub Aankoop_Totaal_GotFocus()
On Error GoTo aankoop_totaalfout

Aankoop_Totaal = ([Aankoop Aantal] * [Aankoop Prijs Eenheid]) + [Aankoop Kosten]

aankoop_totaalfout: Exit Sub
End Sub

Is natuurlijk een pak korter dan mijn code

Code: [Selecteer]

Private Sub Aankoop_Aantal_Exit(Cancel As Integer)
    Bereken
End Sub

Private Sub Aankoop_Kosten_Exit(Cancel As Integer)
    Bereken
End Sub

Private Sub Aankoop_Prijs_Eenheid_Exit(Cancel As Integer)
    Bereken
End Sub

Private Sub Bereken()
    
    
    '** we kijken of al de velden ingevuld zijn. Is dit niet zo
    '** dan stoppen we ermee.
    If IsNull(Aankoop_Aantal) Then
        Exit Sub
    End If
    If IsNull(Aankoop_Prijs_Eenheid) Then
        Exit Sub
    End If
    If IsNull(Aankoop_Kosten) Then
        Exit Sub
    End If
    
    ' Alle velden hebben een waarde we tellen op en zetten deze waarde
    ' in Kosten_Totaal
    Aankoop_Totaal = Aankoop_Aantal * Aankoop_Prijs_Eenheid + Aankoop_Kosten
    
    
End Sub

't Zal aan de voorkeur van Adri liggen. Als de gebruiker zich tijdens het invoeren bedenkt, zal bij het wijzigen van één van de 3 parameters het resultaat getoond worden.

Niet onbelangrijk is dat als een gebruiker nog het aantal wijzigt en 'niet' verder doorgaat naar het veld totaal, de waarde niet wordt aangepast en de oude waarde wordt weggeschreven?

De subroutine Bereken zou je idd door jouw code kunnen vervangen maar fouten zoals 'on Error' kunnen andere oorzaken hebben dan een niet ingevuld of niet numeriek veld?
Allez men kan er over discussiëren en daarom is dit ook een discussie forum hé.

adri · « **Reactie #6 Gepost op:** 13 februari 2012, 13:00:27 »

bedankt voor de reacties.
zal nog uitzoeken wat voor mij het best van toepassing is.
ivm mijn tweede vraag: de verkoop is inderdaad een nieuwe transactie.
het zal een formulier worden zoals de aankoop transactie, maar dan met de verschillende verkoop velden uit de tabel transacties.

Stegisoft · « **Reactie #7 Gepost op:** 13 februari 2012, 18:11:38 »

@ dizzl,

Je kan inderdaad ook controle toevoegen zodat alle cijfers worden ingevuld alvorens te berekenen.
Zelf zet ik meestal ook controle in indien het nodig is.
Zondig met msgbox

Groetjes

Stegisoft

dizzl · « **Reactie #8 Gepost op:** 14 februari 2012, 08:33:30 »

Ik probeer me jouw database eens voor te stellen adri.
Als het mag vereenvoudig ik even door aan te nemen dat je een belegging doet met aankoop en verkoop (van die rente en zo snap ik niets dus laat ik dat even achterwege).
Eén belegging heeft dan, als ik het goed heb, één? of meerdere? aanko(o)p(en) en meerdere verkopen.
Je wilt deze verkoop en aankoop in één tabel transactie

Wat betekent 'in portefeullie'? en waarom staan aantal in portefeullie zowel in 'Beleggingen' als in 'Transacties'?
Mij lijkt het op het eerste zicht zivol van van 'Transacties' twee tabellen te maken 'Verkoop' en 'Aankoop'
De totaal aangekochte haal je dan uit 'Aankoop' en het aantal verkochte uit de tabel 'Verkoop' (voor een zekere BeleggingsID). De beschikbare is dan het verschil tussen beiden.

Je maakt dan een frmBeleggingen met daarin twee subformulieren frmAankoopDetails en frmVerkoopDetails.

In bijlag een aanzetje...frmBestellingen

adri · « **Reactie #9 Gepost op:** 14 februari 2012, 14:52:11 »

beste dizzl,
ik zal inderdaad voor mijn transacties werken met een formulier, dat opent met een keuzelijst van beleggingen in portefeuille, waarin je eerst een belegging moet kiezen.
dan zal alle info verschijnen en enkele opdrachtknoppen ge-enabled worden: transacties aankoop, verkoop, rente en dividend.
die openen dan het desbetreffende subform en een knop om alles te saven.
al die transacties heb ik nu in één tabel, maar misschien is het inderdaad beter om ze apart te houden.
nu zou het de bedoeling zijn dat keuzelijst beleggingen alleen diegene toont die in portefeuille zitten; en dat liefst automatisch: aantal aankoop (transactie aankoop) - aantal verkoop (transactie verkoop).
nu zitten ze inderdaad in twee tabellen en dat is zeker niet nodig, maar ik ben aan het zoeken.
zie in bijlage voorbeeld formulier "transacties"

dizzl · « **Reactie #10 Gepost op:** 15 februari 2012, 06:40:50 »

Kijk eens op mijn frmBestelling? Daar is bij start van de pagina een berekening die aantal in portefeuille bijhoudt.

Kan je ook aub je bestandsnaam inkorten en voorzien van een datum zodat men kan zien welke versie er nu is?

adri · « **Reactie #11 Gepost op:** 15 februari 2012, 09:08:39 »

ok dizzl,
had het nog niet gezien. dit zal inderdaad werken.
het formulier geeft ook mooi de verschillende transacties, maar daar zal ook nog ev. dividend of rente bij komen, dus als dat kan zou ik dat graag in een gegevensblad krijgen.
wat ook goed is bij formBeleggingen, is dat je niks kunt veranderen aan de velden bovenaan, terwijl ze op het form toch niet vergrendeld zijn. ook dat probeer ik al een tijdje voor mekaar te krijgen. kan je me daar ook wat uitleg bij geven?
ivm met de bestandsnaam: ik heb al zo veel versies gemaakt, zodat ik het best bij blijf met de datum waarop mijn laatst goed werkende test is gebaseerd.

adri · « **Reactie #12 Gepost op:** 15 februari 2012, 15:31:25 »

beste dizzl,
heb de formule voor de berekening aantal in portefeuille toegepast op mijn form Nieuwe belegging, maar de teller blijft op nul staan. op dat form staat alleen alleen subform Aankoop, maar de berekening zou dan toch ook moeten werken.

Dim aantal As Integer
On Error Resume Next
aantal = DSum("[Aankoop Aantal]", "Aankoop", "BeleggingID=" & Me.BeleggingId)
aantal = aantal - DSum("[Verkoop Aantal]", "Verkoop", "BeleggingID=" & Me.BeleggingId)

Aantal_In_Portefeuille = aantal

dizzl · « **Reactie #13 Gepost op:** 15 februari 2012, 18:04:31 »

zet je het hier eens online?

adri · « **Reactie #14 Gepost op:** 16 februari 2012, 09:09:30 »

hierbij nog eens mijn bijgewerkt voorbeeld.

Help!

Menu

Hulp bij posten

Zoeken

Recente topics

Auteur Topic: berekend veld naar tabel schrijven (gelezen 8157 keer)

adri

berekend veld naar tabel schrijven

dizzl

Re: berekend veld naar tabel schrijven

adri

Re: berekend veld naar tabel schrijven

dizzl

Re: berekend veld naar tabel schrijven

Stegisoft

Re: berekend veld naar tabel schrijven

dizzl

Re: berekend veld naar tabel schrijven

adri

Re: berekend veld naar tabel schrijven

Stegisoft

Re: berekend veld naar tabel schrijven

dizzl

Re: berekend veld naar tabel schrijven

adri

Re: berekend veld naar tabel schrijven

dizzl

Re: berekend veld naar tabel schrijven

adri

Re: berekend veld naar tabel schrijven

adri

Re: berekend veld naar tabel schrijven

dizzl

Re: berekend veld naar tabel schrijven

adri

Re: berekend veld naar tabel schrijven