Diagnostics being suppressed

  • Thread starter Thread starter Bill Stanton
  • Start date Start date
B

Bill Stanton

Though this issue was reported in another thread,
it really is a separate problem.

I was in the process of updating a report's code
sheet and seem to have encountered a code-sheet
bug that Access is not reporting to me. I recently
re-installed Office 2000 upon a new Windows XP
system. I don't recall ever having to enable error
reporting. My code runs fine when I comment out
all the changes and a well-placed Msgbox confirms
that the code is being run, but when the code is
allowed to execute the report does not preview
and no error is reported.

What am I missing.

Thanks,
Bill
 
What am I missing.

Posting your code, maybe? Some details on what and how you
are doing things? Help us help you and someone usually will
usually step in to coach you through your challenge.

--

Gary Miller
Gary Miller Computer Services
Sisters, OR
________________________
 
Gary,
Here's the code. Even the debug MsgBox code fails. Both Type and Amount
are dim'd as currency, as are AccumChks and AccumCash. They are included
in the Union Select which is the RecordSource for the report.

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
'=====================================================
' In parallel with group summations within the body of the report,
' update the currency and checks totals in their respective accumulators.
' The two accumulators are initialized in the OnOpen code. They will be
' inserted in respective text-boxes in the report's ReportFooter_OnFormat
code.
'=====================================================
MsgBox "Type = " & [Type] & "; and Amount = " & [Amount] 'Debug only

If [Type] = 1 Then 'Type one (1) amounts are
"checks"
AccumChks = AccumChks + [Amount] 'Update the accumulator
Else
If [Type] = 2 Then 'Type two (2) amounts are
"currency"
AccumCash = AccumCash + [Amount] 'Update the accumulator
End If
End If

End Sub
 
I can debug whatever problems there might be with the code
if I can get Access to display whatever errors are encountered,
which is the problem I'm trying to solve with this post.

Bill



Bill Stanton said:
Gary,
Here's the code. Even the debug MsgBox code fails. Both Type and Amount
are dim'd as currency, as are AccumChks and AccumCash. They are included
in the Union Select which is the RecordSource for the report.

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
'=====================================================
' In parallel with group summations within the body of the report,
' update the currency and checks totals in their respective accumulators.
' The two accumulators are initialized in the OnOpen code. They will be
' inserted in respective text-boxes in the report's ReportFooter_OnFormat
code.
'=====================================================
MsgBox "Type = " & [Type] & "; and Amount = " & [Amount] 'Debug only

If [Type] = 1 Then 'Type one (1) amounts are
"checks"
AccumChks = AccumChks + [Amount] 'Update the accumulator
Else
If [Type] = 2 Then 'Type two (2) amounts are
"currency"
AccumCash = AccumCash + [Amount] 'Update the accumulator
End If
End If

End Sub



Gary Miller said:
Posting your code, maybe? Some details on what and how you
are doing things? Help us help you and someone usually will
usually step in to coach you through your challenge.

--

Gary Miller
Gary Miller Computer Services
Sisters, OR
________________________
 
Back
Top