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

admin

8 p- M+ I4 ^. DTeamcenter二次开发源码分享：判断对象是否存在在数据库中

#include <TC/tc_startup.h>
0 g" F) Y# m- z5 V/ A' ^8 |#include <pom/pom/pom.h>
% B% _  C/ i% ^/ f#include <ITK/mem.h>
4 g0 e% U) j( z#include <tccore/workspaceobject.h>

logical is_instance_in_database(char *variable_name, tag_t object)
# T1 ^( C; K/ F8 ^% z{
    logical exists_in_db = FALSE;
    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
5 J- L5 ^, O. I4 @    else
9 G# ~7 I8 ^$ P( v- e& x5 d7 N0 X    {
. b+ h* P& M2 y        char *uid = NULL;
        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
        {
7 x( W! j; M: V: Y5 V            if(is_WorkspaceObject(object) )
            {
                char *object_id = NULL;
% p$ l# ]. @$ ^1 `                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
                char *object_type   = NULL;
                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);
                if(object_type) MEM_free(object_type);
            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
# B7 Q# j# Y8 r3 o. q: y4 @                variable_name, uid);
        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
% Y, A+ Y: |/ i+ F  o# p$ H2 B/ P        if(uid) MEM_free(uid);
    }
4 ?1 h, I5 x$ Q! C8 k    return (exists_in_db);
}