E
EdwardA
Problem: Im trying to open 3 forms for inventory
control. One form is all the RMA's issued, one is our
inhouse inventory, and one is shipped inventory. The
purpose of openning 3 forms is to view by unit whether an
RMA has been issued, and where that unit is in the RMA
process.
My stock windows come up fine (although any nonmatches are
just white screens.. how do I fix this by the way?), but
my RMA window, does not come up, instead another search
window pops up. My linkage goes as follows:
Link 1: Search Form > Tag Number = match. - Inhouse
Link 2: Search Form > Tag Number = match. - Outgoing
Link 3: RMA Number (located on inhouse form) to RMA Number
(on RMA Log. The log does not have issued tag numbers, as
it exists prior to any item being received. The only
common unique identifier is the RMA number)
Here is my code.
Private Sub Command3_Enter()
On Error GoTo Err_Command3_Enter
Dim stDocName As String
Dim ssDocName As String
Dim srDocName As String
Dim stLinkCriteria As String
Dim ssLinkCriteria As String
Dim srLinkCriteria As String
stDocName = "STOCK_WHSE27"
ssDocName = "STOCK_OUT"
srDocName = "TECH_RMA_Log"
stLinkCriteria = "[Tag Number]=" & "'" & Me![Text1]
& "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
ssLinkCriteria = "[Tag Number]=" & "'" & Me![Text1]
& "'"
DoCmd.OpenForm ssDocName, , , ssLinkCriteria
srLinkCriteria = "[RMA Number]=" & "'" Forms!
STOCK_WHSE27![RMA] & "'"
DoCmd.OpenForm srDocName, , , srLinkCriteria
Exit_Command3_Enter:
Exit Sub
Err_Command3_Enter:
MsgBox Err.Description
Resume Exit_Command3_Enter
End Sub
Any assistance in getting these forms to open and match
appropriately would be greatly appreciated.
Thanks,
Edm
control. One form is all the RMA's issued, one is our
inhouse inventory, and one is shipped inventory. The
purpose of openning 3 forms is to view by unit whether an
RMA has been issued, and where that unit is in the RMA
process.
My stock windows come up fine (although any nonmatches are
just white screens.. how do I fix this by the way?), but
my RMA window, does not come up, instead another search
window pops up. My linkage goes as follows:
Link 1: Search Form > Tag Number = match. - Inhouse
Link 2: Search Form > Tag Number = match. - Outgoing
Link 3: RMA Number (located on inhouse form) to RMA Number
(on RMA Log. The log does not have issued tag numbers, as
it exists prior to any item being received. The only
common unique identifier is the RMA number)
Here is my code.
Private Sub Command3_Enter()
On Error GoTo Err_Command3_Enter
Dim stDocName As String
Dim ssDocName As String
Dim srDocName As String
Dim stLinkCriteria As String
Dim ssLinkCriteria As String
Dim srLinkCriteria As String
stDocName = "STOCK_WHSE27"
ssDocName = "STOCK_OUT"
srDocName = "TECH_RMA_Log"
stLinkCriteria = "[Tag Number]=" & "'" & Me![Text1]
& "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
ssLinkCriteria = "[Tag Number]=" & "'" & Me![Text1]
& "'"
DoCmd.OpenForm ssDocName, , , ssLinkCriteria
srLinkCriteria = "[RMA Number]=" & "'" Forms!
STOCK_WHSE27![RMA] & "'"
DoCmd.OpenForm srDocName, , , srLinkCriteria
Exit_Command3_Enter:
Exit Sub
Err_Command3_Enter:
MsgBox Err.Description
Resume Exit_Command3_Enter
End Sub
Any assistance in getting these forms to open and match
appropriately would be greatly appreciated.
Thanks,
Edm