OrgFLOW Update, dadurch auch DD_ECM
This commit is contained in:
Developer01
@@ -0,0 +1,93 @@
|
||||
DECLARE @REMOTE_CONF_ID INT,@LOCAL_ENT_ID INT = 15,@PARID INT
|
||||
DECLARE cursControls CURSOR FOR
|
||||
SELECT GUID,PARENT_NODE
|
||||
FROM TBPMO_STRUCTURE_NODES_CONFIGURATION WHERE ENTITY_ID = 15 ORDER BY PARENT_NODE
|
||||
OPEN cursControls
|
||||
FETCH NEXT FROM cursControls INTO @REMOTE_CONF_ID,@PARID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
DECLARE @LOCAL_CTRL_ID INT, @LOCAL_CTRL_SCR_ID INT
|
||||
INSERT INTO [dbo].[TBPMO_STRUCTURE_NODES_CONFIGURATION]
|
||||
([PARENT_NODE]
|
||||
,[CONTROL_ID]
|
||||
,[NAME]
|
||||
,[ENTITY_ID]
|
||||
,[TYPE_NODE]
|
||||
,[NODE_IMAGE]
|
||||
,[CREATE_RECORD]
|
||||
,[COMMENT]
|
||||
,[EXPAND]
|
||||
,[FONT_FAMILY]
|
||||
,[FONT_COLOR]
|
||||
,[FONT_SIZE]
|
||||
,[FONT_STYLE]
|
||||
,[BACK_COLOR]
|
||||
)
|
||||
|
||||
SELECT
|
||||
[PARENT_NODE]
|
||||
,[CONTROL_ID]
|
||||
,[NAME]
|
||||
,15
|
||||
,[TYPE_NODE]
|
||||
,[NODE_IMAGE]
|
||||
,[CREATE_RECORD]
|
||||
,[COMMENT]
|
||||
,[EXPAND]
|
||||
,[FONT_FAMILY]
|
||||
,[FONT_COLOR]
|
||||
,[FONT_SIZE]
|
||||
,[FONT_STYLE]
|
||||
,[BACK_COLOR]
|
||||
FROM [172.24.130.1].[DD_ECM].[dbo].[TBPMO_STRUCTURE_NODES_CONFIGURATION] WHERE GUID = 1
|
||||
SELECT @LOCAL_CTRL_ID = MAX(GUID) FROM TBPMO_CONTROL;
|
||||
--CONTROL-SCREEN INSERTEN
|
||||
INSERT INTO [dbo].[TBPMO_CONTROL_SCREEN]
|
||||
([CONTROL_ID]
|
||||
,[SCREEN_ID]
|
||||
,[CONTROL_TEXT]
|
||||
,[X_LOC]
|
||||
,[Y_LOC]
|
||||
,[HEIGHT]
|
||||
,[WIDTH]
|
||||
,[FONT_FAMILY]
|
||||
,[FONT_COLOR]
|
||||
,[FONT_SIZE]
|
||||
,[FONT_STYLE]
|
||||
,[BACK_COLOR]
|
||||
,[TAB_INDEX]
|
||||
,[TAB_STOP] )
|
||||
SELECT
|
||||
@LOCAL_CTRL_ID
|
||||
,[SCREEN_ID]
|
||||
,[CONTROL_TEXT]
|
||||
,[X_LOC]
|
||||
,[Y_LOC]
|
||||
,[HEIGHT]
|
||||
,[WIDTH]
|
||||
,[FONT_FAMILY]
|
||||
,[FONT_COLOR]
|
||||
,[FONT_SIZE]
|
||||
,[FONT_STYLE]
|
||||
,[BACK_COLOR]
|
||||
,[TAB_INDEX]
|
||||
,[TAB_STOP]
|
||||
FROM [172.24.130.1].[DD_ECM].[dbo].[TBPMO_CONTROL_SCREEN] WHERE CONTROL_ID = @REMOTE_CONF_ID;
|
||||
SELECT @LOCAL_CTRL_SCR_ID = MAX(GUID) FROM [TBPMO_CONTROL_SCREEN] WHERE CONTROL_ID = @LOCAL_CTRL_ID;
|
||||
INSERT INTO [dbo].[TBPMO_CONTROL_LANGUAGE]
|
||||
([LANGUAGE_TYPE]
|
||||
,[CONTROL_SCREEN_ID]
|
||||
,[CAPTION]
|
||||
,[HINT])
|
||||
SELECT [LANGUAGE_TYPE]
|
||||
,@LOCAL_CTRL_SCR_ID
|
||||
,[CAPTION]
|
||||
,[HINT] FROM [172.24.130.1].[DD_ECM].[dbo].[TBPMO_CONTROL_LANGUAGE] WHERE CONTROL_SCREEN_ID = (
|
||||
SELECT GUID FROM [172.24.130.1].[DD_ECM].[dbo].[TBPMO_CONTROL_SCREEN] WHERE CONTROL_ID = @REMOTE_CONF_ID)
|
||||
FETCH NEXT FROM cursControls INTO @REMOTE_CONF_ID,@PARID
|
||||
END
|
||||
CLOSE cursControls
|
||||
DEALLOCATE cursControls
|
||||
|
||||
|
||||
|
||||
@@ -0,0 +1,78 @@
|
||||
DECLARE @NC_PERSONAL INT,@NC_SF INT,@SN_MAIN_GUID INTEGER,@NODE_PERSONAL INTEGER,@ID1 VARCHAR(100)
|
||||
SELECT @NC_PERSONAL = GUID FROM TBPMO_STRUCTURE_NODES_CONFIGURATION WHERE NAME = 'Hauptknoten Personal'
|
||||
SELECT @NC_SF = GUID FROM TBPMO_STRUCTURE_NODES_CONFIGURATION WHERE NAME = 'Dateiablage'
|
||||
SELECT @SN_MAIN_GUID = [CAT_STRING] FROM TBDD_CATALOG where CAT_TITLE = 'PA_NODE_GUID_STAMM';
|
||||
|
||||
|
||||
DECLARE cursMA CURSOR FOR
|
||||
SELECT A.Personal FROM
|
||||
(select 'Fuchs, Nadine' as Personal union
|
||||
select 'König, Klaus' as Personal union
|
||||
select 'Müller, Gabriele' as Personal union
|
||||
select 'Schröder, Anke' as Personal union
|
||||
select 'Li, Kim' as Personal union
|
||||
select 'Zimmer, Klaus' as Personal union
|
||||
select 'Faber, Sandra' as Personal union
|
||||
select 'Hofamnn, Thomas' as Personal) A -- WHERE NOT EXISTS(SELECT GUID FROM TBPMO_STRUCTURE_NODES WHERE ID1 = A.Personal)
|
||||
OPEN cursMA
|
||||
FETCH NEXT FROM cursMA INTO @ID1
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM [TBPMO_STRUCTURE_NODES] WHERE ID1 = @ID1 and NODE_CONFIG_ID = @NC_PERSONAL AND PARENT_GUID = @SN_MAIN_GUID)
|
||||
INSERT INTO [dbo].[TBPMO_STRUCTURE_NODES]
|
||||
([NODE_CONFIG_ID]
|
||||
,[NODE_CAPTION]
|
||||
,[ID1]
|
||||
,[PARENT_GUID])
|
||||
VALUES
|
||||
(@NC_PERSONAL,
|
||||
@ID1,
|
||||
@ID1,
|
||||
@SN_MAIN_GUID);
|
||||
ELSE
|
||||
PRINT 'MITARBEITER-KNOTEN GIBT ES SChon'
|
||||
SELECT @NODE_PERSONAL = GUID FROM TBPMO_STRUCTURE_NODES WHERE ID1 = @ID1 AND NODE_CONFIG_ID = @NC_PERSONAL;
|
||||
DECLARE @Folder Varchar(100)
|
||||
DECLARE CursDokFolder CURSOR FOR
|
||||
select 'Urlaub' as DOK_FOLDER UNION
|
||||
select 'Vertragsunterlagen' as DOK_FOLDER UNION
|
||||
select 'Einstellungsunterlagen' as DOK_FOLDER UNION
|
||||
select 'Urlaub' as DOK_FOLDER UNION
|
||||
select 'Weiterbildung' as DOK_FOLDER UNION
|
||||
select 'Meldungen' as DOK_FOLDER UNION
|
||||
select 'Lohn und Gehalt' as DOK_FOLDER
|
||||
OPEN CursDokFolder
|
||||
FETCH NEXT FROM CursDokFolder INTO @Folder
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM [TBPMO_STRUCTURE_NODES] WHERE ID1 = @ID1 + '-' + @Folder AND PARENT_GUID = @NODE_PERSONAL)
|
||||
--Dokumentenordner anlegen
|
||||
INSERT INTO [dbo].[TBPMO_STRUCTURE_NODES]
|
||||
([NODE_CONFIG_ID]
|
||||
,[NODE_CAPTION]
|
||||
,[ID1]
|
||||
,[PARENT_GUID])
|
||||
VALUES
|
||||
(@NC_SF,
|
||||
@Folder,
|
||||
@ID1 + '-' + @Folder,
|
||||
@NODE_PERSONAL);
|
||||
ELSE
|
||||
PRINT 'Knoten ' + @ID1 + '-' + @Folder + ' gibt es schon!'
|
||||
FETCH NEXT FROM CursDokFolder INTO @Folder
|
||||
END
|
||||
CLOSE CursDokFolder
|
||||
DEALLOCATE CursDokFolder
|
||||
|
||||
FETCH NEXT FROM cursMA INTO @ID1
|
||||
END
|
||||
CLOSE cursMA
|
||||
DEALLOCATE cursMA
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -0,0 +1,85 @@
|
||||
|
||||
-- =============================================
|
||||
-- Author: <Digital Data - Schreiber, Marlon>
|
||||
-- Description: <Diese Prozedur erstellt die Records und Cotnrols für die Mitarbeiter
|
||||
|
||||
BEGIN
|
||||
DECLARE
|
||||
@NODE_GUID INTEGER,
|
||||
@NODE_CONFIG_ID INTEGER,
|
||||
@ENTITY_ID INTEGER,
|
||||
@CAPTION VARCHAR(100),
|
||||
@ID1 VARCHAR(100),
|
||||
@TYPE_NODE SMALLINT,
|
||||
@PARENT_GUID INTEGER,
|
||||
@NODES_CREATED INTEGER,
|
||||
@NC_PERSON_BASE INTEGER,
|
||||
@CTRL_ID_NN INTEGER,
|
||||
@CTRL_ID_VN INTEGER
|
||||
|
||||
|
||||
SELECt @NC_PERSON_BASE = GUID FROM TBPMO_STRUCTURE_NODES_CONFIGURATION WHERE NAME = 'Hauptknoten Personal';
|
||||
SELECT @ENTITY_ID = GUID FROM TBPMO_FORM WHERE NAME = 'Personalakte';
|
||||
SELECT @CTRL_ID_NN = GUID FROM TBPMO_CONTROL WHERE FORM_ID = @ENTITY_ID AND NAME = 'txtNachname'
|
||||
SELECT @CTRL_ID_VN = GUID FROM TBPMO_CONTROL WHERE FORM_ID = @ENTITY_ID AND NAME = 'txtVorname'
|
||||
DECLARE MYCURSOR CURSOR LOCAL FOR
|
||||
select T.GUID, T1.GUID as NODE_CONFIG_ID, T1.[ENTITY_ID],T.NODE_CAPTION,T.ID1,T1.TYPE_NODE,T.PARENT_GUID
|
||||
from
|
||||
TBPMO_STRUCTURE_NODES T,
|
||||
TBPMO_STRUCTURE_NODES_CONFIGURATION T1
|
||||
WHERE
|
||||
T.NODE_CONFIG_ID = T1.GUID AND T1.CREATE_RECORD = 1
|
||||
AND T1.ENTITY_ID = 5 AND T1.NAME in ('Dateiablage','Hauptknoten Personal')
|
||||
and T.GUID <> 3
|
||||
|
||||
--select * from TBPMO_STRUCTURE_NODES where NODE_CONFIG_ID = 19
|
||||
|
||||
OPEN MYCURSOR
|
||||
FETCH NEXT FROM MYCURSOR INTO @NODE_GUID,@NODE_CONFIG_ID,@ENTITY_ID,@CAPTION,@ID1,@TYPE_NODE,@PARENT_GUID
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
DECLARE @RECORD_ID INTEGER
|
||||
|
||||
|
||||
BEGIN
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_RECORD WHERE NODE_GUID = @NODE_GUID)
|
||||
BEGIN
|
||||
EXEC PRPMO_CREATE_RECORD @RECORD_ID Output,@ENTITY_ID,'DDPA_CREATE'
|
||||
|
||||
IF @RECORD_ID > 0
|
||||
BEGIN
|
||||
UPDATE TBPMO_RECORD SET NODE_GUID = @NODE_GUID WHERE GUID = @RECORD_ID
|
||||
SET @NODES_CREATED += 1
|
||||
END
|
||||
END
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT @RECORD_ID = GUID FROM TBPMO_RECORD WHERE NODE_GUID = @NODE_GUID
|
||||
END
|
||||
|
||||
IF NOT EXISTS(SELECT GUID FROM TBPMO_STRUCTURE_NODES WHERE GUID = @NODE_GUID AND RECORD_ID = @RECORD_ID)
|
||||
BEGIN
|
||||
UPDATE TBPMO_STRUCTURE_NODES SET RECORD_ID = @RECORD_ID WHERE GUID = @NODE_GUID
|
||||
END
|
||||
|
||||
IF @NODE_CONFIG_ID = @NC_PERSON_BASE
|
||||
BEGIN
|
||||
DECLARE @NACHNAME VARCHAR(50),@VORNAME VARCHAR(50),@NEW_CONTR_VAL_ID INTEGER
|
||||
SELECT @NACHNAME = Data FROM dbo.FNDD_SPLIT_STRING(@ID1,',') where SequentialOrder = 1;
|
||||
SELECT @VORNAME = Data FROM dbo.FNDD_SPLIT_STRING(@ID1,',') where SequentialOrder = 2;
|
||||
|
||||
EXEC PRPMO_CREATE_CONTROL_VALUE @NEW_CONTR_VAL_ID Output,@CTRL_ID_NN,@RECORD_ID,@NACHNAME,'Digital Data'
|
||||
EXEC PRPMO_CREATE_CONTROL_VALUE @NEW_CONTR_VAL_ID Output,@CTRL_ID_VN,@RECORD_ID,@VORNAME,'Digital Data'
|
||||
END
|
||||
|
||||
END
|
||||
--########
|
||||
FETCH NEXT FROM MYCURSOR INTO @NODE_GUID,@NODE_CONFIG_ID,@ENTITY_ID,@CAPTION,@ID1,@TYPE_NODE,@PARENT_GUID
|
||||
END
|
||||
CLOSE MYCURSOR
|
||||
DEALLOCATE MYCURSOR
|
||||
PRINT 'RECORDS CREATED: ' + CONVERT(VARCHAR(20),@NODES_CREATED)
|
||||
END
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user