jj: Revert ChoiceList Method, Add WMCC Start Check, Only use a single instance of ClassPMWindream in Application

This commit is contained in:
Jonathan Jenne
2018-10-05 11:15:30 +02:00
parent 819c340745
commit 9ed2d35d17
9 changed files with 93 additions and 70 deletions

View File

@@ -3,7 +3,7 @@ Imports Oracle.ManagedDataAccess.Client
Imports DD_LIB_Standards
Public Class frmSQL_DESIGNER
Private _windreamPM As ClassPMWindream
'Private _windreamPM As ClassPMWindream
Dim CurrentPosition As Integer = 0
Dim CurrentPlaceholders As New Placeholders()
@@ -54,14 +54,14 @@ Public Class frmSQL_DESIGNER
Try
' Windream instanziieren
_windreamPM = New ClassPMWindream()
'_windreamPM = New ClassPMWindream()
'Windream initialisieren (Connection, Session, ... aufbauen)
_windreamPM.Create_Session()
'_windreamPM.Create_Session()
Catch ex As Exception
MsgBox("Fehler bei Initialisieren von windream: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
End Try
cmbIndexe.Items.Clear()
Dim indexe = _windreamPM.GetIndicesByObjecttype(CURRENT_OBJECTTYPE)
Dim indexe = WINDREAM.GetIndicesByObjecttype(CURRENT_OBJECTTYPE)
If indexe IsNot Nothing Then
For Each index As String In indexe
Me.cmbIndexe.Items.Add(index)