MS_26012016_1

app/DD-Record-Organiser/frmMain.vb

@@ -199,7 +199,9 @@ Public Class frmMain
 
     Public Sub LoadQuickStartItems()
         Try
-            Dim SQL2 As String = "SELECT * FROM TBPMO_FORM_CONSTRUCTOR ORDER BY SEQUENCE_MENU"
+            Dim SQL2 As String = String.Format("SELECT GUID, dbo.FNPMO_GETOBJECTCAPTION('{0}', 'CONSTR_MENUE' + CONVERT(VARCHAR(5), GUID), {1}) AS FORM_TITLE, SEQUENCE_MENU, ADDED_WHO, ADDED_WHEN, CHANGED_WHO," & _
+            "CHANGED_WHEN, MENU_IMG, SHORT_TITLE, LANGUAGE " & _
+            "FROM TBPMO_FORM_CONSTRUCTOR ORDER BY SEQUENCE_MENU", USER_LANGUAGE, CURRENT_SCREEN_ID)
             Dim dt As DataTable = ClassDatabase.Return_Datatable(SQL2)
             Dim image2 As Bitmap = LoadNoImage()