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

admin

! [0 U, S, i: M: v! |Teamcenter二次开发源码分享：判断对象是否存在在数据库中

#include <TC/tc_startup.h>
1 }& v  @4 E. E# b#include <pom/pom/pom.h>
2 Z/ B& P* x! R: I#include <ITK/mem.h>
#include <tccore/workspaceobject.h>

logical is_instance_in_database(char *variable_name, tag_t object)
5 @8 u. e9 P$ M# j9 {% P! p{
8 Y. S, Z5 O+ p% u    logical exists_in_db = FALSE;
$ E) {$ m4 F+ A% [  {3 u: \" {    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
    else
) o& s0 {  {: o/ X1 O! A9 F    {
        char *uid = NULL;
% o; O" z. N) S0 J  a        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
4 v4 m9 v5 k4 V1 o9 Q        if(exists_in_db == TRUE)
( c4 R% h3 p5 N0 f3 t5 X        {
            if(is_WorkspaceObject(object) )
2 Y8 H/ a& Q' Z            {
                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
                char *object_type   = NULL;
. K" e; d# i' S# V: {                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);
                if(object_id) MEM_free(object_id);
! V$ {2 k4 I! u* B. g9 N( N! l6 h                if(object_type) MEM_free(object_type);
$ i9 @+ w2 u3 \8 q7 b            }
% F  s6 `0 A: z7 k5 {9 k            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
& p5 x: X8 |! h& b- ]9 x                variable_name, uid);
8 q4 ?) A1 K/ o5 F1 n* _* h        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
! C' q: N: _4 D/ [  P+ l        if(uid) MEM_free(uid);
    }
2 E( d8 O* ?# k% Y7 Q0 J7 E0 @5 h    return (exists_in_db);
  I" C# A& Z) m% M6 v: @% C' R}