Search results for query: *

Thanks, that worked for giving me all of the 389 records, however I am not getting the data for selected fields in the 6 linkded tables. Any ideas?

SELECT qPhySum.*, tblCaseMixSrv.*, tblConsultServ.*, tblMedRecSrv.*, tblPhyActSrv.*, tblReadmServ.*, tblSurActSrv.* FROM tblSurActSrv RIGHT JOIN (tblReadmServ RIGHT JOIN (tblPhyActSrv RIGHT JOIN (tblMedRecSrv RIGHT JOIN (tblConsultServ RIGHT JOIN (tblCaseMixSrv RIGHT JOIN qPhySum ON...

Thanks dhookom-I believe that is what I have done the query is to display all records from qPhyDemo and the records from the other tables that have a matching phyID. NOt sure I understand your second comment? Thanks

I have a query containing all of the demographic information for a list of physicians containing 389 records (qPhyDemo). When I create a new query which includes this query (placed as qPhyDemo* on the query grid)and 6 other tables (placed on grid as table*) linked by phyID the resulting query...

Thanks Traingamer- one question- does your solution depend on the recnum reflecting the date. ie, the higher the recnum the more recent the date If so, this is not the case. I'm not sure why I included a recnum in the table, other than my understanding is it is good practice Thanks for your...

I have a command button on a form that I want to run a query to return the most recent lab result for each type of test only for the MRN matching the current form frmPtReg. The tblLabResult on which to run the query has the following: tblLabResult RecNum MRN AcctNum LabDate LabTest LabRes...

MajP All works 100%. I had given a thought about Nz, but had only used it sql and did not know it could/ or how in VBA. Thanks again for your time! CapnDave

Oops! There is still a bug- when the Combo49 box is empty I get a runtime 13 error Type Mismatch. Any thoughts? Thanks

Duh me!! I used "current" when the stored value is "C" etc. "Current" is from the unbound column. Thanks so much I learned a lot of good stuff. Have agreat day

Thanks majP, I get the Msgbox on both occassions, but once the smokecessa checkbox disappears it is never seen again regardless of Combo49 value. Any suggestions would be appreciated CapnDave

Thanks kjv1611, but all combinations of requery/ refresh do not fix my original problem. Any other assistance would be appreciated

I am trying to accomplish the following: frmPtReg is parent form combo49 on frmPtReg (when = "current" SmokeCessa control on subform is visible otherwise not visible) frmEnc is subform SmokeCessa is y/N control on subform This is my code Private Sub frmENC_Enter() If...

I have this code in the AfterUpdate event for the OccurType field on the main form: Dim sfrm As Form Set sfrm = [frmsubTxnDetail].Form If Me!TypeOccur = "60" Then sfrm!cboTxnRxn.Visible = True Else sfrm!cboTxnRxn.Visible = False End If Set sfrm = Nothing...

I have combined information from several FAQ and postings and have not been successful with this code: Private Sub TypeOccur_AfterUpdate() If TypeOccur.Value = "60" Then Me!frmsubTxnDetail.SetFocus Me!frmsubTxnDetail.cboTxnRxn_Label.Visible = True...

I have the following code for an on click event: Private Sub ViewAvail_Click() On Error GoTo Err_ViewAvail_Click Dim stDocName As String DoCmd.CloseForm "MainMenu" stDocName = "InventoryAvail" DoCmd.OpenReport stDocName, acPreview Exit_ViewAvail_Click: Exit...

I have an image on which I want to place text with a black border and filled with the background- I have gotten that far. Now, I want to do something to make the text more visible from the background- for example, create a white background with soft edges where it meets the existing background...

I have a form that opens via a choice of several command buttons; one opens to edit existing records the other opens in data entry for new records. There are several required fields, but not all need to be required. I want the user to be prompted to Save new record YES or NO in the data entry...

Boy, do I feel dumb! All of your "picky questions" got me to solve my own problem. Turns out the issue was that the form populated fine when it was opened from the database window, but when I opened it from anyone of several buttons on other forms it was opening in the Add Data mode. Sorry to...

I understand the question now. Here is the code for the after update event for one of the combo boxes. Only one combo box is used per search; the user can search by one of three fields. Private Sub Combo209_AfterUpdate() ' Find the record that matches the control. Dim rs As Object...

This is the only code in the afterupdate propety of one of the combo boxes Private Sub cboFindPO_AfterUpdate() End Sub