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

admin

Teamcenter二次开发源码分享：判断对象是否存在在数据库中
9 N& j5 a- X% j
  t2 Z$ S- z. ^#include <TC/tc_startup.h>
#include <pom/pom/pom.h>
' z( i6 I; k+ ~& M#include <ITK/mem.h>
#include <tccore/workspaceobject.h>
9 Q1 u4 X9 ?1 I
7 c# H& R, @3 A) S( h! h* _. Blogical is_instance_in_database(char *variable_name, tag_t object)
{
    logical exists_in_db = FALSE;
7 m4 A- u0 r" F* w+ x: V0 O    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
- U" I$ T8 s' D' v, ^: y+ ^/ C    else
    {
        char *uid = NULL;
5 h' b, Y4 ~' s; Q  N        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
        {
            if(is_WorkspaceObject(object) )
            {
# p" B2 P( k5 ?0 b7 V7 v( z' ]                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
0 y( V' U, y1 k# m& ]1 C% ], D                char *object_type   = NULL;
9 u. N! H* ?2 Q9 u                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
                ECHO("\t %s: %s - POM_instance_exists: true %s (%s)\n",
% n% P+ M7 c3 J3 F% I  S1 s                    variable_name, uid, object_id, object_type);
, }7 f: O- P6 J% o; ~                if(object_id) MEM_free(object_id);
0 ~% w! H# [0 o  G                if(object_type) MEM_free(object_type);
$ E2 r4 s! c! Z& W; j. H            }
5 s! J: U" R9 W3 X3 Y  ]) e            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
                variable_name, uid);
        }
4 m# c* X. I$ r' ~1 n7 B1 C6 x        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
( L3 g: b; r" q, T; F% ], Y' O        if(uid) MEM_free(uid);
    }
' }& n  Q0 r" g7 b2 }4 u    return (exists_in_db);
2 i5 G7 L! f8 s% `  W}
; b5 R. N3 D. Z& g