ms
This commit is contained in:
parent
292b241fd1
commit
aa9ac2bf1b
@ -1089,7 +1089,7 @@
|
||||
<value>Cyan</value>
|
||||
</data>
|
||||
<data name="GridControlPos.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 347</value>
|
||||
<value>1356, 340</value>
|
||||
</data>
|
||||
<data name="GridControlPos.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
@ -1113,7 +1113,7 @@
|
||||
<value>0, 25</value>
|
||||
</data>
|
||||
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 347</value>
|
||||
<value>1356, 340</value>
|
||||
</data>
|
||||
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
@ -1367,7 +1367,7 @@
|
||||
</value>
|
||||
</data>
|
||||
<data name="TabPos.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 372</value>
|
||||
<value>1356, 365</value>
|
||||
</data>
|
||||
<data name="TabPos.Text" xml:space="preserve">
|
||||
<value>Positionen</value>
|
||||
@ -1429,7 +1429,7 @@
|
||||
<value>Aqua</value>
|
||||
</data>
|
||||
<data name="GridControlDocSearch.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 347</value>
|
||||
<value>1356, 340</value>
|
||||
</data>
|
||||
<data name="GridControlDocSearch.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>7</value>
|
||||
@ -1531,7 +1531,7 @@
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="TabWindream.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 372</value>
|
||||
<value>1356, 365</value>
|
||||
</data>
|
||||
<data name="TabWindream.Text" xml:space="preserve">
|
||||
<value>Dateien</value>
|
||||
@ -1962,7 +1962,7 @@
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="TabFollowUp.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 372</value>
|
||||
<value>1356, 365</value>
|
||||
</data>
|
||||
<data name="TabFollowUp.Text" xml:space="preserve">
|
||||
<value>Wiedervorlage</value>
|
||||
@ -2073,7 +2073,7 @@
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 347</value>
|
||||
<value>1356, 340</value>
|
||||
</data>
|
||||
<data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>90</value>
|
||||
@ -2145,7 +2145,7 @@
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="TabPageVariant.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1356, 372</value>
|
||||
<value>1356, 365</value>
|
||||
</data>
|
||||
<data name="TabPageVariant.Text" xml:space="preserve">
|
||||
<value>Vorgängervarianten</value>
|
||||
|
||||
@ -21,7 +21,7 @@ Public Class frmNewVariant
|
||||
If result = MsgBoxResult.Yes Then
|
||||
RelinkFiles = 1
|
||||
End If
|
||||
Dim SQL = String.Format("PRPMO_CREATE_VARIANT {0},'{1}','{2}','{3}','{4}'", CURRENT_RECORD_ID, USER_USERNAME, cmbReason.Text, txtComment.Text, RelinkFiles)
|
||||
Dim SQL = String.Format("EXEC PRPMO_CREATE_VARIANT {0},'{1}','{2}','{3}','{4}'", CURRENT_RECORD_ID, USER_USERNAME, cmbReason.Text, txtComment.Text, RelinkFiles)
|
||||
If ClassDatabase.Execute_non_Query_withConn(SQL, 1) = True Then
|
||||
Dim sel = String.Format("SELECT MAX(GUID) FROM TBPMO_RECORD WHERE UPPER(ADDED_WHO) = '{0}'", USER_USERNAME.ToUpper)
|
||||
CURRENT_RECORD_ID = ClassDatabase.Execute_Scalar(sel)
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user