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

admin

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

' F& H& R1 l( N: Y  W: i% ?6 g#include <TC/tc_startup.h>
#include <pom/pom/pom.h>
: K" n% ]/ ~- i/ B# T& E) l#include <ITK/mem.h>
#include <tccore/workspaceobject.h>

logical is_instance_in_database(char *variable_name, tag_t object)
) x& T; d* z/ Q8 p7 d5 }8 g{
    logical exists_in_db = FALSE;
    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
: ~* W& E, B9 S    else
! r0 U* @( i3 @$ a/ x    {
        char *uid = NULL;
        ITK__convert_tag_to_uid(object, &uid);
" h# {9 r: ~  A2 d1 H        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
! E* d0 l3 Q) ]. k( z8 N( K        {
; o" n% D2 b' M. u+ U1 e            if(is_WorkspaceObject(object) )
            {
/ W" K( c7 U( M1 O3 G                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
  c. ?0 j  L5 |8 m+ i                char *object_type   = NULL;
5 E& t: u% h. _: l$ ?9 I. ^                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
3 }2 t7 C  g# B8 ]; y" T: g                ECHO("\t %s: %s - POM_instance_exists: true %s (%s)\n",
! ?* S, y) U9 O2 t) i0 f$ @4 w                    variable_name, uid, object_id, object_type);
                if(object_id) MEM_free(object_id);
                if(object_type) MEM_free(object_type);
            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
& A+ ]2 |9 L# h- _+ T                variable_name, uid);
        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
        if(uid) MEM_free(uid);
8 [3 G% Z% }) Z* Y" v* h    }
    return (exists_in_db);
% K% x# K9 D2 l( ^}
* i9 o7 u) Q8 q' X