This commit is contained in:
Digital Data - Marlon Schreiber
2017-07-26 11:09:38 +02:00
parent 0f8f8ddf65
commit 3ae24fe471
35 changed files with 59894 additions and 1899 deletions

View File

@@ -395,8 +395,9 @@ Public Class frmEntities
Private Sub btnCreateEntityTable_Click(sender As Object, e As EventArgs) Handles btnCreateEntityTable.Click
Dim CurrentID = GetCurrentGUID()
EXECUTE_STATEMENT = String.Format("DECLARE @return_value int " & vbNewLine & _
"EXEC @return_value = dbo.PRPMO_CREATE_ENTITY_TABLE {0}" & vbNewLine & _
EXECUTE_STATEMENT = String.Format("DECLARE @return_value int " & vbNewLine &
"EXEC @return_value = dbo.PRPMO_CREATE_ENTITY_TABLE {0}" & vbNewLine &
"IF @return_value = 0 EXEC @return_value = [dbo].[PRPMO_CREATE_ENTITY_TABLE_VIEW] {0}" & vbNewLine &
"SELECT 'Return Value' = @return_value", CurrentID)
ProgressPanel1.Description = "Creating the Entity-table....."
ProgressPanel1.Visible = True