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

admin

: ^8 P4 s  z: k. C  N) z/ k6 ZTeamcenter二次开发源码分享：判断对象是否存在在数据库中
4 Q2 G% @7 [& i
) u, [, G4 ]) }( x6 r2 ?#include <TC/tc_startup.h>
9 l6 B& ^: S! o- S- ?. s2 j; q#include <pom/pom/pom.h>
1 p' E5 h( u8 B" ~1 H#include <ITK/mem.h>
#include <tccore/workspaceobject.h>
1 R) ]- `+ q- n1 q* d
logical is_instance_in_database(char *variable_name, tag_t object)
7 M0 q/ h! o% @: \{
4 j. z% Q2 x9 m% }' Q2 S    logical exists_in_db = FALSE;
    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
2 e7 {  z' g; l. H. h* k    else
* a; i. A# l& j- J/ l% }    {
        char *uid = NULL;
7 Z+ y7 P' t( F. U        ITK__convert_tag_to_uid(object, &uid);
" Y+ E' q! V( W1 P6 ^# A        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
- b! L5 O# L* A8 P; D1 p        {
            if(is_WorkspaceObject(object) )
            {
3 q( F6 j9 m5 a                char *object_id = NULL;
                IFERR_REPORT(WSOM_ask_object_id_string(object, &object_id));
% k# o% e9 f2 \( D/ V2 K' D6 E& d9 v                char *object_type   = NULL;
                IFERR_REPORT(WSOM_ask_object_type2(object, &object_type));
                ECHO("\t %s: %s - POM_instance_exists: true %s (%s)\n",
7 X# o3 @$ f4 z" A6 J* F. K2 [# d                    variable_name, uid, object_id, object_type);
! [$ }8 Y, k) J                if(object_id) MEM_free(object_id);
                if(object_type) MEM_free(object_type);
            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
                variable_name, uid);
( h$ O' t; J7 x6 w! ^        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
5 r; |8 }- |8 F$ @6 X6 k" m1 }4 t        if(uid) MEM_free(uid);
    }
    return (exists_in_db);
3 l0 M% }+ m/ }" Q! u5 v; s) Y, S7 y}