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

admin

& l. D4 e) H6 g& U" w! {Teamcenter二次开发源码分享：判断对象是否存在在数据库中
3 r; Q# ^- I" @$ ]/ V2 m& o; Z
#include <TC/tc_startup.h>
; J$ u, z3 o0 Q#include <pom/pom/pom.h>
#include <ITK/mem.h>
5 G0 k3 e& D# w# s#include <tccore/workspaceobject.h>

3 M- N9 F* G& G: Jlogical is_instance_in_database(char *variable_name, tag_t object)
{
. O' K8 r" Z4 b( r* r" ]& `3 D    logical exists_in_db = FALSE;
- [! g2 ^2 q* i: y    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
    else
    {
9 I, v. \( m+ X7 p6 M- ?        char *uid = NULL;
        ITK__convert_tag_to_uid(object, &uid);
& J' L9 N0 ~! L! N$ `        POM_instance_exists(object, &exists_in_db);
3 l6 [! f. I/ ]- v4 K4 J- S8 A! Y/ m        if(exists_in_db == TRUE)
3 K- ~% N3 i/ E' y, Y) t/ k        {
            if(is_WorkspaceObject(object) )
            {
1 Z3 f# ]" }. S, g                char *object_id = NULL;
3 x* n; ?. k  P7 W  T& w. ~                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
4 R" l% g- P9 a( K& G7 K                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);
3 @. ]9 V0 J) n( Z) E- T4 D                if(object_type) MEM_free(object_type);
            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
- K7 H. V2 Y8 |3 s) J! h                variable_name, uid);
        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
9 j  P8 t9 M1 W2 X6 M        if(uid) MEM_free(uid);
    }
    return (exists_in_db);
}