Display current records from Continuous form in Report

[Kizer]

Hi, I have searched and tried a bunch of different ways for the past day to accomplish this goal.

I have a Continuous form(frmPayment) that is limited to two new records. The users will be inputting payment information on this form. The users will then have to print a receipt(rptReceipt) for the customer that displays their payment information. I created a select query(qryReceipt) that selects all of the receipts that were entered by the user but I can not figure out a way for the report to only display the record(s) from the form.

The reason this is difficult is because the user can create one or two new records and I only want the receipt to display the record(s) that were just processed.

Thanks for your help.

[PhilOfWalton]

IMO your problem is far from clear, which may in part be the reason you have a problem.
Are you saying you have a main form Customers with a continuous subform for payments (the normal way of handling things) or a continuous form with a Combo Box to select a customer, and 2 payment fields for that customer record.
The "Just Processed" is another interesting concept.
It would help to know the structure of your tables.

Phil

[Kizer]

Thanks for the response Phil.
I am going to try my best to describe this. The main form (frmPayment)is a continuous form that is limited to only two new records. This form does not contain any subforms.
The requirement was to give the end users a screen where they could process up to two different payments for different customers on the same screen and to print a receipt displaying the payment information that the customer just made.
By "Just Processed" I am referring to the payment(s) that the customer just made.
I have separate tables for the Customer(tblPolicyholder), Policynumber (tblPolicynumber), PaymentAmount (tblPaymentAmount),PaymentType(tblPaymentType), Company (tblCompany) and two others for security and an audit trail.

I currently have two separate buttons in the form footer where the user can select either one, depending on if they accepted one payment or two. Since they have started using this database I have notice that some users are not clicking the correct button which has lead me to here.

[jforbes]

I would use the WhereClause of the DoCmd.OpenReport to limit the report to only the Receipts that you wish to print. How to: Apply a Filter When Opening a Form or Report

The WhereClause (Condition) can be pretty much any SQL WhereClause for the RecordSource of your Report, so there are a few different ways you could provide this. The way I would go about this is to loop through the records on the Form and create a list of IDs to include in the WhereClause.

This is an example of using a RecordSet of an Employees Form and building a WhereClause of all the IDs, then opening a Report with just those IDs:

Private Sub Command9_Click()
    Dim oRst As DAO.Recordset
    Dim sWhere As String
 
    Set oRst = Me.RecordsetClone
    oRst.MoveFirst
    Do While Not oRst.EOF
        sWhere = sWhere & " OR ID=" & oRst!ID
        oRst.MoveNext
    Loop
    If Len(sWhere) > 0 Then sWhere = Right(sWhere, Len(sWhere) - 4)
    Debug.Print sWhere
    DoCmd.OpenReport "rptEmployees", , , sWhere
End Sub

[PhilOfWalton]

I'm going to be honest. As I understand it, you have a form on which you enter a payment, then select which customer the payment is to be set against. Presumably a customer may have more that one policy so somehow you also select the policy. What safeguards have you that the payment is set against an amount owed by this customer for this policy? Is there a field in the tblPolicyNumber that shows the amount owed? What happens with overpayments and underpayments?
Assuming your structure is right, and I would be far from happy with it, the safe way of dealing with your problem is to have a field in the PaymentAmount table called ReceiptPrinted (DefaultValue = False). Then at any stage you can run your report using the condition ReceiptPrinted = False and on the OnFormat of the detail of the report, run a bit of code to update the ReceiptPrinted = True.

Phil