teamcenter二次开发源码分享：判断对象是否存在在数据库中

admin

Teamcenter二次开发源码分享：判断对象是否存在在数据库中

6 [; x: I8 w- Q: V* B/ a#include <TC/tc_startup.h>
9 y/ s  g7 |: _$ O# v9 D1 D& I3 u#include <pom/pom/pom.h>
& G; p- p" P4 }) m1 V/ W#include <ITK/mem.h>
+ L# u8 G, }2 h0 X8 I8 q#include <tccore/workspaceobject.h>
0 @& k% Z2 ?# _2 V/ E2 C
logical is_instance_in_database(char *variable_name, tag_t object)
9 l% x9 @" z+ j) |6 q# r{
6 Q$ b: D7 c7 W/ r" |8 c1 e    logical exists_in_db = FALSE;
    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
    else
    {
9 i7 C: S1 T/ b, x0 h+ ~$ O6 I! Y8 X        char *uid = NULL;
        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
: y# Z/ s; |6 p        if(exists_in_db == TRUE)
        {
7 h4 x* t/ j$ \$ F5 ^            if(is_WorkspaceObject(object) )
            {
                char *object_id = NULL;
8 p% Q- s* l$ b. A# q                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
$ J5 W' {6 A* W* Q. v                char *object_type   = NULL;
  B' k# b$ J" R# H8 `" E) H                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
                ECHO("\t %s: %s - POM_instance_exists: true %s (%s)\n",
7 k  B4 t- H; Q0 Z                    variable_name, uid, object_id, object_type);
                if(object_id) MEM_free(object_id);
                if(object_type) MEM_free(object_type);
( D4 O' N9 m) ^% j            }
6 a. G8 N( {% G4 R4 w* V: E1 v            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
                variable_name, uid);
        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
        if(uid) MEM_free(uid);
& u4 Y; A# u5 r/ n  B) b: w. Y    }
* s/ n# t! T+ T# X    return (exists_in_db);
}