ALTER TRIGGER dbo.TBPMO_FORM_AFT_INS ON dbo.TBPMO_FORM
WITH EXECUTE AS CALLER
FOR INSERT
AS
BEGIN TRY
	DECLARE 
		@FORM_ID		INTEGER,
		@FORM_TYPE		INTEGER
		--@SQL_RECORD1	VARCHAR(500),
		--@SQL_RECORD2	VARCHAR(500)
	SELECT
  		@FORM_ID = GUID,
		@FORM_TYPE = FORM_TYPE_ID
	FROM INSERTED
	
	IF @FORM_TYPE = 5
		BEGIN	
			INSERT INTO TBPMO_CONTROL (
				FORM_ID, CONTROL_TYPE_ID, DEFAULT_VALUE, NAME, [COL_NAME]) VALUES (
				@FORM_ID,2,'GROUP_RECORD','txtGROUP_RECORD','GROUP_RECORD')
				DECLARE @CTRL_ID INTEGER
				SELECT @CTRL_ID = MAX(GUID) FROM TBPMO_CONTROL WHERE FORM_ID = @FORM_ID
				INSERT INTO TBPMO_CONTROL_SCREEN (
				CONTROL_ID, SCREEN_ID, CONTROL_TEXT, X_LOC, Y_LOC, HEIGHT, WIDTH, TAB_INDEX) VALUES (
				@CTRL_ID, 1, 'GROUP_RECORD', 5, 5, 22, 100,1)
		END
	
	EXEC dbo.PRPMO_CREATE_SQL @FORM_ID
	EXEC dbo.PRPMO_CREATE_TEMP_VIEWS
END TRY
BEGIN CATCH   
	PRINT 'FEHLER IN TRIGGER: ' + CONVERT(VARCHAR(30),ERROR_PROCEDURE()) + ' - ZEILE: ' + CONVERT(VARCHAR(10),ERROR_LINE())
	+ ' - FEHLER-MESSAGE: ' 
    + CONVERT(VARCHAR(500),ERROR_MESSAGE())
END CATCH