AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

jj 28.09 select correct index for tab

Browse Source
This commit is contained in:
JenneJ
2016-09-28 14:06:16 +02:00
parent 93528062ba
commit 4a0e7cf3b1
1 changed files with 1 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
app/DD-Record-Organiser/frmWD_Dokumentart_Konfig.vb
View File

@@ -315,7 +315,6 @@
End Sub End Sub
Private Sub btnNamenkonvention_Click(sender As Object, e As EventArgs) Handles btnNamenkonvention.Click Private Sub btnNamenkonvention_Click(sender As Object, e As EventArgs) Handles btnNamenkonvention.Click
Save_Dokart() Save_Dokart()
Dim _temp As String
akt_DokartID = GUIDTextBox.Text akt_DokartID = GUIDTextBox.Text
Dim sql As String = "select COUNT(T.GUID) FROM TBPMO_WD_FORMVIEW_DOKTYPES T, TBPMO_FORM_VIEW T1 WHERE T.FORMVIEW_ID = T1.GUID AND T1.SCREEN_ID = 1 AND T.DOCTYPE_ID = " & akt_DokartID Dim sql As String = "select COUNT(T.GUID) FROM TBPMO_WD_FORMVIEW_DOKTYPES T, TBPMO_FORM_VIEW T1 WHERE T.FORMVIEW_ID = T1.GUID AND T1.SCREEN_ID = 1 AND T.DOCTYPE_ID = " & akt_DokartID
@@ -328,16 +327,9 @@
msg = "Attention: You did not assign at least one entity to the document-type!" msg = "Attention: You did not assign at least one entity to the document-type!"
End If End If
MsgBox(msg, MsgBoxStyle.Exclamation) MsgBox(msg, MsgBoxStyle.Exclamation)
XtraTabControl1.SelectedTabPageIndex = 1 XtraTabControl1.SelectedTabPageIndex = 2
cmbEntity_Doctype.DroppedDown = True cmbEntity_Doctype.DroppedDown = True
End If End If
'_temp = Me.NAMENKONVENTIONTextBox.Text
'akt_Namenkonvention = _temp
'Me.NAMENKONVENTIONTextBox.Text = akt_Namenkonvention
'If _temp <> NAMENKONVENTIONTextBox.Text Then
' Save_Dokart()
'End If
End Sub End Sub
Private Sub ToolStripButton14_Click(sender As Object, e As EventArgs) Handles ToolStripButton14.Click Private Sub ToolStripButton14_Click(sender As Object, e As EventArgs) Handles ToolStripButton14.Click