I wrote a program back in 2006 that's served its purpose nicely. Unfortunately, I've always struggled with regional settings. Unless the user has the short date set as "MM/DD/YYYY" the query either doesn't populate the form or it throws an error.
My question to you all is, take the following SQL in my VB Code:
Why does this work when the regional settings are set as described above but only then? My app is supposed to roll out on to PC's where I no longer have control over the regional settings so I need this to work regardless of a PC's configuration.Code:strSQL = "SELECT Prod.CSU_Nurse_Clinic.Clinic_Num, Prod.CSU_Nurse_Clinic.Nurse_Clinic_Name, " & _ "PROD.CSU_Clinic_Info.Id, PROD.CSU_Clinic_Info.Occurs, " & _ "PROD.CSU_Clinic_Info.Clinic_Num, PROD.CSU_Clinic_Info.User_Name, " & _ "PROD.CSU_Clinic_Info.Clinic_Code,PROD.CSU_Clinic_Info.Sid_Doc_Num, " & _ "PROD.CSU_Clinic_Info.Doc_Index, PROD.CSU_Clinic_Info.Rooms_Used, " & _ "PROD.CSU_Clinic_Info.Cancelled, PROD.CSU_Clinic_Info.Rotation_Dept, " & _ "PROD.CSU_Clinic_Info.Special_Booked_Date, " & _ "PROD.CSU_Clinic_Info.Cancelled_Reason, PROD.CSU_Clinic_Info.Time_Of_Day, " & _ "PROD.CSU_Clinic_Info.Special,PROD.CSU_Clinic_Info.Hold, " & _ "PROD.CSU_Clinic_Info.Start_Date, PROD.CSU_Clinic_Info.End_Date, " & _ "Prod.CSU_Clinic_Type.Clinic_Name, PROD.CSU_Clinic_Info.Reinstate, PROD.CSU_Clinic_Info.Reassignment, " & _ "Prod.CSU_Clinic_Type.Clinic_ABRName, Prod.CSU_Location.Location " & _ "FROM PROD.CSU_Clinic_Info, Prod.CSU_Nurse_Clinic, Prod.CSU_Clinic_Type, " & _ "Prod.CSU_Location " & _ "WHERE((PROD.CSU_Clinic_Info.Clinic_Date = To_Date ('" & dtDate & "','MM/DD/YYYY')))" & _ "AND PROD.CSU_Clinic_Info.Clinic_Code = Prod.CSU_Clinic_Type.Clinic_CODE (+) " & _ "AND PROD.CSU_Clinic_Info.Clinic_Num = Prod.CSU_Nurse_Clinic.Clinic_Num (+) " & _ "AND PROD.CSU_Clinic_Info.Location_Num = Prod.CSU_Location.Location_Num(+) " & _ "AND PROD.CSU_Clinic_Info.Cancelled <> 'Y' " & _ "AND PROD.CSU_Clinic_Info.Institution = '" & strInstitution & "'" & _ "AND not (PROD.CSU_CLINIC_INFO.LOCATION_NUM IN ('20', '30')) order by ID, DOC_INDEX desc"
Any help is appreciated folks!
Thank you!




Reply With Quote