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

admin

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

#include <TC/tc_startup.h>
4 Z, a, e0 d* ~3 q5 H& g  Q#include <pom/pom/pom.h>
#include <ITK/mem.h>
#include <tccore/workspaceobject.h>
% o# Z/ N- H% A
logical is_instance_in_database(char *variable_name, tag_t object)
. Y2 l) z# M9 {% ~+ A. l) Y0 ^5 J{
5 b& Q2 T% U# u+ d! ^( H    logical exists_in_db = FALSE;
$ ?( [) D1 M) s5 ~+ ~1 _    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
    else
    {
1 n; A; l5 B/ l2 w0 x- M. ?: d8 }        char *uid = NULL;
        ITK__convert_tag_to_uid(object, &uid);
1 h) a5 z2 I* ~0 V        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
        {
  u1 i. j; Q+ z$ e& t8 g            if(is_WorkspaceObject(object) )
            {
; A& }4 W! {2 ]5 _% u1 E                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
9 }8 P/ r% {, j- C0 C1 ]                char *object_type   = NULL;
/ Q" r7 V" w; k4 K! u& N4 e: N7 c                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
2 N* I2 x4 T5 G6 d* W+ g+ ~' @                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);
                if(object_type) MEM_free(object_type);
' U( u( n! G. B7 ~: y4 G" J            }
0 t) D8 M. s  s3 W! f9 y. `9 @            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
                variable_name, uid);
        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
3 A3 q8 \! g) M) [  g0 u6 F0 [        if(uid) MEM_free(uid);
) r0 N' [  H/ o0 t5 B/ q% b+ h    }
* M% P! X) i6 \0 f" J    return (exists_in_db);
}
9 e5 L3 l7 h8 K( T