Examples:CAD mapping.ini

CORSA In Corsa müssen folgende Objekte angelegt sein:

Akte obj_srt.d

"D" "CADE" "A" "CADE00000000" "CADE99999999" "SYSTEM" "SYSTEM" 13/11/14 13/11/14 "CAD Elemente" "" "" "" no no

Dokumente obj_srt.d

"S" "CAD" "A" "CAD0000000" "CAD9999999" "SYSTEM" "SYSTEM" 13/11/14 13/11/14 "CAD Dokumente" "" "CAD�" "" no no
"S" "CBG" "A" "CBG0000000" "CBG9999999" "SYSTEM" "SYSTEM" 13/11/14 13/11/14 "CAD Baugruppe" "" "CAD�" "" no no
"S" "CBT" "A" "CBT0000000" "CBT9999999" "SYSTEM" "SYSTEM" 13/11/14 13/11/14 "CAD Bauteil" "" "CAD�" "" no no
"S" "CPD" "A" "CPD0000000" "CPD9999999" "SYSTEM" "SYSTEM" 13/11/14 13/11/14 "CAD Produkt" "" "CAD�" "" no no

p-aanl.d

13/11/14 13/11/14 "SYSTEM" "SYSTEM" "CAD" "CAD Dokumente" "" "NNNNJJ" 0 7 14 21 0 0
13/11/14 13/11/14 "SYSTEM" "SYSTEM" "CBG" "CAD Baugruppe" "" "NNNNJJ" 0 7 14 21 0 0
13/11/14 13/11/14 "SYSTEM" "SYSTEM" "CBT" "CAD Bauteil" "" "NNNNJJ" 0 7 14 21 0 0
13/11/14 13/11/14 "SYSTEM" "SYSTEM" "CPD" "CAD Produkt" "" "NNNNJJ" 0 7 14 21 0 0

System.ini

Die Dateien CADImportClassDefinition.tbc und CADImportFunctions.tbc müssen über das include Verzeichnis geladen werden.

[IMPORT1000]
name                = Prepare CAD Import
priority            = 10
FILTERCMD           = ::CADfile::Process $counter $dirList
SourceDir           = D:/Programme/ImportserviceCAD/Data/CADprepare/ready2import
BackupDir           = D:/Programme/ImportserviceCAD/Data/CADprepare/backup
ErrorDir            = D:/Programme/ImportserviceCAD/Data/CADprepare/error
targetDir           = D:/Programme/ImportserviceCAD/Data/CADprepare/ready4import
LC_TARGETDIR        = D:/Programme/ImportserviceCAD/Data/CADimport/ready2import
importBatch         =
UseCorsaWebService  = 0


[IMPORT1001]
name                = CAD Import
priority            = 20
checkDependencies   = IMPORT1000
SourceDir           = D:/Programme/ImportserviceCAD/Data/CADimport/ready2import
BackupDir           = D:/Programme/ImportserviceCAD/Data/CADimport/backup
ErrorDir            = D:/Programme/ImportserviceCAD/Data/CADimport/error
targetDir           = D:/Programme/ImportserviceCAD/Data/CADimport/ready4import
isCSV               = 1
TRGFILE             = LC_CADimport.trg
TRGPATH             = D:/Programme/ImportserviceCAD/Data/trigger
idxFileExtension    = idx
MappingFile          = ./mapping/CADelement_mapping.ini
MAPPINGRULE          = expr {[lindex $line 0] eq "P"}
MAPPINGFILEIF        = ./mapping/CADproduct_mapping.ini
MAPPINGRULE          = expr {[lindex $line 0] eq "PC"}
MAPPINGFILEIF        = ./mapping/CADgroup_mapping.ini
MAPPINGRULE          = expr {[lindex $line 0] eq ""}
MAPPINGFILEIF        = ./mapping/empty_mapping.ini


[IMPORT1002]
name                = CAD DigEPlan mit Webservice
active              = 0
priority            = 20
directProcessing    = 0
importBatch         =
filterCMD           = expr {[clock seconds] - [file atime $dir] > 10}
SourceDir           = d:/programme/ImportserviceCAD/ready2import
BackupDir           = d:/programme/ImportserviceCAD/ready4import/backup
TargetDir           = 
maxWorktime         = 20
startThreads        = 0
checkLockfile       = 1
lockFileName        = lock.dat
DeleteLockedDirTime = 10
runningTimeWEEK     = 00:00:00-23:59:59
runningTimeSA       = 00:00:00-23:59:59
runningTimeSO       = 00:00:00-23:59:59
dirCounter          = 1
; if !$dirCounter
maxFiles            = 50
; if $dirCounter
MAX_COLLECT_FILES   = 0

idxFileExtension    = idx
fileToInclude       = 0
fileToIncRequired   = 0
NoFileToIncEvent    = P
CouldNotOpenIDXFile = P-E-I-W

checkDependencies   = IMPORT1000

CopyAll             = 0

checktrg            = 0
TRGFILE             = importCAD.trg
CHECKTRGAFTER       = 1
TRGPATH             = d:/programme/ImportserviceCAD/ready4import/trigger

checktarget         = 0
checkErrorDir       = 1
CHECKDIREMPTY       = 1
checkSourceDir      = 1
ErrorDir            = d:/programme/ImportserviceCAD/ready4import/error

; CORSA WEBSERVICE
UseCorsaWebService   = 1
Disable@ProcessError = 0
Disable@IDXError     = 0
Encoding             = utf-8
isCSV                = 1
RecordSep            = format %c%c 13 10
ColSep               = join \;
ValueSep             = join \|
MappingFile          = ./mapping/CADelement_mapping.ini
MAPPINGRULE          = expr {[lindex $line 0] eq "P"}
MAPPINGFILEIF        = ./mapping/CADproduct_mapping.ini
MAPPINGRULE          = expr {[lindex $line 0] eq "G"}
MAPPINGFILEIF        = ./mapping/CADgroup_mapping.ini

; Upload Documents
RetryUpload          = 3
TimeoutAppendChunk = 100000
TimeoutCreateFile    = 900000
ChunkSize            = 1000000

UseEmptyValues       = 0
ForceToClearValue    = <EMPTY> 

CheckVersionNo       = 1
OverwriteVersion     = 1 

TRANSLATECRLF        = **C#R**
; 10.13
MAPPING_ERROR        = P-W-E-I 

mapping.ini

[CADproduct_mapping.ini]

; CAD Parent

[GLOBAL]
OBJECTID    = WebserviceCall CreateDocByQuery CPD *DUMMY* [list [list qrtReference dUnique qcAnd qoEqual %_tmp_unique%]] {} [list [list dUnique %_tmp_unique%]]
OBJECTKIND  = join CPD 
OBJECTTYPE  = join S

[SYSTEMFIELDS]
poststuk.inhoud1    = join "%THIS% BT2015" 
POSTSTUK.ONDERWERP  = join %THIS%
poststuk.soort_ext  = join I
poststuk.relatie_id = join LIEF00000000004

[REFERENCEFIELDS]
; immer ein neues Dokument pro Artikel anlegen
_tmp_Prot01  = Protokoll ">>> Verwende CADproduct $line <<<"
_tmp_unique  = join %THIS%

[LINKS]
LINKOBJECTTYPE = join D
LINKOBJECTIDS  = join PROD00000000

[UPLOAD]
NAT         = ErrorIfNotExists [file join [file dirname [file normalize %_FILENAME%]] %THIS%]
NATVERSION  = join 0
NATDSACTION = join "-action NONE"

[OK]
[ERROR]

[CADgroup_mapping.ini]

; CAD group

[GLOBAL]
OBJECTID    = WebserviceCall CreateDocByQuery CBG *DUMMY* [list [list qrtReference dUnique qcAnd qoEqual %_tmp_unique%]] {} [list [list dUnique %_tmp_unique%]]
OBJECTKIND  = join CBG 
OBJECTTYPE  = join S

[SYSTEMFIELDS]
poststuk.inhoud1   = join %THIS%
POSTSTUK.ONDERWERP = join %THIS%
poststuk.soort_ext  = join I
poststuk.relatie_id = join LIEF00000000004

[REFERENCEFIELDS]
; immer ein neues Dokument anlegen
_tmp_Prot01     = Protokoll ">>> Verwende CADgroup $line <<<"
_tmp_unique     = join %THIS%
_tmp_parentID   = WebserviceCall CreateDocByQuery rend *DUMMY* [list [list qrtReference dUnique qcAnd qoEqual %PARENT%]] {} [list [list dUnique  %PARENT%]]
_tmp_Prot09     = Protokoll %_tmp_parentID%

[VARTAB]

[LINKS]
LINKOBJECTTYPE = join S
LINKOBJECTIDS  = list %_tmp_parentID%
RTYPE          = join xfp
LINKOBJECTTYPE = join D
LINKOBJECTIDS  = join CADE00000000

[UPLOAD]
NAT         = ErrorIfNotExists [file join [file dirname [file normalize %_FILENAME%]] %THIS%]
NATVERSION  = join 0
NATDSACTION = join "-action NONE"

[OK]
[ERROR]

[CADelement_mapping.ini]

; CAD Child

[GLOBAL]
OBJECTID    = WebserviceCall CreateDocByQuery CBT *DUMMY* [list [list qrtReference dUnique qcAnd qoEqual %_tmp_unique%]] {} [list [list dUnique %_tmp_unique%]]
OBJECTKIND  = join CBT 
OBJECTTYPE  = join S

[SYSTEMFIELDS]
poststuk.inhoud1   = join %THIS%
POSTSTUK.ONDERWERP = join %THIS%
poststuk.soort_ext  = join I
poststuk.relatie_id = join LIEF00000000004

[REFERENCEFIELDS]
; immer ein neues Dokument anlegen
_tmp_Prot01     = Protokoll ">>> Verwende CADgroup $line <<<"
_tmp_unique     = join %THIS%
_tmp_parentID   = WebserviceCall CreateDocByQuery rend *DUMMY* [list [list qrtReference dUnique qcAnd qoEqual %PARENT%]] {} [list [list dUnique  %PARENT%]]
_tmp_Prot09     = Protokoll %_tmp_parentID%

[LINKS]
LINKOBJECTTYPE = join S
LINKOBJECTIDS  = list %_tmp_parentID%
RTYPE          = join xfp
LINKOBJECTTYPE = join D
LINKOBJECTIDS  = join CADE00000001

[UPLOAD]
NAT         = ErrorIfNotExists [file join [file dirname [file normalize %_FILENAME%]] %THIS%]
NATVERSION  = join 0
NATDSACTION = join "-action NONE"

[OK]
[ERROR]