MS_04.01

2017-01-04 17:09:26 +01:00
parent 4ab7e368b1 29b3857635
commit 26812ffeb7
128 changed files with 17813 additions and 20419 deletions
--- a/app/DD-Record-Organiser/ModuleHelperMethods.vb
+++ b/app/DD-Record-Organiser/ModuleHelperMethods.vb
@@ -150,7 +150,7 @@ Module ModuleHelperMethods
    Public Function GetControlID_for_RecordID(name As String, recID As Integer) As Integer
        Try
            Dim SQL = "SELECT CONTROL_ID FROM VWPMO_VALUES WHERE RECORD_ID = " & recID & " and CONTROL_NAME = '" & name & "'"
-            Dim ID As Integer = ClassDatabase.Execute_Scalar(SQL)
+            Dim ID As Integer = ClassDatabase.Execute_Scalar(SQL, True)
            If ID > 0 Then
                Return ID
            Else