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

admin

Teamcenter二次开发源码分享：判断对象是否存在在数据库中
+ G$ \/ @0 ?& U. X. w% l
; c; j+ @$ [' `5 X9 `7 s#include <TC/tc_startup.h>
#include <pom/pom/pom.h>
' `7 M; b0 E% u9 _, J#include <ITK/mem.h>
#include <tccore/workspaceobject.h>

logical is_instance_in_database(char *variable_name, tag_t object)
5 _; F) K) J" u. V0 ]{
2 V  ]/ `) F  ~1 U    logical exists_in_db = FALSE;
8 C0 ]- e4 w' \: G  s. {    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
% n. I7 `' s' G    else
    {
        char *uid = NULL;
2 m4 C4 I& D3 @; V& R# r4 g+ }* J        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
3 t; h2 ?/ b2 ]7 C) d: {        if(exists_in_db == TRUE)
        {
! H1 u1 Q4 @6 Y  c& \            if(is_WorkspaceObject(object) )
3 g: ?, F2 P3 J' e5 e9 J: [            {
                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
                char *object_type   = NULL;
                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
                ECHO("\t %s: %s - POM_instance_exists: true %s (%s)\n",
2 o. y6 n3 ]3 s# ^                    variable_name, uid, object_id, object_type);
                if(object_id) MEM_free(object_id);
3 t0 x1 r) i- O# q5 w) z8 o  z! L2 z: c                if(object_type) MEM_free(object_type);
            }
& f, n2 t5 [& C  v$ Q& X* ]' z& |            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
5 J9 ^! M! @7 F9 f0 b                variable_name, uid);
! m; a2 B1 X/ i0 o3 k- e        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
$ y. Y' q' c* n/ }        if(uid) MEM_free(uid);
    }
    return (exists_in_db);
}