Fields Not Showing On Report

[joecamel9166]

On one of my forms, when I run the save button I have 2 labels print out.
Field [Unit] is the main key in my main table.

below is the code I am using to print these labels:

Select Case MsgBox("Do you Want To Print RSO Labels?", vbYesNo, "Warning")
Case vbYes
DoCmd.OpenReport "rptRSOLabel", acViewNormal, , "[Unit] = " & [Unit], acWindowNormal
      
DoCmd.OpenReport "rptAccessory", acViewNormal, , "[Unit] = " & [Unit], acWindowNormal
      
Case vbNo
End Select

The problem is that "rptRSOLabel" prints the [Unit] number sometimes. About 1/10 times the number doesnt print.



The part that really confuses me is that "rptAccessory" prints the [Unit] number consistently.

Any input on this would be helpful.

[ranman256]

if the code runs on a form,
and the textbox is called unit
and the UNIT is numeric:

DoCmd.OpenReport "rptRSOLabel", acViewNormal, , "[Unit] = " & me.Unit


if TEXT:

DoCmd.OpenReport "rptRSOLabel", acViewNormal, , "[Unit] = '" & me.Unit & "'"

[June7]

What is the RecordSource of rptRSOLabel?

[joecamel9166]

@Ranman256 Will try this in the morning and see if this works. still dont see how it works some times and not other times.

@June7 the record source is tblUnits which is my main table. Both reports pull the data from [Unit] from tblUnits, although rptAccessories also gets data from another table. The form this runs on is the first form when entering data. On load [Unit] is generated. So by the time this command is executed [Unit] is already populated in the tblUnits.

[June7]

If you want to provide db for analysis, follow instructions at bottom of my post.

[joecamel9166]

So I changed the code to:

DoCmd.OpenReport "rptRSOLabel", acViewNormal, , "[Unit] = " & me.Unit

It worked for about 50 entries, so I marked this as solved, now it just printed a label without the Unit number on it.

Any ideas?