B
BK
I apologize for the multi-post. I didn't see this group earlier and the
other post is in microsoft.public.access.adp.sqlserver with the same
subject line.
I have an adp in Access 2002 with an SQL Server backend. I have a view
on the server (called INVOICE_COST_REV) which calculates all the revenue
and costs on an invoice by invoice basis and also shows when it was paid
and a check number. I am trying to create a data entry screen so the
user can just enter the invoice and it pops up the job number, invoice
amount and then two fields so she can enter the check number and date.
In an afterupdate event of entering the invoice number it queries this
view. I build a SQL statement in code and set it as the recordset for
the form. It takes only those fields I need from the view. It comes up
as it should, but the problem lies in the fact that it says it is a
non-updateable recordset so she obviously can't enter the check number
and date. Is there something I'm missing? How can I make this an
updateable recordset so she can enter the needed info?
Here is the code:
Private Sub txtInvoiceSearch_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT INVOICE_NO, WO_JOB_ID, TOTAL_REV, PAID, CHECK_NO"
strSQL = strSQL & " FROM dbo.INVOICE_COST_REV"
strSQL = strSQL & " WHERE dbo.INVOICE_COST_REV.INVOICE_NO='" &
Me!txtInvoiceSearch & "'"
With Me
.RecordSource = strSQL
.DataEntry = False
!txtWO_JOB_ID.Visible = True
!txtTOTAL_REV.Visible = True
!txtPAID.Visible = True
!txtCHECK_NO.Visible = True
End With
End Sub
TIA,
Bill
other post is in microsoft.public.access.adp.sqlserver with the same
subject line.
I have an adp in Access 2002 with an SQL Server backend. I have a view
on the server (called INVOICE_COST_REV) which calculates all the revenue
and costs on an invoice by invoice basis and also shows when it was paid
and a check number. I am trying to create a data entry screen so the
user can just enter the invoice and it pops up the job number, invoice
amount and then two fields so she can enter the check number and date.
In an afterupdate event of entering the invoice number it queries this
view. I build a SQL statement in code and set it as the recordset for
the form. It takes only those fields I need from the view. It comes up
as it should, but the problem lies in the fact that it says it is a
non-updateable recordset so she obviously can't enter the check number
and date. Is there something I'm missing? How can I make this an
updateable recordset so she can enter the needed info?
Here is the code:
Private Sub txtInvoiceSearch_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT INVOICE_NO, WO_JOB_ID, TOTAL_REV, PAID, CHECK_NO"
strSQL = strSQL & " FROM dbo.INVOICE_COST_REV"
strSQL = strSQL & " WHERE dbo.INVOICE_COST_REV.INVOICE_NO='" &
Me!txtInvoiceSearch & "'"
With Me
.RecordSource = strSQL
.DataEntry = False
!txtWO_JOB_ID.Visible = True
!txtTOTAL_REV.Visible = True
!txtPAID.Visible = True
!txtCHECK_NO.Visible = True
End With
End Sub
TIA,
Bill