MS_proxyRecordConnect und Positionen

2017-11-01 15:50:08 +01:00
parent 8a9ce6726a
commit 020bd7a390
3 changed files with 26 additions and 2 deletions
--- a/app/DD-Record-Organizer/ClassRecordCommands.vb
+++ b/app/DD-Record-Organizer/ClassRecordCommands.vb
@@ -22,7 +22,10 @@ Public Class ClassRecordCommands

                Dim GUID As Integer = cmd.Parameters("@pRESULT").Value
                If GUID > 0 And clsDatabase.DB_PROXY_INITIALIZED = True Then
-                    ClassProxy.PRPROXY_CONTROL_VALUE_RENEW(GUID)
+                    If ClassProxy.PRPROXY_RECORD_UPD_INS(formId, GUID) = True Then
+                           ClassProxy.PRPROXY_CONTROL_VALUE_RENEW(GUID)
+                    End If
+
                End If
                Return GUID
            End Using