dbo.QBM_PSQLCreate

SQL_STORED_PROCEDURE

Created 2025-06-27T17:57:00.550 · modified 2026-04-14T23:14:10.177 · source: live DB sys.objects/sys.sql_expression_dependencies.

Open formatted source/search result

Parameters

NameTypeOutput
@ObjectNamevarcharno
@ObjectTypevarcharno
@ObjectCodenvarcharno
@UnCommentbitno
@UnFormatbitno

Referenced objects

SchemaObjectColumn/minorClass
QBM_PExecuteSQLWithRetry_LLPOBJECT_OR_COLUMN
QBM_PFunctionDropOBJECT_OR_COLUMN
QBM_PJournalOBJECT_OR_COLUMN
QBM_PProcedureDropOBJECT_OR_COLUMN
QBM_PSessionErrorAddOBJECT_OR_COLUMN
QBM_PTriggerDropOBJECT_OR_COLUMN
QBM_PViewDropOBJECT_OR_COLUMN
dboQBM_FGIDBOwnerOBJECT_OR_COLUMN
dboQBM_FSQRemoveComment_iOBJECT_OR_COLUMN

Source excerpt

First extracted SQL definition lines from the exported source. Use the full source page for complete context.

Open full formatted source

1   create   procedure QBM_PSQLCreate (@ObjectName varchar(30) , @ObjectType varchar(1)     , @ObjectCode nvarchar(max) , @UnComment bit = 1 , @UnFormat
2 bit = 1 ) as begin declare @DebugSwitch int = 0 declare @DebugLevel char(1) = 'W' declare @Message nvarchar(1000) declare @MessageAppend nvarchar(100)
3 = ' (' + @ObjectType + ') ' + @ObjectName  declare @ObjectCodeIntern nvarchar(max) SET XACT_ABORT OFF BEGIN TRY  if @UnComment = 1 and dbo.QBM_FGIDBOwner
4() = 'CCC' begin select @ObjectCode = dbo.QBM_FSQRemoveComment_i(@ObjectCode, @UnFormat) if @DebugSwitch > 0 begin print substring(@objectCode, 1, 4000
5) print substring(@objectCode, 4000, 4000) print substring(@objectCode, 8000, 4000) print substring(@objectCode, 12000, 4000) print substring(@objectCode
6, 16000, 4000) print substring(@objectCode, 20000, 4000) print substring(@objectCode, 24000, 4000) print substring(@objectCode, 28000, 4000) end end   
7      select @ObjectCodeIntern = @ObjectCode if @ObjectType = 'P' begin if @DebugSwitch > 0 begin if exists (select top 1 1 from sys.procedures p with 
8(readpast) where p.name = @ObjectName ) begin select @Message = 'Objekt zu löschen' + @MessageAppend end else begin select @Message = 'Objekt nicht vorhanden'
9 + @MessageAppend end exec QBM_PJournal @Message, @@PROCID, 'D', @DebugLevel print @Message end if @ObjectCodeIntern not like 'create or alter%' begin 
10exec QBM_PProcedureDrop @ObjectName end goto CreateCode end if @ObjectType = 'T' begin if @DebugSwitch > 0 begin if exists (select top 1 1 from sys.triggers
11 p with (readpast) where p.name = @ObjectName and p.name != 'QBM_TUIndicator474488' ) begin select @Message = 'Objekt zu löschen' + @MessageAppend end 
12else begin select @Message = 'Objekt nicht vorhanden' + @MessageAppend end exec QBM_PJournal @Message, @@PROCID, 'D', @DebugLevel print @Message end if
13 @ObjectCodeIntern not like 'create or alter%' begin exec QBM_PTriggerDrop @ObjectName end goto CreateCode end if @ObjectType = 'F' begin if @DebugSwitch
14 > 0 begin if exists (select top 1 1 from sys.objects p with (readpast) where p.name = @ObjectName ) begin select @Message = 'Objekt zu löschen' + @MessageAppend
15 end else begin select @Message = 'Objekt nicht vorhanden' + @MessageAppend end exec QBM_PJournal @Message, @@PROCID, 'D', @DebugLevel print @Message end
16   exec QBM_PFunctionDrop @ObjectName goto CreateCode end if @ObjectType = 'V' begin if @DebugSwitch > 0 begin if exists (select top 1 1 from sys.objects
17 p with (readpast) where p.name = @ObjectName ) begin select @Message = 'Objekt zu löschen' + @MessageAppend end else begin select @Message = 'Objekt nicht vorhanden'
18 + @MessageAppend end exec QBM_PJournal @Message, @@PROCID, 'D', @DebugLevel print @Message end if @ObjectCodeIntern not like 'create or alter%' begin 
19exec QBM_PViewDrop @ObjectName end goto CreateCode end CreateCode: if @ObjectCodeIntern > ' ' begin exec QBM_PExecuteSQLWithRetry_LLP @SQLStatement = @ObjectCodeIntern
20 , @LockTimeout_ms = default  , @MaxWaitTimeForLock_s = default , @ProcIDForJournal = default , @HandleErrorSilent = 0 , @ExecuteWithTransact = 0  if @DebugSwitch
21 > 0 begin select @Message = 'Objekt angelegt' + @MessageAppend exec QBM_PJournal @Message, @@PROCID, 'D', @DebugLevel end end END TRY BEGIN CATCH exec
22 QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: return end 
23

Module relation graph

Loading module relation graph…

Source-derived context

Generated from exported SQL module definitions plus read-only sandbox sys.objects/sys.parameters/sys.sql_expression_dependencies metadata. This is factual source evidence, not a semantic guess.

provenance: SQL definition export provenance: sandbox DB metadata modified: 2026-04-14T23:14:10.177

has TRY/CATCH error handling

Summary: calls QBM_PJournal, QBM_PProcedureDrop, QBM_PTriggerDrop, QBM_PFunctionDrop, QBM_PViewDrop…; reads/joins sys

Declared parameters

ParameterTypeDirection
@ObjectNamevarchar(30)input
@ObjectTypevarchar(1)input
@ObjectCodenvarcharinput
@UnCommentbitinput
@UnFormatbitinput

DML targets

None extracted.

Called routines

Read/join references

SQL dependency metadata

Config/session

Config: None extracted.

Session: None extracted.

DBQueue/tasks

None extracted.

Temp tables / referenced variables

Temp: None extracted.

Variables: @ObjectName @ObjectType @ObjectCode @UnComment @UnFormat @DebugSwitch @DebugLevel @Message @MessageAppend @ObjectCodeIntern @objectCode @PROCID @SQLStatement @LockTimeout_ms @MaxWaitTimeForLock_s @ProcIDForJournal @HandleErrorSilent @ExecuteWithTransact

Referenced by / reverse dependencies

Generated from live DB metadata, FK rows, and exported SQL dependency/source extraction. This is factual linkage evidence, not inferred behavior.

Referencing objectRelationEvidence
dbo.ATT_ZAttHelperFillMakeProcSQL expression dependencyOBJECT_OR_COLUMN
dbo.CPL_PComplianceCheckMakeProc_hSQL expression dependencyOBJECT_OR_COLUMN
dbo.DPR_PTriggerCreateMembershipSQL expression dependencyOBJECT_OR_COLUMN
dbo.POL_PQERPolicyMakeProcSQL expression dependencyOBJECT_OR_COLUMN
dbo.QBM_PCustomSQLPropagateSQL expression dependencyOBJECT_OR_COLUMN
dbo.QBM_PDashBoardDefineSQL expression dependencyOBJECT_OR_COLUMN
dbo.QBM_PSlotResetOnMissingItem_LSQL expression dependencyOBJECT_OR_COLUMN
dbo.QBM_PTriggerWatchCreateSQL expression dependencyOBJECT_OR_COLUMN
dbo.QBM_PViewBuild_FromAddOnSQL expression dependencyOBJECT_OR_COLUMN
dbo.QBM_PViewBuildV_internSQL expression dependencyOBJECT_OR_COLUMN
dbo.QER_PDynamicGroupMakeProc_hlpSQL expression dependencyOBJECT_OR_COLUMN
dbo.QER_PQERRiskIndexMakeProcSQL expression dependencyOBJECT_OR_COLUMN
dbo.QER_PSlotResetOnInvalidRoot_LSQL expression dependencyOBJECT_OR_COLUMN
dbo.QER_ZDynamicGroupMakeTriggerSQL expression dependencyOBJECT_OR_COLUMN
dbo.QER_ZPWODecisionRuleMakeProcSQL expression dependencyOBJECT_OR_COLUMN
dbo.QER_ZPWOHelperFillMakeProcSQL expression dependencyOBJECT_OR_COLUMN
dbo.ATT_ZAttHelperFillMakeProcsource text referencehas TRY/CATCH error handling
dbo.CPL_PComplianceCheckMakeProc_hsource text referencehas TRY/CATCH error handling
dbo.DPR_PTriggerCreateMembershipsource text referencehas TRY/CATCH error handling
dbo.POL_PQERPolicyMakeProcsource text referencehas TRY/CATCH error handling
dbo.QBM_PCustomSQLPropagatesource text referencehas TRY/CATCH error handling
dbo.QBM_PDashBoardDefinesource text referencehas TRY/CATCH error handling
dbo.QBM_PSlotResetOnMissingItem_Lsource text referencehas TRY/CATCH error handling
dbo.QBM_PTriggerWatchCreatesource text referenceuses session context values, has TRY/CATCH error handling
dbo.QBM_PViewBuild_FromAddOnsource text referencehas TRY/CATCH error handling
dbo.QBM_PViewBuildV_internsource text referencehas TRY/CATCH error handling
dbo.QER_PDynamicGroupMakeProc_hlpsource text referencehas TRY/CATCH error handling
dbo.QER_PQERRiskIndexMakeProcsource text referencehas TRY/CATCH error handling
dbo.QER_PSlotResetOnInvalidRoot_Lsource text referencehas TRY/CATCH error handling
dbo.QER_ZDynamicGroupMakeTriggersource text referenceinserts DBQueue tasks, has TRY/CATCH error handling
dbo.QER_ZPWODecisionRuleMakeProcsource text referencehas TRY/CATCH error handling
dbo.QER_ZPWOHelperFillMakeProcsource text referencehas TRY/CATCH error handling