Uwe Handzik - CAD Team Handzik

Diese Seite ist nicht editierbar. Sie können den Quelltext sehen, jedoch nicht verändern. Kontaktieren Sie den Administrator, wenn Sie glauben, dass hier ein Fehler vorliegt.
=====Compass=====

----


====DEX====

Ablage Ort fürs DEX Log : 

C:\ProgramData\Autodesk\Productstream Data Export Utility\DataExportUtility.log

-----

Filelinkname mit Pad belegen 

<file>
___Selection ( enumerate __MARK__ ___XdwCmd "update DOCUMENT set FILE_LINKNAME=##(DOCNAME0) where AIMKEY=##(AIMKEY)" );

___read() #DOCNAME0
</file>

Seletierte Daten ins DEX

----

<file>
___Selection ( enumerate __MARK__ ___XdwCmd "INSERT INTO PSP2VLT ( AIMKEY ) VALUES ( ##AIMKEY )"  );


CREATE TABLE [dbo].[PSP2VLT](
	[AIMKEY] [numeric](17, 5) NULL,
	[ID] [numeric](18, 0) IDENTITY(1,1) NOT NULL
) ON [PRIMARY]
GO


SELECT * FROM VIEW_ALL_DOCUMENT WHERE AIMKEY IN (  SELECT AIMKEY FROM PSP2VLT )
SELECT * FROM VIEW_ALL_PROJECT WHERE AIMKEY IN (  SELECT AIMKEY FROM PSP2VLT )


DELETE FROM PSP2VLT
WHERE ID NOT IN 
	(SELECT min(ID) 
	FROM PSP2VLTxx Tab1 
	GROUP BY AIMKEY)

</file>

-----

=====COMPASS JObserver =====

====Allgemeines====

Der Compass Jobserver stellt für die Bearbeitung von Inventor Dateien nur rudimentäre Funktionen zur Verfügung.
Mit dem Tools INVEXP.EXE werden diese etwas erweitert. 
Damit ist eine wesentlich bessere Kontrolle der Konvertierung / Druck Vorgänge möglich.

Die aktuelle Version unterstützt 

Inventor 2012 - 2018
AutoCAD 2012 - 2016
.Net Version : 4.0

Der aktuelle Stand ist 4.7.40.1134 

----

====Parameter====

INVEXP.EXE ist eine Kommandozeilen Applikation, die über Parameter gesteuert wird.

Die Parameter sind: 
  Befehl <- Was soll gemacht werden
  Eingabe Datei <- Quell Datei 
  Ausgabe Datei ( wenn Notwendig )
  Parameter Datei ( wenn Notwendig )
   
Zur Übergabe stehen zwei Verfahren zur Verfügung :

Jeder Parameter einzeln

<file>
Invexp SOURCE      ...xzy.ipt
Invexp DESTINATION ...xzy.stp
Invexp PARAMETER   ...stp.ini
Invexp STP 
</file>

Alle Parameter gleichzeitig

  InvExp MODUS QUELLE ZIEL INI

z.b.

  Invexp STP xzy.ipt xzy.stp stp.ini

-----

====Einstellungen====

Die Einstellung erfolgen in der Datei **InvExp.exe.config**
Hierbei handelt es sich im eine XML Datei. 
Bitte nur mit dem Notepad bearbeiten.
Bei Änderungen eine Sicherung der Ausgangsdatei anlegen !

-----

====Inventor====

Gibt die Anzahl der Inventor Verwendungen an. 
Nach x Benutzungen wird der Inventor beendet, aus dem Speicher entfernt und neu gestartet. 
Defaultwert = 100, 
0 - Inventor läuft ständig ( nicht empfohlen )

<file>
<setting name="COUNTER_MAX" serializeAs="String">
   <value>100</value>
</setting>
</file>


-----




====Log Datei ====

Bei der INVEXE.EXE wird eine Logdatei erstellt, in der alle Bildschirmausgaben geschrieben werden.
z.b. **Log-10_01_2014.txt** \\
Werte sind true / false

<file>
<setting name="LOG" serializeAs="String">
    <value>True</value>
</setting>
</file>

-----

====Debug=====

Im Debug Mode wird nach Ausführung eines Befehls auf ein **RETURN** des Anwenders gewartet. 
Damit kann der Ablauf besser verfolgt werden.

Werte sind true / false

<file>
<setting name="DEBUG" serializeAs="String">
    <value>False</value>
</setting>
</file>

-----

====Beispiel Batchdatei=====

<file>
SET      PRG=d:\Jobs\InvExp
SET  DATA_IN=d:\Jobs\Testdaten
SET DATA_OUT=d:\Jobs\temp
cls
"%PRG%\Invexp" SOURCE        "%DATA_IN%\Fraese.iam"
"%PRG%\InvExp" DESTINATION   "%DATA_OUT%\Fraese.stp"
"%PRG%\InvExp" PARAMETER     "%PRG%\stp.ini"
"%PRG%\InvExp" STP
</file>

-----

=====Kommandos für die Ausführung=====

Es stehen die folgenden Befehle zur Verfügung :

====PRT====

drucken einer IDW

<file>
Invexp SOURCE      ...xzy.idw
Invexp PARAMETER   ...my.settings
Invexp PRT
</file>

----

====PDF=====
 
Export einer PDF aus einer IDW. Die Parameter kommen aus der INI Datei 

<file>
Invexp SOURCE      ...xzy.idw
Invexp DESTINATION ...xzy.pdf
Invexp PARAMETER   ...myPDF.ini
Invexp PDF
</file>

----

====DWG====

Export einer DWG aus einer IDW. Die Parameter kommen aus der INI Datei 
Exportiert eine IDW als DWG

  Invexp SOURCE      ...xzy.idw
  Invexp DESTINATION ...xzy.dwg
  Invexp PARAMETER   ...myDWG.ini
  Invexp DWG

----

====DXF====

Export einer DXF aus einer IDW. Die Parameter kommen aus der INI Datei 

  Invexp SOURCE      ...xzy.idw
  Invexp DESTINATION ...xzy.dxf  / ...xzy.zip
  Invexp PARAMETER   ...myDXF.ini
  Invexp DXF


----


====STP====

  Invexp SOURCE      ...xzy.ipt / ...xyz.iam
  Invexp DESTINATION ...xzy.stp / ...xzy.zip 
  Invexp PARAMETER   ...msSTP.ini
  Invexp STP 

----

====STL====

Export einer IPT oder IAM in STL Format. Empfehlung : immer nur IPTs !

  Invexp SOURCE      ...xzy.ipt / ...xyz.iam
  Invexp DESTINATION ...xzy.stl / ...xzy.zip
  Invexp PARAMETER   ...mySTL.ini
  Invexp STL

Die Parameter für den Export liegen in der myStl.ini

  [STL]
  ; ============================================
  ; 0 = Binär   1 = Ascii  
  OutputFileType=0
  ; 2 = INCH   
  ; 3 = FOOT   
  ; 4 = CENTIMETER   
  ; 5 = MILLIMETER   
  ; 6 = METER   
  ; 7 = MICRON  
  ExportUnits=5  
  ; 0 = ONE FILE 
  ; 1 = ONE FILE PER PART INSTANCE 
  ExportFileStructure=0
  ; 0 = HIGH 
  ; 1 = MEDIUM
  ; 2 = LOW
  ; 3 = CUSTOM
  Resolution=1
  ; Range 1 to 100. Value is used if Resolution is CUSTOM (3), otherwise value is ignored.  
  ;SurfaceDeviation=20  
  ; Range 1 to 100. Value is used if Resolution is CUSTOM (3), otherwise value is ignored.  
  ;NormalDeviation=20  
  ; Range 1 to 100. Value is used if Resolution is CUSTOM (3), otherwise value is ignored.  
  ;MaxEdgeLength=20  
  ; Range 1 to 100. Value is used if Resolution is CUSTOM (3), otherwise value is ignored.  
  ;AspectRatio=20  
  ; nicht in der Hilfe ....
  AllowMoveMeshNode=False
  ExportColor = Wahr

----

====IGS====

  Invexp SOURCE      ...xzy.ipt / ...xyz.iam
  Invexp DESTINATION ...xzy.igs / ...xzy.zip
  Invexp PARAMETER   ...myIGS.ini
  Invexp IGS

----
  
====DWF====

  Invexp SOURCE      ...xyz.idw / ...xzy.ipt / ...xyz.iam
  Invexp DESTINATION ...xzy.dwf
  Invexp PARAMETER   ...myDWF.ini
  Invexp DWF

----

====DWFX====

Wie DWF

----

====SAT====

<file>
Invexp SOURCE      ...xzy.ipt / ...xyz.iam
Invexp DESTINATION ...xzy.sat / ...xzy.zip
Invexp PARAMETER   ...mySAT.ini
Invexp SAT
</file>

----

====JT====
  
----

==== JPG====
  
-----

====BMP====
  
-----



====PNG====
  
----

====TIFF====
  
----

====XLS====
 

 
-----



====CSV====
  
  
----


====ERSATZ====

Erzeugen eines Ersatzmodels

<file>
Invexp SOURCE      ...xyz.iam
Invexp DESTINATION ...xyz.ipt
Invexp PARAMETER   ...mySet.ini
Invexp ERSATZ
</file>

Aufbau der INI Datei 

  [ERSATZ]
  ; Steuerdatei für die erstellung eines Ersatzmodells
  ; Stand 28.08.2012 
  ; ============================================
  ; IncludeAllSketches
  ; Method that includes all sketches from the source assembly.
  ; This includes top level sketches in the source assembly as well as sketches in sub-assemblies and parts.
  IncludeAllSketches=False
  ; ============================================
  ; DeriveStyle
  ; kDeriveAsMultipleBodies      = 80643  - as multiple bodie
  ; kDeriveAsSingleBodyNoSeams   = 80642  - as a single body with no seams
  ; kDeriveAsSingleBodyWithSeams = 80641  - as a single body with seams
  ; kDeriveAsWorkSurface         = 80644  - as work surfaces
  DeriveStyle=kDeriveAsSingleBodyNoSeams  
  ; ============================================
  ; IncludeAllTopLeveliMateDefinitions
  ; IncludeAllTopLevelWorkFeatures
  ; IncludeAllTopLevelSketches
  ; IncludeAllTopLevelParameters 
  ;
  ; kDerivedBoundingBox = 27141        -  the bounding box of the component will be used for the derivation
  ;                                       die Bounding Box der Komponente wird für die Ableitung verwendet
  ;  
  ; kDerivedExcludeAll = 27138         -  all occurrences in the assembly will be ignored
  ;                                       alle Vorkommen in der Baugruppe werden ignoriert 
  ;
  ; kDerivedIncludeAll = 27137         -  all occurrences in the assembly will be used and will 
  ;                                       add material to the solid body
  ;                                       alle Vorkommen in der Baugruppe werden verwendet 
  ;                                       und wird zum Material des Festkörpers hinzufügen
  ;
  ; kDerivedIndividualDefined = 27140  -  the suboccurrences define their behavior
  ;                                       die sub Vorkommen definieren ihr Verhalten    
  ;
  ; kDerivedIntersect = 27142          -  the intersection of the component will be used for the derivation
  ;
  ;
  ; kDerivedSubtractAll = 27139        -  all occurrences in the assembly will be used and will 
  ;                                       remove material from the solid body
  ;
  IncludeAllTopLeveliMateDefinitions=kDerivedIndividualDefined
  IncludeAllTopLevelWorkFeatures=kDerivedIncludeAll
  IncludeAllTopLevelSketches=kDerivedIncludeAll
  IncludeAllTopLevelParameters=kDerivedExcludeAll  
  ; ============================================
  ; ReducedMemoryMode
  ; Beim Erstellen eines Bauteils weniger Speicher verbraucht,
  ; indem Quellkörper aus dem Cache ausgeschlossen werden. Es werden
  ; keine Quellkörper im Browser angezeigt. Beim Auflösen oder Unterdrücken
  ; der Verknüpfung entfallen die Speichereinsparungen.
  ReducedMemoryMode=True
  ; ============================================
  ; SetHolePatchingOptions
  ; kDerivedPatchAll = 88322     - all holes will be patched
  ; kDerivedPatchNone = 88321    - no holes will be patched
  ; kDerivedPatchRange = 88323   - holes within specified range will be patched ( Wird nicht unterstützt )
  SetHolePatchingOptions=kDerivedPatchAll
  ; ============================================
  ; SetHolePatchingOptions
  ; kDerivedRemoveNone = 88577           - no geometry will be removed
  ; kDerivedRemovePartsAndFaces = 88579  - invisible parts and faces will be removed
  ; kDerivedRemovePartsOnly = 88578      - whole invisible parts will be removed only
  ;
  ; Zahlenwert fest auf 25
  ; Call oDerivedAssemblyDef.
  ;             SetRemoveByVisibilityOptions(DerivedGeometryRemovalEnum.kDerivedRemovePartsAndFaces, 25)
  ;
  SetRemoveByVisibilityOptions=kDerivedRemovePartsAndFaces 

  
  
-----


====ERSUPD====

Update eines Ersatzmodels

<file>
Invexp SOURCE      ...xyz.ipt
Invexp ERSUPD
</file> 
  
  
  
-----


====MIG====

Die angegeben Datei wird migriert, wenn notwendig ( needsmigration = true )

Ein ev. vorhandener Schreibschutz wird für die Migration entfernt und im Anschluss wieder gesetzt

<file>
Invexp SOURCE      ...xzy.idw / xyz.ipt / xyz.iam
Invexp MIG
</file>
  
-----

====Kundenspezifische Befehl====

Mit dem Befehl DLL wird die INVEXP.EXE um Kundenspezifische Befehle erweitert.

Replikator

-----

=====Compass Replikator=====

==== START.CMD ====

  NET STOP "SQL Server-Agent (MSSQLSERVER)"
  PING 127.0.0.1 > NUL
  REM 
  NET START "SQL Server-Agent (MSSQLSERVER)"
  PING 127.0.0.1 > NUL
  REM
  NET START "Autodesk Productstream Professional Replicator Service 2011"
  PING 127.0.0.1 > NUL

==== STOP.CMD ====

  NET STOP "Autodesk Productstream Professional Replicator Service 2011"
  REM
  PING 127.0.0.1 > NUL
  PING 127.0.0.1 > NUL
  PING 127.0.0.1 > NUL
  REM
  KILL /IM /F COMPASS.EXE
  REM
  PING 127.0.0.1 > NUL
  REM
  NET STOP "SQL Server-Agent (MSSQLSERVER)"
  REM
  PING 127.0.0.1 > NUL
  PING 127.0.0.1 > NUL


====== RESTART.CMD ======

  REM ######
  REM 
  REM  Alles Stoppen
  REM
  REM ######
  REM
  cd \
  REM
  NET STOP "Autodesk Productstream Professional Replicator Service 2011"
  PING 127.0.0.1  > NULL
  REM
  NET STOP "SQL Server-Agent (MSSQLSERVER)"
  PING 127.0.0.1  > NULL
  REM
  KILL /IM /F COMPASS.EXE
  REM
  REM ######
  REM 
  REM repl Logs Speichern
  REM
  REM ######
  REM
  DEL "C:\Dokumente und Einstellungen\All Users\Anwendungsdaten\Productstream Professional 2011\*.log"   /s
  DEL "C:\Dokumente und Einstellungen\All Users\Anwendungsdaten\Productstream Professional 2011\*.Err"   /s
  DEL "C:\Dokumente und Einstellungen\All Users\Anwendungsdaten\Productstream Professional 2011\*.trace" /s
  REM
  REM ######
  REM 
  REM Alles wieder speichern
  REM
  REM ######
  REM
  NET START "SQL Server-Agent (MSSQLSERVER)"
  PING 127.0.0.1  > NULL
  REM
  NET START "Autodesk Productstream Professional Replicator Service 2011"
  PING 127.0.0.1  > NULL
  PING 127.0.0.1  > NULL
  PING 127.0.0.1  > NULL

------


=====Compass SQL - Scripte=====

Anbei eine Auflistung nützlicher SQL Scripte im Compass Umfeld.
Die Scripte sind als Beispiel anzusehen ! 
Der Einsatz erfolgt aus eigenen Gefahr !!


====Papierkorb löschen====


<file>


  select ENTITY_TYPE,count(*) from ELEMENT
      where DELETE_DATE is not null
          group by ENTITY_TYPE
  --
  --
  -- purge all deleted document
  --
  delete from HISTORY_DOCUMENT 
       where PARENT_AIMKEY in  
           (select AIMKEY from ELEMENT
                where DELETE_DATE is not null 
                      and ENTITY_TYPE in ('AIM.DOC.ENG','AIM.DOC.OFF','AIM.DOC.SECONDARY') and (CHANGE_USER = 'Username') )
  GO
  --
  --
  --
  delete from XREF_ELEMENT
      where PARENT_AIMKEY in 
          (select AIMKEY from ELEMENT
               where DELETE_DATE is not null 
                     and ENTITY_TYPE in ('AIM.DOC.ENG','AIM.DOC.OFF','AIM.DOC.SECONDARY')and (CHANGE_USER = 'Username'))
  GO
  --
  --
  --
  delete from XREF_ELEMENT
      where CHILD_AIMKEY in 
         (select AIMKEY from ELEMENT
             where DELETE_DATE is not null 
                   and ENTITY_TYPE in ('AIM.DOC.ENG','AIM.DOC.OFF','AIM.DOC.SECONDARY')and (CHANGE_USER = 'Username'))
  GO
  --
  --
  --
  delete from DOCUMENT
     where AIMKEY in 
         (select AIMKEY from ELEMENT
              where DELETE_DATE is not null 
               and ENTITY_TYPE in ('AIM.DOC.ENG','AIM.DOC.OFF','AIM.DOC.SECONDARY') and (CHANGE_USER = 'Username' ))
  GO
  --
  --
  --
  delete from ELEMENT
  where DELETE_DATE is not null 
    and ENTITY_TYPE in ('AIM.DOC.ENG','AIM.DOC.OFF','AIM.DOC.SECONDARY') and (CHANGE_USER = 'Username' )

</file>

-----

====Finden doppelter Datensätze:====

<file>

select ident,revision, count(*) from compass_pro_textar.history_document
group by ident,revision
having count(*)>1
</file>

------



==== ????====

SQL Script

<file>

select * from VIEW_DOCUMENT_ENGINEERING d
where PART_NUMBER like '412%'
and FILE_TYPE='A'
and FILE_UTC>07/07/2004
and CUSTOM_1_SHORT like '\\CAD1%'
and d.CUSTOM_1_SHORT in (select CUSTOM_1_SHORT from VIEW_DOCUMENT_ENGINEERING group by CUSTOM_1_SHORT having count(*) >1)
order by d.CUSTOM_1_SHORT

</file>


-----




==== ????====


select count(*) from (select count(*) num from part group by ident) 
where num > 1

---


==== ????====


<file>
select sum(num-1) from (select count(*) num from part group by ident) where num > 1
</file>

---


====alles übertragen von ALT nach NEU (gleiche Struktur)====

<file>
INSERT into NEU select * from ALT
</file>

-----



==== ???? ====

</file>
exec sp_changeobjectowner '[COMPASS].[aim_RPF_element]','dbo'
exec sp_changeobjectowner '[COMPASS].[aim_RPF_xref_element]','dbo'
</file>

-----



====Finden aller (mehrfachen) IDENT mit REVISION = 1 oder 01====

<file>

SELECT * FROM 
DOCUMENT
WHERE
IDENT IN (
	SELECT d.IDENT 
	FROM DOCUMENT d
	WHERE ISNUMERIC(d.REVISION)=1
	AND IDENT IN (
		SELECT IDENT
		FROM DOCUMENT
		GROUP BY IDENT
		HAVING COUNT(1)>1
	) 
	GROUP BY IDENT, CAST(d.REVISION AS NUMERIC)
	HAVING count(1)>1
)

</file>

-----


==== Liste aller Komponenten die in einer Baugruppe verbaut sind mit Statuskey00003:====

<file>

select * from VIEW_DOCUMENT_ENGINEERING where STATUSKEY<>'00003' and AIMKEY in (select X_CHILD_AIMKEY from VIEW_XREF_PARENT_DOCUMENT where X_RELATIONSHIP_ID='AIM.XREF.DOC.ENG' and STATUSKEY='00003')

select PART_NUMBER, STATUSKEY 
   from VIEW_DOCUMENT_ENGINEERING 
      where STATUSKEY<>'00003' and AIMKEY in (select X_CHILD_AIMKEY 
       from VIEW_XREF_PARENT_DOCUMENT 
           where X_RELATIONSHIP_ID='AIM.XREF.DOC.ENG' and STATUSKEY='00003')
</file>

-----



====Alles was NULL (Leer) Ist aus der REVISION Aufliste====

<file>
   SELECT REVISION FROM DOCUMENT   
      WHERE REVISION IS NULL
         ORDER BY REVISION 
</file>

-----

==== Und auf Startwert 00 setzen ====

<file>
   UPDATE DOCUMENT 
      SET REVISION = '00' 
         WHERE REVISION IS NULL
</file>

------


==== Datenbak reparieren ====

Folgenden Script ermitteln Sie die fehlerverdächtige Datenbank(en) auf dem Server:
 
SELECT DBName=NAME, [Status]=state_desc  
FROM master.sys.databases  
WHERE state_desc='SUSPECT'  
 
Im nächsten Schritt setzen Sie bringen Sie die Datenbank in den Notfallmodus, setzen dann
Zugriff auf EInzelbenutzermodus und führen ein Prüfung der Datenbank durch:
 

USE master;  
GO  
  
ALTER DATABASE [DATABASENAME] SET EMERGENCY  
GO  
  
ALTER DATABASE [DATABASENAME] SET SINGLE_USER  
GO  
  
DBCC CHECKDB ([DATABASENAME], REPAIR_ALLOW_DATA_LOSS) WITH NO_INFOMSGS;  
GO  
 
Anschließend wird nochmals eine Prüfung der Datenbank durchgeführt:
 
 
USE [DATABASENAME]  
GO  
  
DBCC CHECKDB WITH NO_INFOMSGS;  
GO  
 
Wenn diese letzte Prüfung fehlerfrei ausgeführt wurde, befindet sich die Datenbank immer
noch im Einzelbenutzermodus. Die Modus Umschaltung auf den Mehrfachbenutzermodus wird mit
folgendem Script durchgeführt:
 

USE master;  
GO  
  
ALTER DATABASE [DATABASENAME] SET MULTI_USER   
GO 

---


==== ????====

<file>
update ELEMENT set ENTITY_TYPE='AIM.DOC.ENG.STD' where AIMKEY in (
select AIMKEY from DOCUMENT where upper(FILE_LINKNAME) like '\\DATENCAD-SRV\COMPASS\DATA\INVENTOR_NORMTEILE%')
update DOCUMENT set FILE_LINKNAME = replace(upper(FILE_LINKNAME),'\\DATENCAD-SRV\COMPASS\DATA\INVENTOR_NORMTEILE','#(INI:Inventor:StdPartPath_1)') where upper(FILE_LINKNAME) like '\\DATENCAD-SRV\COMPASS\DATA\INVENTOR_NORMTEILE%'
</file>


-----



====CheckCompass====

Check aller Tabellen gegen die ELEMENT

Für alle Tabellen ( DOCUMENT / PART /.... )  muss es einen Eintrag auf in der ELEMENT geben
oder
Für alle Einträge in ELEMENT mit AIM.XXX.* muß es einen Eintrag in der entsprechenden Tabelle geben
Die gelistet Einträge müssen aus der ELEMENT, XREF_ELEMENT, DOCUMENT, HISTORY_DOCUMENT raus ( AIM_SAVE Error ) 

Wenn Replikator auch REPL prüfen !!

<code>
--  (c) CAD Team Handzik
--
--  COMPASS Integritäs Check  
--
--  V 0.9   Stand 13.02.2008 Hz - Start Version 
--  V 0.91  Stand 22.02.2008 Hz - Prüfen, was in der DOCUEMNT und nicht in der ELELEMT
-- 
--  Name der Kundeumgebung
--

USE compass_pro_cth
--
-- Check aller Tabellen gegen die ELEMENT
--
-- Für alle Tabellen ( DOCUMENT / PART /.... )  muss es einen Eintrag auf in der ELEMENT geben
-- oder
-- Für alle Einträge in ELEMENT mit AIM.XXX.* muß es einen Eintrag in der entsfile___chenden Tabelle geben
-- 
-- Die gelistet Einträge müssen aus der ELEMENT 
--                                      XREF_ELEMENT
--                                      DOCUMENT
--                                      HISTORY_DOCUMENT raus ( AIM_SAVE Error ) 
-- Wenn Replikator auch REPL prüfen !!
--
--
DECLARE @DEL AS INTEGER 
DECLARE @REPL AS INTEGER 

SET @REPL = 0 
-------------------ACHTUNG
SET @DEL = 0   --- ACHTUNG Bei 1 wird gelöscht
-------------------ACHTUNG

PRINT 'DOCUMENTE  nicht  ELEMENT >> Was ist in der DOCUMENT und nicht in der ELEMENT'
                                                                    SELECT E.AIMKEY, T.AIMKEY FROM ELEMENT AS E RIGHT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.AIMKEY IS NULL  
PRINT '';PRINT '';

PRINT 'DOCUMENTE  gegen  ELEMENT >> Was ist in der ELEMENT und nicht in der DOCUMENT'
                                                                    SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL  
PRINT '';PRINT '';

PRINT 'DOCUMENTE  gegen  ELEMENT dann in die XREF_ELEMENT >> PARENT_AIMKEY abgeleichen'
SELECT PARENT_AIMKEY FROM XREF_ELEMENT WHERE PARENT_AIMKEY     IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE PARENT_AIMKEY     IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

PRINT 'DOCUMENTE  gegen  ELEMENT dann in die XREF_ELEMENT >> CHILD_AIMKEY abgeleichen'
SELECT CHILD_AIMKEY FROM XREF_ELEMENT  WHERE CHILD_AIMKEY      IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
IF @DEL = 1
   BEGIN
             DELETE FROM XREF_ELEMENT  WHERE CHILD_AIMKEY      IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
   END
PRINT '';PRINT '';

PRINT 'DOCUMENTE  gegen  ELEMENT dann in die HISTORY_DOCUMENT AIMKEY abgleichen'
SELECT PARENT_AIMKEY FROM HISTORY_DOCUMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
IF @DEL = 1
   BEGIN
              DELETE FROM HISTORY_DOCUMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
   END
PRINT '';PRINT '';

IF @REPL = 1
BEGIN
PRINT 'DOCUMENTE  gegen  ELEMENT dann in die REPL_DOCUMENT AIMKEY abgleichen'
SELECT AIMKEY FROM REPL_DOCUMENT WHERE AIMKEY IN                  ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
PRINT '';PRINT ''

PRINT 'DOCUMENTE  gegen  ELEMENT dann in die REPLICATORQ abgleichen'
SELECT AIMKEY FROM REPLICATORQ WHERE AIMKEY IN                    ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  
PRINT ''
END



-- Zuletzt alles aus der ELEMENT raus
IF @DEL = 1
BEGIN
PRINT 'DOCUMENT gegen ELEMENT löschen ...'
DELETE FROM ELEMENT WHERE AIMKEY IN                               ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.AIMKEY IS NULL )  

PRINT 'ELEMENT gegen DOCUMENT löschen ...'
DELETE FROM DOCUMENT WHERE AIMKEY IN                              ( SELECT T.AIMKEY FROM ELEMENT AS E RIGHT OUTER JOIN DOCUMENT AS T ON E.AIMKEY = T.AIMKEY WHERE E.AIMKEY IS NULL  )  

END 
PRINT '';PRINT '';

PRINT '#######################################################################################################################################################################################'

PRINT 'ADDRESS  gegen  ELEMENT'
                                                                SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN ADDRESS AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.ADR%' AND T.AIMKEY IS NULL 
PRINT '';PRINT '';

PRINT 'ADDRESS  gegen  ELEMENT  in die XREF_ELEMENT >> PARENT'
SELECT PARENT_AIMKEY FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN ADDRESS AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.ADR%' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN ADDRESS AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.ADR%' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

PRINT 'ADDRESS  gegen  ELEMENT  in die XREF_ELEMENT >> CHILD'
SELECT CHILD_AIMKEY FROM XREF_ELEMENT WHERE CHILD_AIMKEY  IN  ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN ADDRESS AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.ADR%' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
             DELETE FROM XREF_ELEMENT WHERE CHILD_AIMKEY  IN  ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN ADDRESS AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.ADR%' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

-- Zuletzt alles aus der ELEMENT raus
IF @DEL = 1
BEGIN
PRINT 'ADDRESS  gegen  ELEMENT löschen ...'
DELETE FROM ELEMENT WHERE AIMKEY IN                           ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN ADDRESS AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.ADR%' AND T.AIMKEY IS NULL )  
END 
PRINT '';PRINT '';

PRINT '#######################################################################################################################################################################################'

PRINT 'CONTACT  gegen  ELEMENT'
                                                                SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN CONTACT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.CON%' AND T.AIMKEY IS NULL
PRINT '';PRINT '';
</file>
<file>

PRINT 'CONTACT  gegen  ELEMENT  in die XREF_ELEMENT >> PARENT'
SELECT PARENT_AIMKEY FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN CONTACT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.CON%' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN CONTACT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.CON%' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

PRINT 'CONTACT  gegen  ELEMENT  in die XREF_ELEMENT >> CHILD'
SELECT CHILD_AIMKEY FROM XREF_ELEMENT  WHERE CHILD_AIMKEY IN (  SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN CONTACT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.CON%' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE CHILD_AIMKEY IN (  SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN CONTACT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.CON%' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

-- Zuletzt alles aus der ELEMENT raus
IF @DEL = 1
BEGIN
PRINT 'CONTACT  gegen  ELEMENT löschen ...'
DELETE FROM ELEMENT WHERE AIMKEY IN                           ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN CONTACT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.CON%' AND T.AIMKEY IS NULL )  
END 
PRINT '';PRINT '';

PRINT '#######################################################################################################################################################################################'

PRINT 'PART  gegen  ELEMENT'
                                                                SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL
PRINT '';PRINT'';

PRINT 'PART  gegen  ELEMENT dann  in die XREF_ELEMENT >> PARENT'
SELECT PARENT_AIMKEY FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

PRINT 'PART  gegen  ELEMENT dann in die XREF_ELEMENT >> CHILD'
SELECT CHILD_AIMKEY FROM XREF_ELEMENT  WHERE CHILD_AIMKEY IN (  SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE CHILD_AIMKEY IN (  SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT'';

PRINT 'PART  gegen  ELEMENT dann in die HISTORY_PART AIMKEY abgleichen'
SELECT PARENT_AIMKEY FROM HISTORY_PART WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )  
IF @DEL = 1
   BEGIN
              DELETE FROM HISTORY_PART WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )  
   END
PRINT '';PRINT '';

-- Zuletzt alles aus der ELEMENT raus
IF @DEL = 1
BEGIN
PRINT 'PART  gegen  ELEMENT löschen ...'
DELETE FROM ELEMENT WHERE AIMKEY IN                           ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PART AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PART' AND T.AIMKEY IS NULL )  
END 
PRINT '';PRINT '';


PRINT '#######################################################################################################################################################################################'

PRINT 'PROJECT  gegen  ELEMENT'
                                                                SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PROJECT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PRO' AND T.AIMKEY IS NULL
PRINT '';PRINT'';

PRINT 'PROJECT  gegen  ELEMENT dann in die XREF_ELEMENT >> PARENT'
SELECT PARENT_AIMKEY FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PROJECT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PRO' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE PARENT_AIMKEY IN ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PROJECT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PRO' AND T.AIMKEY IS NULL )  
   END 
PRINT '';PRINT '';

PRINT 'PROJECT  gegen  ELEMENT dann in die XREF_ELEMENT >> CHILD'
SELECT CHILD_AIMKEY FROM XREF_ELEMENT  WHERE CHILD_AIMKEY IN (  SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PROJECT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PRO' AND T.AIMKEY IS NULL )
IF @DEL = 1
   BEGIN
              DELETE FROM XREF_ELEMENT WHERE CHILD_AIMKEY IN (  SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PROJECT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PRO' AND T.AIMKEY IS NULL )  
   END
PRINT '';PRINT'';
</file>
<file>

-- Zuletzt alles aus der ELEMENT raus
IF @DEL = 1
BEGIN
PRINT 'PROJECT  gegen  ELEMENT löschen ...'
DELETE FROM ELEMENT WHERE AIMKEY IN                           ( SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN PROJECT AS T ON E.AIMKEY = T.AIMKEY WHERE E.ENTITY_TYPE LIKE 'AIM.PRO' AND T.AIMKEY IS NULL )  
END 
PRINT '';PRINT '';
PRINT '#######################################################################################################################################################################################'

--
--
--#############################################################################################
--#############################################################################################
--
-- Hier ist der Ausgangswert REVISION wichtig 
-- Im Standard ist der Wert leer
--
PRINT 'HISTORY_DOCUMENT  gegen  ELEMENT'
SELECT E.AIMKEY FROM ELEMENT AS E LEFT OUTER JOIN HISTORY_DOCUMENT AS T ON E.AIMKEY = T.PARENT_AIMKEY   WHERE E.ENTITY_TYPE LIKE 'AIM.DOC%' AND T.REVISION IS NOT NULL AND T.PARENT_AIMKEY IS NULL
PRINT '';PRINT'';

PRINT '#######################################################################################################################################################################################'

</code>



====Tabelle erweitern====

<code>

-- Tabelle DOCUMENT
BEGIN TRANSACTION
ALTER TABLE dbo.DOCUMENT ADD
TEMPKOMNR  varchar(30) NULL,
TEMPGETRTYP  varchar(30) NULL
	

GO
COMMIT
GO


-- Erweiterung der Sichten
IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors')) DROP TABLE #tmpErrors
CREATE TABLE #tmpErrors (ERROR INT, MODULE VARCHAR(30), OBJECT VARCHAR(128), POSITION INT, DESCRIPTION VARCHAR(256))
SET XACT_ABORT ON
IF EXISTS (SELECT * FROM sysobjects WHERE id=object_id('VIEW_DOCUMENT') AND OBJECTPROPERTY(id, 'IsView')=1)
  BEGIN
    IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#AIM_UPD_VIEWS')) DELETE FROM #AIM_UPD_VIEWS
    ELSE
    CREATE TABLE #AIM_UPD_VIEWS (ALIAS sysname NULL, PCOLUMN sysname NULL, CHANGE_REQUEST VARCHAR(3))
    INSERT INTO #AIM_UPD_VIEWS (ALIAS, PCOLUMN, CHANGE_REQUEST) VALUES ('TEMPKOMNR', 'D.TEMPKOMNR', 'ADD')
    INSERT INTO #AIM_UPD_VIEWS (ALIAS, PCOLUMN, CHANGE_REQUEST) VALUES ('TEMPGETRTYP', 'TEMPGETRTYP', 'ADD')

    EXECUTE aim_update_view 'VIEW_ALL_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_DOCUMENT_ENGINEERING'
    EXECUTE aim_update_view 'VIEW_XREF_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_XREF_PARENT_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_XREF_CHILD_DOCUMENT'
    
  END
GO

</code>

-----

====Abgleich IDW in DOCUMENT=====


<code>
USE [compass_pro]
GO
/****** Objekt:  Trigger [dbo].[CTH_UpdateDocumentIdw]    Skriptdatum: 04/22/2009 10:45:40 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author:		Uwe Handzik
-- Create date: 14.08.2007
-- Description:	Abgleichen der IDW
-- =============================================

ALTER TRIGGER [dbo].[CTH_UpdateDocumentIdw] ON [dbo].[DOCUMENT] FOR UPDATE NOT FOR REPLICATION 

AS 

BEGIN

	SET NOCOUNT ON;

		BEGIN TRY

            -- Alles über den AIMKEY
			DECLARE @newAIMKEY     numeric(17,5)
            -- Ist das Doument eine IDW
			DECLARE @newIDW        nvarchar(10)

            -- Abzugleichenden WERTE Start
			DECLARE @newCPR_ZEICHNR   nvarchar(255)
			DECLARE @newCPR_ARTIKEL   nvarchar(255)
			DECLARE @newCPR_ANLAGE    nvarchar(255)
			DECLARE @newCPR_AUFTRAG   nvarchar(255)
			DECLARE @newCPR_VTEIL     nvarchar(255)
			DECLARE @newCPR_ERS_DURCH nvarchar(255)
			DECLARE @newMATERIAL      nvarchar(255)
			DECLARE @newCPR_CFELD_11  nvarchar(255)
			DECLARE @newCPR_LOGOCAD   nvarchar(255)
			DECLARE @newCPR_FARBE     nvarchar(255)
			DECLARE @newCPR_FTEIL     nvarchar(255)
			DECLARE @newCPR_ERS_FUER  nvarchar(255)
			DECLARE @newCPR_MSTAB     nvarchar(255)
			DECLARE @newCPR_TOLERANZ  nvarchar(255)

            -- Die Englische Einträge 
			DECLARE @newCPR_SHORT_ENU nvarchar(255)
			DECLARE @newCPR_LONG_ENU  nvarchar(255)
			DECLARE @newCPR_MAT_ENU   nvarchar(255)
			DECLARE @newCPR_STICH_ENU nvarchar(255)
			DECLARE @newCPR_FARBE_ENU nvarchar(255)
			DECLARE @newCPR_CFELD_19  nvarchar(255)
           
            -- Abzugleichenden WERTE Start

			SELECT @newAIMKEY        =  AIMKEY        FROM Inserted

			SELECT @newCPR_ZEICHNR   =  CPR_ZEICHNR   FROM Inserted
			SELECT @newCPR_ARTIKEL   =  CPR_ARTIKEL   FROM Inserted
			SELECT @newCPR_ANLAGE    =  CPR_ANLAGE    FROM Inserted
			SELECT @newCPR_AUFTRAG   =  CPR_AUFTRAG   FROM Inserted
			SELECT @newCPR_VTEIL     =  CPR_VTEIL     FROM Inserted
			SELECT @newCPR_ERS_DURCH =  CPR_ERS_DURCH FROM Inserted
			SELECT @newMATERIAL      =  MATERIAL      FROM Inserted
			SELECT @newCPR_CFELD_11  =  CPR_CFELD_11  FROM Inserted
			SELECT @newCPR_LOGOCAD   =  CPR_LOGOCAD   FROM Inserted
			SELECT @newCPR_FARBE     =  CPR_FARBE     FROM Inserted
			SELECT @newCPR_FTEIL     =  CPR_FTEIL     FROM Inserted
			SELECT @newCPR_ERS_FUER  =  CPR_ERS_FUER  FROM Inserted
			SELECT @newCPR_MSTAB     =  CPR_MSTAB     FROM Inserted
			SELECT @newCPR_TOLERANZ  =  CPR_TOLERANZ  FROM Inserted

            -- Die Englische Einträge 
			SELECT @newCPR_SHORT_ENU =  CPR_SHORT_ENU FROM Inserted
			SELECT @newCPR_LONG_ENU  =  CPR_LONG_ENU  FROM Inserted
			SELECT @newCPR_MAT_ENU   =  CPR_MAT_ENU   FROM Inserted
			SELECT @newCPR_STICH_ENU =  CPR_STICH_ENU FROM Inserted
			SELECT @newCPR_FARBE_ENU =  CPR_FARBE_ENU FROM Inserted
			SELECT @newCPR_CFELD_19  =  CPR_CFELD_19  FROM Inserted
            
			IF @newAIMKEY         IS NULL   SELECT  @newAIMKEY         = 11.11
			IF @newCPR_ZEICHNR    IS NULL   SELECT  @newCPR_ZEICHNR    = ''
			IF @newCPR_ARTIKEL    IS NULL   SELECT  @newCPR_ARTIKEL    = ''
			IF @newCPR_ANLAGE     IS NULL   SELECT  @newCPR_ANLAGE     = ''
			IF @newCPR_AUFTRAG    IS NULL   SELECT  @newCPR_AUFTRAG    = ''
			IF @newCPR_VTEIL      IS NULL   SELECT  @newCPR_VTEIL      = ''
			IF @newCPR_ERS_DURCH  IS NULL   SELECT  @newCPR_ERS_DURCH  = ''
			IF @newMATERIAL       IS NULL   SELECT  @newMATERIAL       = ''
			IF @newCPR_CFELD_11   IS NULL   SELECT  @newCPR_CFELD_11   = ''
			IF @newCPR_LOGOCAD    IS NULL   SELECT  @newCPR_LOGOCAD    = ''
			IF @newCPR_FARBE      IS NULL   SELECT  @newCPR_FARBE      = ''
			IF @newCPR_FTEIL      IS NULL   SELECT  @newCPR_FTEIL      = ''
			IF @newCPR_ERS_FUER   IS NULL   SELECT  @newCPR_ERS_FUER   = ''
			IF @newCPR_MSTAB      IS NULL   SELECT  @newCPR_MSTAB      = ''
			IF @newCPR_TOLERANZ   IS NULL   SELECT  @newCPR_TOLERANZ   = '' 

            -- Die Englische Einträge 
			IF @newCPR_SHORT_ENU  IS NULL   SELECT  @newCPR_SHORT_ENU  = '' 
			IF @newCPR_LONG_ENU   IS NULL   SELECT  @newCPR_LONG_ENU   = '' 
			IF @newCPR_MAT_ENU    IS NULL   SELECT  @newCPR_MAT_ENU    = '' 
			IF @newCPR_STICH_ENU  IS NULL   SELECT  @newCPR_STICH_ENU  = '' 
			IF @newCPR_FARBE_ENU  IS NULL   SELECT  @newCPR_FARBE_ENU  = '' 
			IF @newCPR_CFELD_19   IS NULL   SELECT  @newCPR_CFELD_19   = '' 

			---
			--- AIMKEY ermittelt, - In XREF_ELEMENT Child(er) Suchen   
			---

			declare @ChildAimKey   numeric(17,5)
			declare @ParentAimKey  numeric(17,5)

			DECLARE Document_Cursor CURSOR FOR
				SELECT PARENT_AIMKEY, CHILD_AIMKEY
				FROM XREF_ELEMENT WHERE CHILD_AIMKEY = @newAIMKEY

			OPEN Document_Cursor

			FETCH NEXT FROM Document_Cursor INTO @ChildAimKey, @ParentAimKey 

			WHILE @@FETCH_STATUS = 0

				BEGIN
                    -- Nachschauen ob IDW  
                    SELECT @newIDW        = (SELECT FILE_EXT FROM DOCUMENT WHERE AIMKEY = @ChildAimKey )

                    IF upper(@newIDW) = 'IDW'   
                       UPDATE DOCUMENT SET 
                           CPR_ZEICHNR   = @newCPR_ZEICHNR  ,
                           CPR_ARTIKEL   = @newCPR_ARTIKEL  ,
                           CPR_ANLAGE    = @newCPR_ANLAGE   ,
                           CPR_AUFTRAG   = @newCPR_AUFTRAG  ,
                           CPR_VTEIL     = @newCPR_VTEIL    ,
                           CPR_ERS_DURCH = @newCPR_ERS_DURCH,
                           MATERIAL      = @newMATERIAL     ,
                           CPR_CFELD_11  = @newCPR_CFELD_11 ,
                           CPR_LOGOCAD   = @newCPR_LOGOCAD  ,
                           CPR_FARBE     = @newCPR_FARBE    ,
                           CPR_FTEIL     = @newCPR_FTEIL    ,
                           CPR_ERS_FUER  = @newCPR_ERS_FUER ,
                           CPR_MSTAB     = @newCPR_MSTAB    ,
                           CPR_TOLERANZ  = @newCPR_TOLERANZ ,
                           CPR_SHORT_ENU = @newCPR_SHORT_ENU,
			               CPR_LONG_ENU  = @newCPR_LONG_ENU ,
			               CPR_MAT_ENU   = @newCPR_MAT_ENU  ,
			               CPR_STICH_ENU = @newCPR_STICH_ENU, 
			               CPR_FARBE_ENU = @newCPR_FARBE_ENU,
			               CPR_CFELD_19  = @newCPR_CFELD_19
                       WHERE AIMKEY = @ChildAimKey

					FETCH NEXT FROM Document_Cursor INTO @ChildAimKey, @ParentAimKey 

				END

			CLOSE Document_Cursor 
			DEALLOCATE Document_Cursor  

		END TRY

	BEGIN CATCH

      INSERT dbo.cth_errorlog ( ERRORNUMBER,    
                                ERRORSEVERITY,    
                                ERRORSTATE,    
                                ERRORPROCEDURE,    
                                ERRORLINE,    
                                ERRORMESSAGE    ) 
          VALUES       ( CAST ( Error_NUMBER()   AS VARCHAR(5)) , 
                         CAST ( Error_SEVERITY() as VARCHAR(2)) , 
                         CAST ( Error_STATE()    AS VARCHAR(3)) , 
                                Error_PROCEDURE(), 
                         CAST ( Error_LINE()     AS VARCHAR(3)), 
                                Error_MESSAGE() );
   END CATCH

END

--USE [compass_pro]
--GO
--/****** Objekt:  Table [dbo].[cth_errorlog]  /
--SET ANSI_NULLS ON
--GO
--SET QUOTED_IDENTIFIER ON
--GO
--CREATE TABLE [dbo].[cth_errorlog](
--	[ERRORNUMBER] [nvarchar](50) NULL,
--	[ERRORSEVERITY] [nchar](10) NULL,
--	[ERRORSTATE] [nchar](10) NULL,
--	[ERRORPROCEDURE] [nchar](255) NULL,
--	[ERRORLINE] [nchar](10) NULL,
--	[ERRORMESSAGE] [nchar](255) NULL
--) ON [PRIMARY]

</code>

-----

====Abgleich IDW in ELEMENT====


<file>
USE [compass_pro]
GO
/****** Objekt:  Trigger [dbo].[CTH_UpdateElementIdw]    Skriptdatum: 04/22/2009 10:46:43 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author:		Uwe Handzik
-- Create date: 14.08.2007
-- Description:	Abgleichen der IDW
-- =============================================

ALTER TRIGGER [dbo].[CTH_UpdateElementIdw] ON [dbo].[ELEMENT] FOR UPDATE NOT FOR REPLICATION 

AS 

BEGIN

	SET NOCOUNT ON;

		BEGIN TRY

            -- Alles über den AIMKEY
			DECLARE @newAIMKEY     numeric(17,5)
            -- Ist das Doument eine IDW
			DECLARE @newIDW        nvarchar(10)

            -- Abzugleichenden WERTE Start
			DECLARE @newSHORT_DESC      nvarchar(255)
			DECLARE @newLONG_DESC       nvarchar(255)
			DECLARE @newCATEGORY        nvarchar(255)
			DECLARE @newCUSTOM_1_SHORT  nvarchar(255)
            -- Abzugleichenden WERTE Start

			SELECT @newAIMKEY          = AIMKEY         FROM Inserted

			SELECT @newSHORT_DESC      = SHORT_DESC     FROM Inserted
			SELECT @newLONG_DESC       = LONG_DESC      FROM Inserted
			SELECT @newCATEGORY        = CATEGORY       FROM Inserted
			SELECT @newCUSTOM_1_SHORT  = CUSTOM_1_SHORT FROM Inserted
            
			IF @newAIMKEY         IS NULL   SELECT  @newAIMKEY         = 11.11
			IF @newSHORT_DESC     IS NULL   SELECT  @newSHORT_DESC     = ''
			IF @newLONG_DESC      IS NULL   SELECT  @newLONG_DESC      = ''
			IF @newCATEGORY       IS NULL   SELECT  @newCATEGORY       = ''
			IF @newCUSTOM_1_SHORT IS NULL   SELECT  @newCUSTOM_1_SHORT = ''
			---
			--- AIMKEY ermittelt, - In XREF_ELEMENT Child(er) Suchen   
			---

			declare @ChildAimKey   numeric(17,5)
			declare @ParentAimKey  numeric(17,5)

			DECLARE Document_Cursor CURSOR FOR
				SELECT PARENT_AIMKEY, CHILD_AIMKEY
				FROM XREF_ELEMENT WHERE CHILD_AIMKEY = @newAIMKEY

			OPEN Document_Cursor

			FETCH NEXT FROM Document_Cursor INTO @ChildAimKey, @ParentAimKey 

			WHILE @@FETCH_STATUS = 0

				BEGIN
                    -- Nachschauen ob IDW  
                    SELECT @newIDW        = (SELECT FILE_EXT FROM DOCUMENT WHERE AIMKEY = @ChildAimKey )

                    IF upper(@newIDW) = 'IDW'   
                       UPDATE ELEMENT SET 
                            SHORT_DESC     = @newSHORT_DESC, 
                            LONG_DESC      = @newLONG_DESC,
                            CATEGORY       = @newCATEGORY,
			                CUSTOM_1_SHORT = @newCUSTOM_1_SHORT
                       WHERE AIMKEY = @ChildAimKey

					FETCH NEXT FROM Document_Cursor INTO @ChildAimKey, @ParentAimKey 

				END

			CLOSE Document_Cursor 
			DEALLOCATE Document_Cursor  

		END TRY

	BEGIN CATCH

      INSERT dbo.cth_errorlog ( ERRORNUMBER,    
                                ERRORSEVERITY,    
                                ERRORSTATE,    
                                ERRORPROCEDURE,    
                                ERRORLINE,    
                                ERRORMESSAGE    ) 
          VALUES       ( CAST ( Error_NUMBER()   AS VARCHAR(5)) , 
                         CAST ( Error_SEVERITY() as VARCHAR(2)) , 
                         CAST ( Error_STATE()    AS VARCHAR(3)) , 
                                Error_PROCEDURE(), 
                         CAST ( Error_LINE()     AS VARCHAR(3)), 
                                Error_MESSAGE() );
   END CATCH

END

--USE [compass_pro]
--GO
--/****** Objekt:  Table [dbo].[cth_errorlog]  /
--SET ANSI_NULLS ON
--GO
--SET QUOTED_IDENTIFIER ON
--GO
--CREATE TABLE [dbo].[cth_errorlog](
--	[ERRORNUMBER] [nvarchar](50) NULL,
--	[ERRORSEVERITY] [nchar](10) NULL,
--	[ERRORSTATE] [nchar](10) NULL,
--	[ERRORPROCEDURE] [nchar](255) NULL,
--	[ERRORLINE] [nchar](10) NULL,
--	[ERRORMESSAGE] [nchar](255) NULL
--) ON [PRIMARY]

</file>

}}


---

====Trigger Update Status

{{collapse(SQL Script ...)

<file>
USE [professional_easy]
GO
/****** Objekt:  Trigger [dbo].[CTH_UpdateStatus]    Skriptdatum: 08/31/2009 07:51:47 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE TRIGGER [dbo].[CTH_UpdateStatus] ON [dbo].[ELEMENT] FOR UPDATE NOT FOR REPLICATION 

AS

DECLARE @oldStatus		VARCHAR(5) 
DECLARE @newStatus		VARCHAR(5)

declare @keySec			numeric (17,5)
declare @keyDoc			numeric (17,5)

declare @IDENT 			Varchar(50)
declare @FILE 			Varchar(50)

declare @IDENT_SEC 		Varchar(50)
declare @FILE_SEC 		Varchar(50)

declare @CREATE_DATE	datetime     
declare @CREATE_USER	varchar(30) 

declare @CMP_ROOT       varchar(255) 
declare @MONAT          varchar(2)
declare @JAHR           varchar(4)
declare @DOCNAME        varchar(255) 
declare @DOCNAME_SEC    varchar(255) 
declare @ANZ            varchar(3) 

declare @OWNER			varchar(255)     
declare @OWNER_GROUP	varchar(255) 

declare @SHORT_DESC  	varchar(255) 


BEGIN

	-- Keinerlei Rückgabe von Resultsets
	SET NOCOUNT ON

	BEGIN TRY
	  
		IF NOT UPDATE(STATUSKEY)  
			BEGIN 
			  RETURN 
			END
		ELSE
			BEGIN

				SELECT @oldStatus  = (SELECT STATUSKEY FROM Deleted) 
				SELECT @newStatus = (SELECT STATUSKEY FROM Inserted)
     			SELECT @KeyDoc  = (SELECT AIMKEY FROM Inserted)

				IF @oldStatus IS NULL   SELECT  @oldStatus =  '-ERR-'
				IF @newStatus IS NULL   SELECT  @newStatus =  '-ERR-'
				IF @KeyDoc IS NULL   SELECT  @KeyDoc = 50000.22222
				--
				-- Status auf zum Prüfen
				--
				IF @newStatus = '00001' 
				BEGIN
                   UPDATE ELEMENT SET RIGHTS = 15375  WHERE AIMKEY = @KeyDoc
				END
				--
				-- Status auf zum Prüfen
				--
				IF @newStatus = '00002' 
				BEGIN
                   UPDATE ELEMENT SET RIGHTS = 1057801 WHERE AIMKEY = @KeyDoc
				END
				--
				-- Status auf Freigegeben
				--
				IF @newStatus = '00003' 
				BEGIN
                   UPDATE ELEMENT SET RIGHTS = 1057801 WHERE AIMKEY = @KeyDoc
				END
				--
				-- Status auf 
				--
				IF @newStatus = '00005' 
				BEGIN
                   UPDATE ELEMENT SET RIGHTS = 9225   WHERE AIMKEY = @KeyDoc
				END
				--
				-- Status auf 
				--
				IF @newStatus = '00006' 
				BEGIN
                   UPDATE ELEMENT SET RIGHTS = 15375  WHERE AIMKEY = @KeyDoc
				END
				--
				--
				--
				IF @newStatus = '00004' 
				BEGIN

                    UPDATE ELEMENT SET RIGHTS = 15375 WHERE AIMKEY = @KeyDoc

					SELECT @CMP_ROOT     = 'E:\DATEN\Compass\data\'
					--
					-- 
					--
					SELECT @OWNER       	= (SELECT OWNER       FROM ELEMENT WHERE AIMKEY = @KeyDoc)
					SELECT @OWNER_GROUP 	= (SELECT OWNER_GROUP FROM ELEMENT WHERE AIMKEY = @KeyDoc)
					SELECT @CREATE_DATE     = (SELECT CREATE_DATE FROM ELEMENT WHERE AIMKEY = @KeyDoc)
					SELECT @CREATE_USER 	= (SELECT CREATE_USER FROM ELEMENT WHERE AIMKEY = @KeyDoc)
					SELECT @SHORT_DESC      = (SELECT SHORT_DESC  FROM ELEMENT WHERE AIMKEY = @KeyDoc)

					SELECT @JAHR            = ( SUBSTRING  (CONVERT(varchar(20), @CREATE_DATE,102),1,4))
					SELECT @MONAT           = ( SUBSTRING  (CONVERT(varchar(20), @CREATE_DATE,102),6,2))

					SELECT @FILE            = (SELECT FILE_NAME  FROM DOCUMENT WHERE AIMKEY = @KeyDoc)
					SELECT @IDENT           = (SELECT IDENT      FROM DOCUMENT WHERE AIMKEY = @KeyDoc)

					select @ANZ             = (SELECT COUNT(*) FROM DOCUMENT WHERE FILE_NAME LIKE '%'+@FILE+'%' ) + 1

					SELECT @FILE_SEC        = 'X' + @FILE  + '-' + @ANZ
					SELECT @IDENT_SEC       = 'X' + @IDENT + '-' + @ANZ

					SELECT @DOCNAME         = @CMP_ROOT + @JAHR + '\' + @MONAT  + '\1\' + @FILE     + '.PDF'
					SELECT @DOCNAME_SEC     = @CMP_ROOT + @JAHR + '\' + @MONAT  + '\0\' + @FILE_SEC + '.PDF'
					--
					--  00001 - in Arbeit
					--  00002 - zum prüfen
					--  00003 - freigegeben
					--	00004 - in Änderung
					--  00005 - Ungültig

					exec aim_generate_aimkey @keySec OUTPUT
					--
					-- Einfügen in Tabelle ELEMENT
					--
					INSERT into ELEMENT 
					(
						AIMKEY,				-- 01
						ENTITY_TYPE,		-- 02
						STATUSKEY,			-- 03
						CREATE_DATE,		-- 04
						CREATE_USER,		-- 05
						CHANGE_DATE,		-- 06
						CHANGE_USER,		-- 07
						OWNER,				-- 08
						OWNER_GROUP,		-- 09
						RIGHTS,				-- 10
                        SHORT_DESC          -- 11
					)
					VALUES 
					(
						@keySec,            -- 01
						'AIM.DOC.SECONDARY',-- 02
						'00001',            -- 03
						@CREATE_DATE,       -- 04 
						@CREATE_USER,       -- 05
						@CREATE_DATE,       -- 06
						@CREATE_USER,       -- 07
						@OWNER,             -- 08
						@OWNER_GROUP,       -- 09
						'1063951',          -- 10
                        @SHORT_DESC         -- 11
					)
					--
					-- Einfügen in Tabelle DOCUMENT
					-- 
					INSERT into DOCUMENT
					(
						AIMKEY,            -- 01
						IDENT,             -- 02 ****
						FILE_NAME,         -- 03 **** 
						FILE_EXT,          -- 04
						FILE_TYPE          -- 05
					)
					VALUES
					(
						@keySec,           -- 01
						@IDENT_SEC,        -- 02 ***
						@FILE_SEC,         -- 03 ***
						'pdf',             -- 04
						'PDF'              -- 05
					)
					--
					-- Verknüpfung erstellen
					-- 
					INSERT into XREF_ELEMENT
					(
						PARENT_AIMKEY,     -- 01 Key der IDW 
						CHILD_AIMKEY,      -- 02 Key des SEC DOc
						RELATIONSHIP_ID,   -- 03 
						OWNER,             -- 04
						OWNER_GROUP        -- 05
					)
					VALUES
					(
						@keyDoc,	     			-- 01
						@keySec,	 				-- 02
						'AIM.XREF.DOC.SECONDARY',	-- 03
						@CREATE_USER,               -- 04
						'ENGINEERING_EMPLOYEES'     -- 05
					)

					DECLARE @Mach   VARCHAR(255)
					SELECT @MACH = 'copy ' + @DOCNAME + ' ' + @DOCNAME_SEC

					EXEC xp_cmdshell @MACH ;

					RETURN
				END
			END

		END TRY

		BEGIN CATCH
          ROLLBACK TRANSACTION
		  INSERT dbo.cth_errorlog ( ERRORNUMBER,    
									ERRORSEVERITY,    
									ERRORSTATE,    
									ERRORPROCEDURE,    
									ERRORLINE,    
									ERRORMESSAGE    ) 
			  VALUES       ( CAST ( Error_NUMBER()   AS VARCHAR(5)) , 
							 CAST ( Error_SEVERITY() as VARCHAR(2)) , 
							 CAST ( Error_STATE()    AS VARCHAR(3)) , 
									Error_PROCEDURE(), 
							 CAST ( Error_LINE()     AS VARCHAR(3)), 
									Error_MESSAGE() );
	   END CATCH

END
--
--########################################################################
--




</file>

}}



---

====SET_FILE_SHARE_WITH

{{collapse(SQL Script ...)

<file>
UPDATE DOCUMENT set FILE_SHARE_WITH=DATEDIFF(s, '19700101 00:00:00', '20070531')
</file>

}}



---

====InsertDocumentsIntoAllLocations

{{tipps:compas:collapse_sql_script_..._file_file_--_--_number_of_documents_with_missing_links_---_select_count_from_view_all_document_where_select_count_from_xref_element_where_relationship_id_aim.xref.doc.location_2_--_--_--_link_all_documents_to_all_locations_--_--_declare_alldocs_cursor_local_forward_only_for_select_aimkey_from_document_declare_doc_aimkey_numeric_17_5_open_alldocs_fetch_next_from_alldocs_into_doc_aimkey_while_fetch_status_0_begin_declare_dest_loc_cursor_local_forward_only_for_select_aimkey_from_location_declare_loc_aimkey_numeric_17_5_open_dest_loc_fetch_next_from_dest_loc_into_loc_aimkey_while_fetch_status_0_begin_if_select_count_from_xref_element_where_parent_aimkey_doc_aimkey_and_child_aimkey_loc_aimkey_0_begin_insert_into_xref_element_parent_aimkey_child_aimkey_relationship_id_owner_owner_group_values_doc_aimkey_loc_aimkey_aim.xref.doc.location_administrator_engineering_employees_end_fetch_next_from_dest_loc_into_loc_aimkey_end_close_dest_loc_deallocate_dest_loc_fetch_next_from_alldocs_into_doc_aimkey_end_close_alldocs_deallocate_alldocs_go


}}



---

====Repl Status

{{tipps:compas:collapse_sql_script_..._file_print_anzahl_aktueller_pushauftraege_pro_ziel-standort_--_--_--_select_destlocation_count_from_replicatorq_where_replication_type_like_4_group_by_destlocation_--_--_--_print_print_anzahl_aktueller_pushauftraege_pro_quell-standort_--_select_sourcelocation_count_from_replicatorq_where_replication_type_like_4_group_by_sourcelocation_--_--_--_print_print_anzahl_aktueller_pushauftraege_pro_quell-standort_--_select_destlocation_count_from_replicatorq_where_replication_type_like_8_and_destlocation_sourcelocation_group_by_destlocation_file

}}

----

====Einsame IPTs

{{tipps:compas:collapse_sql_script_..._file_select_from_view_document_engineering_where_aimkey_not_in_select_parent_aimkey_from_xref_element_where_relationship_id_aim.xref.doc.eng_and_aimkey_not_in_select_child_aimkey_from_xref_element_where_relationship_id_aim.xref.doc.eng_and_file_type_like_i_file

}}

----

====Aufheben der Replikation

{{tipps:compas:collapse_sql_script_..._file_--_aufheben_der_replikation_--_drop_rowguid_indexes_select_drop_index_sysobjects.name_._sysindexes.name_from_sysindexes_inner_join_sysobjects_on_sysindexes.id_sysobjects.id_where_objectproperty_object_id_sysobjects.name_ismsshipped_0_and_sysindexes.indid_0_and_sysindexes.indid_255_and_sysindexes.status_64_0_and_index_col_sysobjects.name_sysindexes.indid_1_rowguid_order_by_sysindexes.indid_--_remove_rowguid_default_constraints_select_alter_table_b.name_drop_constraint_a.name_from_sysobjects_a_inner_join_syscolumns_on_syscolumns.id_a.parent_obj_inner_join_sysobjects_b_on_syscolumns.id_b.id_where_syscolumns.name_rowguid_and_objectproperty_object_id_b.name_ismsshipped_0_and_a.xtype_d_--_remove_rowguid_columns_select_alter_table_sysobjects.name_drop_column_rowguid_from_syscolumns_inner_join_sysobjects_on_syscolumns.id_sysobjects.id_where_syscolumns.name_rowguid_and_objectproperty_object_id_sysobjects.name_ismsshipped_0_file

}}

----

====Abgleich Karten 1.1

{{collapse(SQL Script ...)

<file>

--
-- Installation für Kartenabgleich IPT / IAM /IPN mit IDW
--
-- (C) by CAD Team Handzik - Dipl. Ing. Uwe Handzik
--
-- Version 2.1 Stand 30.04.2011
--

USE compass_easy
GO

SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

--##############################################################################################################################
--
-- Error Tabelle anlegen
--

IF EXISTS(SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_NAME = 'cth_errorlog') DROP TABLE cth_errorlog;
GO

CREATE TABLE [dbo].cth_errorlog(
[pkErrorHandlingID] [int] IDENTITY(1,1) NOT NULL,
[Error_Number] [int] NOT NULL,
[Error_Message] [varchar](4000) COLLATE Latin1_General_BIN NULL,
[Error_Severity] [smallint] NOT NULL,
[Error_State] [smallint] NOT NULL DEFAULT ((1)),
[Error_Procedure] [varchar](200) COLLATE Latin1_General_BIN NOT NULL,
[Error_Line] [int] NOT NULL DEFAULT ((0)),
[UserName] [varchar](128) COLLATE Latin1_General_BIN NOT NULL DEFAULT (''),
[HostName] [varchar](128) COLLATE Latin1_General_BIN NOT NULL DEFAULT (''),
[Time_Stamp] datetime NOT NULL,
PRIMARY KEY CLUSTERED
(
[pkErrorHandlingID] ASC
)WITH (IGNORE_DUP_KEY = OFF) ON [PRIMARY]
) ON [PRIMARY]
GO

Print 'CREATE TABLE cth_errorlog'
GO

--##############################################################################################################################
-- Store Procedure  für CthErrorHandling löschen

IF OBJECT_ID ('CthErrorHandling', 'P') IS NOT NULL
   DROP PROCEDURE CthErrorHandling
GO

Print 'DROP PROCEDURE CthErrorHandling'
GO

--##############################################################################################################################
-- =============================================
-- Author      : Uwe Handzik
-- Ersellt am  : 24.09.2009
-- Version     : 1.0
-- Description :	Error Handling für den Rest
-- Aufruf mit EXEC  dbo.CthErrorHandling
-- =============================================

CREATE procedure dbo.CthErrorHandling AS 

BEGIN
	-- Declaration statements
	DECLARE @Error_Number int
	DECLARE @Error_Message varchar(4000)
	DECLARE @Error_Severity int
	DECLARE @Error_State int
	DECLARE @Error_Procedure varchar(200)
	DECLARE @Error_Line int
	DECLARE @UserName varchar(200)
	DECLARE @HostName varchar(200)
	DECLARE @Time_Stamp datetime

	-- Initialize variables
	SELECT @Error_Number = isnull(error_number(),0),
	@Error_Message = isnull(error_message(),'NULL Message'),
	@Error_Severity = isnull(error_severity(),0),
	@Error_State = isnull(error_state(),1),
	@Error_Line = isnull(error_line(), 0),
	@Error_Procedure = isnull(error_procedure(),''),
	@UserName = SUSER_SNAME(),
	@HostName = HOST_NAME(),
	@Time_Stamp = GETDATE();

	-- Insert into the dbo.ErrorHandling table
	INSERT INTO dbo.cth_errorlog (Error_Number, Error_Message, Error_Severity, Error_State, Error_Line, Error_Procedure, UserName, HostName, Time_Stamp)

	SELECT @Error_Number, @Error_Message, @Error_Severity, @Error_State, @Error_Line, @Error_Procedure, @UserName, @HostName, @Time_Stamp
END
GO

Print 'CREATE PROCEDURE CthErrorHandling'
GO


--##############################################################################################################################
--
-- LOG Tabelle anlegen
--
-- Handhabung :  INSERT dbo.cth_log ( POS, MESSAGE    )  VALUES 'Pos der MSG', 'Wert'
--
IF EXISTS(SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_NAME = 'cth_log') DROP TABLE cth_log;
GO

Print 'DROP TABLE cth_log'
GO

CREATE TABLE [dbo].[cth_log](  
			[POS]		[nVARCHAR]	(50) NULL,
			[MESSAGE]	[nchar]		(255) NULL
    ) ON [PRIMARY]
GO

Print 'CREATE TABLE cth_log'
GO


--##############################################################################################################################
--
-- Sync Felder in der DOCUMENT anlegen

if not exists (select * from syscolumns  where id=object_id('DOCUMENT') and name='CTH_SYNC')     alter table DOCUMENT add CTH_SYNC     varchar(4) NULL
if not exists (select * from syscolumns  where id=object_id('DOCUMENT') and name='CTH_SYNC_AT')  alter table DOCUMENT add CTH_SYNC_AT  varchar(30) NULL
if not exists (select * from syscolumns  where id=object_id('DOCUMENT') and name='CTH_SYNC_JN')  alter table DOCUMENT add CTH_SYNC_JN  varchar(4) NULL
GO												

Print 'Sync Felder in der DOCUMENT anlegen'
GO

-- Erweiterung der Sichten

IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors')) DROP TABLE #tmpErrors
CREATE TABLE #tmpErrors (ERROR INT, MODULE VARCHAR(30), OBJECT VARCHAR(128), POSITION INT, DESCRIPTION VARCHAR(256))
SET XACT_ABORT ON

IF EXISTS (SELECT * FROM sysobjects WHERE id=object_id('VIEW_DOCUMENT') AND OBJECTPROPERTY(id, 'IsView')=1)
  BEGIN
    IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#AIM_UPD_VIEWS')) DELETE FROM #AIM_UPD_VIEWS
    ELSE
    CREATE TABLE #AIM_UPD_VIEWS (ALIAS sysname NULL, PCOLUMN sysname NULL, CHANGE_REQUEST VARCHAR(3))

    INSERT INTO #AIM_UPD_VIEWS (ALIAS, PCOLUMN, CHANGE_REQUEST) VALUES ('CTH_SYNC',      'D.CTH_SYNC',      'ADD')
    INSERT INTO #AIM_UPD_VIEWS (ALIAS, PCOLUMN, CHANGE_REQUEST) VALUES ('CTH_SYNC_AT',   'D.CTH_SYNC_AT',   'ADD')
    INSERT INTO #AIM_UPD_VIEWS (ALIAS, PCOLUMN, CHANGE_REQUEST) VALUES ('CTH_SYNC_JN',   'D.CTH_SYNC_JN',   'ADD')

    EXECUTE aim_update_view 'VIEW_ALL_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_DOCUMENT_ENGINEERING'
    EXECUTE aim_update_view 'VIEW_DOCUMENT_OFFICE'
    EXECUTE aim_update_view 'VIEW_XREF_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_XREF_PARENT_DOCUMENT'
    EXECUTE aim_update_view 'VIEW_XREF_CHILD_DOCUMENT'
    
  END
GO

Print 'Erweiterung der Sichten'
GO

--##############################################################################################################################
-- Store Procedure  für DOCUMENT löschen

IF OBJECT_ID ('CTH_Sync_IDW', 'P') IS NOT NULL
   DROP PROCEDURE CTH_Sync_IDW
GO

Print 'DROP PROCEDURE CTH_Sync_IDW'
GO

--##############################################################################################################################
-- =============================================
-- Author      : Uwe Handzik
-- Ersellt am  : 24.09.2009
-- Version     : 1.1
-- Description :	Abgleichen der IDW
-- Trigger für die DOCUMENT
-- Gleicht IDW ab wenn änderung in DOCUMENT
--
-- 1.1 Alter Tabel raus 
-- =============================================

CREATE PROCEDURE [dbo].[CTH_Sync_IDW] @argAIMKEY NUMERIC(17,5)

AS

DECLARE @newAIMKEY     NUMERIC(17,5)
DECLARE @ChildAimKey   NUMERIC(17,5)
DECLARE @ParentAimKey  NUMERIC(17,5)
DECLARE @newIDW        nVARCHAR(255)
    
BEGIN

	SET @newAIMKEY = @argAIMKEY
	SET NOCOUNT ON;

	BEGIN TRY

		--- AIMKEY ermittelt, - In XREF_ELEMENT Child(er) Suchen   

		DECLARE Document_Cursor CURSOR FOR
			SELECT PARENT_AIMKEY, CHILD_AIMKEY
			FROM XREF_ELEMENT WHERE CHILD_AIMKEY = @newAIMKEY AND RELATIONSHIP_ID = 'AIM.XREF.DOC.ENG' 

		OPEN Document_Cursor

		FETCH NEXT FROM Document_Cursor INTO @ChildAimKey, @ParentAimKey 

		WHILE @@FETCH_STATUS = 0
			BEGIN
				-- Nachschauen ob IDW  
				SELECT @newIDW        = (SELECT FILE_TYPE FROM DOCUMENT WHERE AIMKEY = @ChildAimKey )

				IF upper(@newIDW) = 'IDW'   
                  BEGIN
                    --
                    -- Debug Info
                    --
                    --INSERT dbo.cth_log ( POS, MESSAGE    )  VALUES ( 'CTH_Sync_IDW UPDATE', CAST ( @ChildAimKey AS VARCHAR(30)))

                    -- Sync Flag setzen
	            	UPDATE DOCUMENT	SET	CTH_SYNC		= 'SYNC',
										CTH_SYNC_AT		= CONVERT(varchar(20), GetDate())
										WHERE AIMKEY	= @ChildAimKey

                  -- Stored Proc ist Kundenabhängig
                  EXECUTE  CTH_SYNC_KUNDEN_FELDER	@ParentAimKey, @ChildAimKey  

                 END -- IS IDW
				FETCH NEXT FROM Document_Cursor INTO @ChildAimKey, @ParentAimKey 
			END -- WHILE 
		CLOSE Document_Cursor 
		DEALLOCATE Document_Cursor  

	END TRY

	BEGIN CATCH
        ROLLBACK TRANSACTION
        EXEC  dbo.CthErrorHandling
    END CATCH
  RETURN
END 

GO

Print 'CREATE PROCEDURE CTH_Sync_IDW'
GO

--##############################################################################################################################
--
-- Trigger für XREF löschen

IF OBJECT_ID ('CTH_InsertDocIdw', 'TR') IS NOT NULL
   DROP TRIGGER CTH_InsertDocIdw
GO

Print 'DROP TRIGGER CTH_InsertDocIdw'
GO


--##############################################################################################################################
-- 
-- Author      : Uwe Handzik
-- Ersellt am  : 24.09.2009
-- Version     : 1.0
-- Description :	Abgleichen der IDW
-- Trigger für die XREF_ELEMENT 
-- Gleicht IDW ab, die mit kopiert wird 
-- 

CREATE TRIGGER [dbo].[CTH_InsertDocIdw] ON [dbo].[XREF_ELEMENT] FOR INSERT NOT FOR REPLICATION 
AS 
BEGIN

	SET NOCOUNT ON;

	BEGIN TRY
		DECLARE @PARENT_AIMKEY     NUMERIC(17,5)
		DECLARE @CHILD_AIMKEY      NUMERIC(17,5)
        DECLARE @FILE_TYPE         VARCHAR(10) 
      
		SELECT  @PARENT_AIMKEY  = ( SELECT PARENT_AIMKEY FROM Inserted )
		SELECT  @CHILD_AIMKEY   = ( SELECT CHILD_AIMKEY  FROM Inserted )
        SELECT  @FILE_TYPE      = ( SELECT FILE_TYPE     FROM DOCUMENT WHERE AIMKEY = @PARENT_AIMKEY )

        IF UPPER( @FILE_TYPE ) = 'IDW'
           BEGIN
              --
              -- Debug Info
              --
              --INSERT dbo.cth_log ( POS, MESSAGE    )  VALUES ('CTH_InsertDocIdw', 'TRIGGER IDW' )
              EXECUTE CTH_Sync_IDW @CHILD_AIMKEY
           END 
	END TRY

	BEGIN CATCH
        ROLLBACK TRANSACTION
        EXEC  dbo.CthErrorHandling
    END CATCH
END
GO

Print 'CREATE TRIGGER CTH_InsertDocIdw'
GO

--##############################################################################################################################
-- Trigger für ELEMENT löschen

IF OBJECT_ID ('CTH_UpdateEleIdw', 'TR') IS NOT NULL
   DROP TRIGGER CTH_UpdateEleIdw
GO

Print 'DROP TRIGGER CTH_UpdateEleIdw'
GO

--##############################################################################################################################
-- 
-- Author      : Uwe Handzik
-- Ersellt am  : 24.09.2009
-- Version     : 1.0
-- Description :	Abgleichen der IDW
-- Trigger für die ELEMENT 
-- Gleicht IDW ab wenn änderung in ELEMENT
-- 

CREATE TRIGGER [dbo].[CTH_UpdateEleIdw] ON [dbo].[ELEMENT] FOR UPDATE NOT FOR REPLICATION 
AS 
BEGIN
	SET NOCOUNT ON;

	BEGIN TRY
		DECLARE @AIMKEY      NUMERIC(17,5)
		DECLARE @FILE_TYPE   VARCHAR(10)

		SELECT  @AIMKEY      = (SELECT AIMKEY     FROM Inserted)
        SELECT  @FILE_TYPE   = (SELECT FILE_TYPE  FROM DOCUMENT WHERE AIMKEY = @AIMKEY)

        IF @FILE_TYPE IS NOT NULL
           BEGIN
              IF UPPER(@FILE_TYPE) = 'IPT' OR UPPER(@FILE_TYPE) = 'IAM' OR UPPER(@FILE_TYPE) = 'IPN'
                 BEGIN
                    --
                    -- Debug Info
                    --
                    --INSERT dbo.cth_log ( POS, MESSAGE    )  VALUES ('CTH_UpdateEleIdw', 'TRIGGER' )
                    EXECUTE CTH_Sync_IDW @AIMKEY
                 END
           END  
	END TRY

	BEGIN CATCH
        ROLLBACK TRANSACTION
        EXEC  dbo.CthErrorHandling
   END CATCH

END
GO

Print 'CREATE TRIGGER CTH_UpdateEleIdw'
GO

--##############################################################################################################################
-- Trigger für DOCUMENT löschen

IF OBJECT_ID ('CTH_UpdateDocIdw', 'TR') IS NOT NULL
   DROP TRIGGER CTH_UpdateDocIdw
GO

Print 'DROP TRIGGER CTH_UpdateDocIdw'
GO

--##############################################################################################################################
-- 
-- Author      : Uwe Handzik
-- Ersellt am  : 24.09.2009
-- Version     : 1.0
-- Description :	Abgleichen der IDW
-- Trigger für die DOCUMENT
-- Gleicht IDW ab wenn änderung in DOCUMENT
-- 

CREATE TRIGGER [dbo].[CTH_UpdateDocIdw] ON [dbo].[DOCUMENT] FOR UPDATE NOT FOR REPLICATION 
AS 
BEGIN

	SET NOCOUNT ON;

	BEGIN TRY
		DECLARE @AIMKEY     NUMERIC(17,5)
		DECLARE @FILE_TYPE  VARCHAR(10)

		SELECT  @AIMKEY      = (SELECT AIMKEY     FROM Inserted )
		SELECT  @FILE_TYPE   = (SELECT FILE_EXT   FROM Inserted )

        IF UPPER(@FILE_TYPE) = 'IPT' OR UPPER(@FILE_TYPE) = 'IAM' OR UPPER(@FILE_TYPE) = 'IPN'
           BEGIN
              --
              -- Debug Info
              --
              --INSERT dbo.cth_log ( POS, MESSAGE    )  VALUES ('CTH_UpdateDocIdw', 'TRIGGER IPT/IAM/IPN' )
              EXECUTE CTH_Sync_IDW @AIMKEY
           END
	END TRY

	BEGIN CATCH
        ROLLBACK TRANSACTION
        EXEC  dbo.CthErrorHandling
    END CATCH

END
GO

Print 'CREATE TRIGGER CTH_UpdateDocIdw'
GO

--##############################################################################################################################


}}

<file>

----

=====Compass Tipps und Tricks=====

----

====Compass Password====

bis 2009

EASYcompass
  
DBPASSWORD=CCRY00104709B69CDE85DB8529EC0312D5C5B30EC9

ab 2009

ADSKpspro5!

DBPASSWORD=CCRY001015CE7934194891D6D49B8EC529380A33FA  

----

====Compass Inventor ADDin====

Die ClsId für das Compass Inventor ADDin: 

<file>

2008
  {A8EE8583-8E6D-4042-9A89-1015560D3331} ?
 
2011   
  {02CCE528-B046-49BA-96F9-F6CDCF5F9B07}

2012  
  {0B874991-1A5B-4D21-B156-DF288BD8424A}

2013  
  {DFDECA20-9329-4E10-97E6-FF7AF0AD942E}

2014  
  {DFDECA20-9329-4E10-97E6-FF7AF0AD942E}
  
2015
  {DFDECA20-9329-4E10-97E6-FF7AF0AD942E}
  
2015
  {DFDECA20-9329-4E10-97E6-FF7AF0AD942E}
</file>

  
===== Compass Jobserver =====

==== VBA ====

<file>
ApplCall AIMDOpenVBAProject "$CTH_IVBPATH\Export.ivb"
ApplCall AIMDExecuteVBAMacro Export mod_STP PublishSTP

</file>

====Property Update====

Mit Inventor :  

  JBSPropUpdate;

Mit Apfile___ntice

<file>
___forceunlock;
ApplCall AIMDUpdateProps2 #DOCNAME0 2;
___forceunlock;

</file>

Wenn Dirty Steuerung

  ___XDWCMD("UPDATE DOCUMENT SET CTH_DIRTY_H=#SYSDATE WHERE AIMKEY=#AIMKEY");

==== User Name bei der Ausführung ==== 
Unter Befehle bei der Anlage: 

  set MY_USER=$USERID;
  JBSSubstJobField (CMD_file____JOB);
  ....

Unter Befehle vor der Ausführung:
  ...
  ___SHELL( md("\\Server\Export\$(MY_USER)\#(SYSDATE:s0.4)-#(SYSDATE:s4.2)-#(SYSDATE:s6.2)"
  ...

==== Anbindung INVEXP ==== 


in der Compass INI

  ;;; 
  ;;; Einstellungen CTH für JobServer
  ;;; 
  ;;; CTH_INVEXP : Kompletter Pfad incl. name der EXE Datei
  ;;; CTH_INVINI : Verzeichnis mit den INI Dateien
  ;;;
  CTH_INVEXP=D:\Compass\InvExp\InvExp.exe
  CTH_INVINI=D:\Compass\InvExp
  CTH_INVDST=C:\CompassExport


  systemx(  "$(CTH_INVEXP)" SOURCE       "#DOCNAME0"   );
  systemx(  "$(CTH_INVEXP)" DESTINATION  "#DOCNAME1"   );
  systemx(  "$(CTH_INVEXP)" PARAMETER     "$(CTH_INVINI)\PDF.INI"   );
  systemx(  "$(CTH_INVEXP)"  PDF  );