From 8f04081bbc1b6c9e3c2aa890738428e2d92c01e9 Mon Sep 17 00:00:00 2001 From: Digital Data - Marlon Schreiber Date: Tue, 12 Jun 2018 17:29:36 +0200 Subject: [PATCH] MS nextDocument --- app/DD_PM_WINDREAM/frmValidator.vb | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index a2d0508..0fc87ac 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -333,6 +333,9 @@ Public Class frmValidator PROFIL_VEKTORINDEX = dr.Item("PM_VEKTOR_INDEX") PROFIL_LOGINDEX = dr.Item("LOG_INDEX") Me.Text = "Process Manager - " & dr.Item("TITLE") + + TITLELabel1.Text = dr.Item("TITLE") + DESCRIPTIONLabel.Text = IIf(IsDBNull(dr.Item("DESCRIPTION")), "", dr.Item("DESCRIPTION")) If PROFIL_VEKTORINDEX.GetType.ToString.ToLower = "system.dbnull" Then PROFIL_VEKTORINDEX = "" End If @@ -361,10 +364,12 @@ Public Class frmValidator allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Error loading final profile text: " & ex.Message, Environment.UserName) ClassLogger.Add(">> Fehler in loading final profile text: " & ex.Message, True) End Try - + ToolStripButtonJumpFile.Enabled = True If CURRENT_JUMP_DOC_GUID <> 0 Then + ToolStripButtonJumpFile.Enabled = False Anzahl_ValDoks = 1 Else + Anzahl_ValDoks = TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(CURRENT_ProfilGUID) End If @@ -395,8 +400,8 @@ Public Class frmValidator Catch ex As Exception MsgBox("Error LOADING Profile-Data1:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Attention:") - allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Error SAVING Profile-Data: " & ex.Message, Environment.UserName) - ClassLogger.Add(">> Fehler in SAVING Profile-Data: " & ex.Message, True) + allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Error LOADING(2) Profile-Data: " & ex.Message, Environment.UserName) + ClassLogger.Add(">> Fehler in LOADING(2) Profile-Data: " & ex.Message, True) End Try 'Me.lblerror.Visible = False