CREATE PROCEDURE dbo.Artikeldaten_XREF
AS

BEGIN

DECLARE @aimkey NUMERIC(17,5)	-- alter AIMKEY


DECLARE crArtikel CURSOR local forward_only read_only dynamic FOR
	SELECT AIMKEY
	FROM PART
	WHERE AIMKEY NOT IN (SELECT AIMKEY FROM VIEW_XREF_PART_CLASS)

OPEN crArtikel

FETCH NEXT FROM crArtikel INTO @aimkey
BEGIN TRANSACTION
WHILE @@FETCH_STATUS = 0
BEGIN

-- DELETE FROM XREF_ELEMENT WHERE PARENT_AIMKEY = @aimkey AND RELATIONSHIP_ID = 'AIM.XREF.PART'

INSERT INTO XREF_ELEMENT (PARENT_AIMKEY,CHILD_AIMKEY,OWNER,OWNER_GROUP,RELATIONSHIP_ID,POSITION) VALUES (@aimkey,430,'Administrator','ENGINEERING_EMPLOYEES','AIM.XREF.PART.CLASS',0)	


FETCH NEXT FROM crArtikel INTO @aimkey

END
CLOSE crArtikel
DEALLOCATE crArtikel
COMMIT TRANSACTION

END

GO