Form conditional

S

Stephanie

Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning bucks (2
fields in different tables).

I just wrote a union query to combine the bucks. For my
report, I have a conditional that allows the user to pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check that the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative, and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie
 
A

Allen Browne

Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere), 0) + _
Nz(DSum("Bucks", "Table2", strWhere), 0)
 
S

Stephanie

Thanks! Now you can see how terrible I am at coding.

I added this code (see below) to the form where I'm
entering "free-form" bucks. This form is on my main
Contacts form, so I can't just enter the bucks in
the "bucks form" and step through the code (or I wouldn't
have a ContactID). My part of code isn't working
(surprise). I'm trying to get the total bucks, compare it
to the BucksNumber being entered in the field to make sure
there are enough bucks earned to justify the cash-in, and
make sure that they can't cash in more than 30. Thanks
for your your help! Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If Abs(curTotal) < (Me!BucksNumber) Or curTotal < -30
Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
End Sub
-----Original Message-----
Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere), 0) + _
Nz(DSum("Bucks", "Table2", strWhere), 0)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning bucks (2
fields in different tables).

I just wrote a union query to combine the bucks. For my
report, I have a conditional that allows the user to pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check that the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative, and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie
Click to expand...


.
Click to expand...
 
A

Allen Browne

Error message?

Wrong results? Do you need to change the Criteria of one of the lookups so
that it sums the *other* records (excluding the current one)?

I didn't follow the Abs() bit.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Stephanie said:
Thanks! Now you can see how terrible I am at coding.

I added this code (see below) to the form where I'm
entering "free-form" bucks. This form is on my main
Contacts form, so I can't just enter the bucks in
the "bucks form" and step through the code (or I wouldn't
have a ContactID). My part of code isn't working
(surprise). I'm trying to get the total bucks, compare it
to the BucksNumber being entered in the field to make sure
there are enough bucks earned to justify the cash-in, and
make sure that they can't cash in more than 30. Thanks
for your your help! Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If Abs(curTotal) < (Me!BucksNumber) Or curTotal < -30
Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
End Sub
-----Original Message-----
Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere), 0) + _
Nz(DSum("Bucks", "Table2", strWhere), 0)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning bucks (2
fields in different tables).

I just wrote a union query to combine the bucks. For my
report, I have a conditional that allows the user to pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check that the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative, and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie
Click to expand...


.
Click to expand...
Click to expand...
 
S

Stephanie

Hi. No error message, just not doing what I want it to
do. I have been able to walk through the code to see
what's going on. I have 2 problems.
1) curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere),
0) is giving me "17" for every ContactID. Shifts.ITABucks
for ALL records does equal 17, which excludes any
BucksNumber. Maybe it's my setup? BucksMember contains
ContactID (this is how I assign the felxible BucksNumber).
The ITABucks are associated with Shifts that tie to
Volunteering that tie to Event, so that Event table
contains ContactID, VolunteeringID and ShiftID. Anyway to
fix curTotal to account for that?

2) yes, I would like curTotal to not count the BucksNumber
I'm trying to add on the fly. I can't figure out how to
do that and then compare it to the current BucksNumber.
Any suggestions?

Here's what it looks like now (at least the <-30 part
works!). Thanks for your help, Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.
Dim bWarn As Boolean 'Flag to warn user.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If ((curTotal) - (Me!BucksNumber)) < (Me!BucksNumber)
Or (Me!BucksNumber) < -30 Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
Call CancelOrWarn(Cancel, bWarn, strMsg)
End Sub

-----Original Message-----
Error message?

Wrong results? Do you need to change the Criteria of one of the lookups so
that it sums the *other* records (excluding the current one)?

I didn't follow the Abs() bit.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Thanks! Now you can see how terrible I am at coding.

I added this code (see below) to the form where I'm
entering "free-form" bucks. This form is on my main
Contacts form, so I can't just enter the bucks in
the "bucks form" and step through the code (or I wouldn't
have a ContactID). My part of code isn't working
(surprise). I'm trying to get the total bucks, compare it
to the BucksNumber being entered in the field to make sure
there are enough bucks earned to justify the cash-in, and
make sure that they can't cash in more than 30. Thanks
for your your help! Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If Abs(curTotal) < (Me!BucksNumber) Or curTotal < -30
Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
End Sub
-----Original Message-----
Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere), 0)
Click to expand...
+
_
Nz(DSum("Bucks", "Table2", strWhere), 0)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning bucks (2
fields in different tables).

I just wrote a union query to combine the bucks. For my
report, I have a conditional that allows the user to pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check that the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative, and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie


.
Click to expand...
Click to expand...


.
Click to expand...
 
S

Stephanie

Since I did get the union query to work for all bucks,
I'll post it here in case that helps explain my database
design. Thanks!

SELECT [LastName] & ", " & Nz([NickName],[FirstName]) AS
[Member Name], Volunteering.VolunteerDate,
Volunteering.VolunteerName, Shifts.ITABucks
FROM ((((Event LEFT JOIN Animals ON Event.AnimalsID =
Animals.AnimalsID) INNER JOIN Volunteering ON
Event.VolunteeringID = Volunteering.VolunteeringID) INNER
JOIN Contacts ON Event.ContactID = Contacts.ContactID)
INNER JOIN Shifts ON (Volunteering.VolunteeringID =
Shifts.VolunteeringID) AND (Event.ShiftID =
Shifts.ShiftID)) INNER JOIN (Organizations INNER JOIN
EventSponsors ON Organizations.OrganizationID =
EventSponsors.OrganizationID) ON
Volunteering.VolunteeringID = EventSponsors.VolunteeringID
WHERE (((Volunteering.VolunteerDate)>=[forms]![Report Date
Range]![BeginDate] And (Volunteering.VolunteerDate)<=
[forms]![Report Date Range]![EndDate]))
ORDER BY Contacts.LastName, Volunteering.VolunteerDate DESC
UNION SELECT [LastName] & ", " & Nz([NickName],
[FirstName]) AS [Member Name], BucksMember.ActivityDate,
Bucks.BucksEvent, BucksMember.BucksNumber
FROM (Bucks INNER JOIN BucksMember ON Bucks.BucksID =
BucksMember.BucksID) INNER JOIN Contacts ON
BucksMember.ContactID = Contacts.ContactID
WHERE (((BucksMember.ActivityDate)>=[forms]![Report Date
Range]![BeginDate] And (BucksMember.ActivityDate)<=[forms]!
[Report Date Range]![EndDate]));
-----Original Message-----
Error message?

Wrong results? Do you need to change the Criteria of one of the lookups so
that it sums the *other* records (excluding the current one)?

I didn't follow the Abs() bit.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Thanks! Now you can see how terrible I am at coding.

I added this code (see below) to the form where I'm
entering "free-form" bucks. This form is on my main
Contacts form, so I can't just enter the bucks in
the "bucks form" and step through the code (or I wouldn't
have a ContactID). My part of code isn't working
(surprise). I'm trying to get the total bucks, compare it
to the BucksNumber being entered in the field to make sure
there are enough bucks earned to justify the cash-in, and
make sure that they can't cash in more than 30. Thanks
for your your help! Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If Abs(curTotal) < (Me!BucksNumber) Or curTotal < -30
Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
End Sub
-----Original Message-----
Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere), 0)
Click to expand...
+
_
Nz(DSum("Bucks", "Table2", strWhere), 0)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning bucks (2
fields in different tables).

I just wrote a union query to combine the bucks. For my
report, I have a conditional that allows the user to pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check that the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative, and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie


.
Click to expand...
Click to expand...


.
Click to expand...
 
A

Allen Browne

Stephanie, that's probably as far as I can walk with you on this one.

ou have the idea, and it just needs debugging now so you get the correct
results.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Stephanie said:
Hi. No error message, just not doing what I want it to
do. I have been able to walk through the code to see
what's going on. I have 2 problems.
1) curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere),
0) is giving me "17" for every ContactID. Shifts.ITABucks
for ALL records does equal 17, which excludes any
BucksNumber. Maybe it's my setup? BucksMember contains
ContactID (this is how I assign the felxible BucksNumber).
The ITABucks are associated with Shifts that tie to
Volunteering that tie to Event, so that Event table
contains ContactID, VolunteeringID and ShiftID. Anyway to
fix curTotal to account for that?

2) yes, I would like curTotal to not count the BucksNumber
I'm trying to add on the fly. I can't figure out how to
do that and then compare it to the current BucksNumber.
Any suggestions?

Here's what it looks like now (at least the <-30 part
works!). Thanks for your help, Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.
Dim bWarn As Boolean 'Flag to warn user.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If ((curTotal) - (Me!BucksNumber)) < (Me!BucksNumber)
Or (Me!BucksNumber) < -30 Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
Call CancelOrWarn(Cancel, bWarn, strMsg)
End Sub

-----Original Message-----
Error message?

Wrong results? Do you need to change the Criteria of one of the lookups so
that it sums the *other* records (excluding the current one)?

I didn't follow the Abs() bit.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Thanks! Now you can see how terrible I am at coding.

I added this code (see below) to the form where I'm
entering "free-form" bucks. This form is on my main
Contacts form, so I can't just enter the bucks in
the "bucks form" and step through the code (or I wouldn't
have a ContactID). My part of code isn't working
(surprise). I'm trying to get the total bucks, compare it
to the BucksNumber being entered in the field to make sure
there are enough bucks earned to justify the cash-in, and
make sure that they can't cash in more than 30. Thanks
for your your help! Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If Abs(curTotal) < (Me!BucksNumber) Or curTotal < -30
Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
End Sub

-----Original Message-----
Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere), 0) +
_
Nz(DSum("Bucks", "Table2", strWhere), 0)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

in message
Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning bucks (2
fields in different tables).

I just wrote a union query to combine the bucks. For my
report, I have a conditional that allows the user to
pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check that the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative,
and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie
Click to expand...
Click to expand...
Click to expand...
 
S

Stephanie

Allen, thanks for the help and the vote of confidence.
However, I have no idea how to find ITABucks from Shifts
for the appropriate ContactID. My sql statement from the
union query seems to complicated to put in a sql
statement embedded with code.
Anyway, I appreciate your efforts in getting me this far!
Stephanie
-----Original Message-----
Stephanie, that's probably as far as I can walk with you on this one.

ou have the idea, and it just needs debugging now so you get the correct
results.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Hi. No error message, just not doing what I want it to
do. I have been able to walk through the code to see
what's going on. I have 2 problems.
1) curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere),
0) is giving me "17" for every ContactID. Shifts.ITABucks
for ALL records does equal 17, which excludes any
BucksNumber. Maybe it's my setup? BucksMember contains
ContactID (this is how I assign the felxible BucksNumber).
The ITABucks are associated with Shifts that tie to
Volunteering that tie to Event, so that Event table
contains ContactID, VolunteeringID and ShiftID. Anyway to
fix curTotal to account for that?

2) yes, I would like curTotal to not count the BucksNumber
I'm trying to add on the fly. I can't figure out how to
do that and then compare it to the current BucksNumber.
Any suggestions?

Here's what it looks like now (at least the <-30 part
works!). Thanks for your help, Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.
Dim bWarn As Boolean 'Flag to warn user.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If ((curTotal) - (Me!BucksNumber)) < (Me! BucksNumber)
Or (Me!BucksNumber) < -30 Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
Call CancelOrWarn(Cancel, bWarn, strMsg)
End Sub

-----Original Message-----
Error message?

Wrong results? Do you need to change the Criteria of
Click to expand...
one
of the lookups so
that it sums the *other* records (excluding the current one)?

I didn't follow the Abs() bit.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

Thanks! Now you can see how terrible I am at coding.

I added this code (see below) to the form where I'm
entering "free-form" bucks. This form is on my main
Contacts form, so I can't just enter the bucks in
the "bucks form" and step through the code (or I wouldn't
have a ContactID). My part of code isn't working
(surprise). I'm trying to get the total bucks,
Click to expand...
compare
it
to the BucksNumber being entered in the field to make sure
there are enough bucks earned to justify the cash-in, and
make sure that they can't cash in more than 30. Thanks
for your your help! Stephanie

Private Sub BucksNumber_BeforeUpdate(Cancel As Integer)
'Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency
Dim strMsg As String 'MsgBox message.

strWhere = "[ContactID] = " & Nz([ContactID], 0)
curTotal = Nz(DSum("BucksNumber", "BucksMember",
strWhere), 0) + Nz(DSum("ITABucks", "Shifts", strWhere), 0)

If Abs(curTotal) < (Me!BucksNumber) Or curTotal < -30
Then
Cancel = True
strMsg = strMsg & "Member does not have enough
Bucks to 'cash in' that many." & vbCrLf
End If
End Sub

-----Original Message-----
Use two DSum() expressions to get the total, e.g.:
Dim strWhere As String
Dim curTotal As Currency

strWhere = "[MemberID] = " & Nz([MemberID], 0)
curTotal = Nz(DSum("Bucks", "Table1", strWhere),
Click to expand...
0)
+
_
Nz(DSum("Bucks", "Table2", strWhere), 0)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

in message
Hi. I have a field that can be positive or negative-
Members earn "bucks" by volunteering and then cash them
in to defray cost of renewing. It's a little bit more
complicated because there are 2 ways of earning
Click to expand...
bucks
(2
fields in different tables).

I just wrote a union query to combine the bucks.
Click to expand...
For
my
report, I have a conditional that allows the user to
pick
the Member's name so I can see a running total of all
bucks for that Member.

In the form where I assign positive/negative bucks- if
I'm assigning negative bucks, I'd like to check
Click to expand...
that
the
running total of bucks supports that negative entry (so
that bucks total for that Member doesn't go negative,
and
also that the negative entry isn't bigger than -30.

Can I use what I've already created? Do I need to write
code to check this (except total bucks by member isn't a
field and I'm not good a coding)? Any suggestions?
Thanks for your help, Stephanie
Click to expand...
Click to expand...


.
Click to expand...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Program buttons to create a word document 0
Working on birthday "book" for my wife and having layout/editing trouble 0
Cumulative formula for word table 0
XIRR Giving Negative Number on Positive Cash Flow Stream 11
Dumb question alert! What program to use? 0
2 similar tables, 1 query (?) 4
Negative value to positive 13
Summing a sum2:David S 9

Top