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

admin

Teamcenter二次开发源码分享：判断对象是否存在在数据库中
# d( ?2 z0 i$ E( T6 u& v# [  X' }( X
#include <TC/tc_startup.h>
#include <pom/pom/pom.h>
: t. E5 ~; F7 z/ C1 T* X$ y#include <ITK/mem.h>
#include <tccore/workspaceobject.h>

logical is_instance_in_database(char *variable_name, tag_t object)
6 ~) v7 n- d, D; y/ F8 b2 {{
( t" T0 d& t7 K3 u; f# T* c    logical exists_in_db = FALSE;
  X: Q8 S5 h" Q1 `    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
    else
    {
        char *uid = NULL;
# B% Q* v3 h* O! L        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
3 o5 w/ G: H* R+ w        {
            if(is_WorkspaceObject(object) )
3 x' E( I. h4 o( Q% ?            {
                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
  l0 V0 k3 H  M; t- V( T                char *object_type   = NULL;
/ Y; A6 h- f3 t) S  F                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
                ECHO("\t %s: %s - POM_instance_exists: true %s (%s)\n",
                    variable_name, uid, object_id, object_type);
4 ~0 l+ K7 H9 f( W* ]                if(object_id) MEM_free(object_id);
8 n! H+ ?5 r) a6 p# x                if(object_type) MEM_free(object_type);
            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
                variable_name, uid);
  P* {3 i' W2 \& O+ i9 f% M        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
        if(uid) MEM_free(uid);
    }
! |/ O# Y" y" @! n! @6 v3 y    return (exists_in_db);
}