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

admin

7 b( \6 H: F' f6 k, Z( t: ZTeamcenter二次开发源码分享：判断对象是否存在在数据库中

#include <TC/tc_startup.h>
#include <pom/pom/pom.h>
#include <ITK/mem.h>
#include <tccore/workspaceobject.h>

! P5 P. f. e! q/ m+ T. s, n- Qlogical is_instance_in_database(char *variable_name, tag_t object)
{
    logical exists_in_db = FALSE;
0 {; o* [3 b' H/ L) {" K8 {% S1 o    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
    else
    {
        char *uid = NULL;
7 j6 f/ C2 S# s% l6 x0 ~0 ~6 V        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
        {
9 e; o; B6 r# x4 Y            if(is_WorkspaceObject(object) )
            {
                char *object_id = NULL;
, W3 }6 K: @; k) j* G                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",
  g" q( K+ U7 M6 j; N  |, H1 j                    variable_name, uid, object_id, object_type);
; `7 D+ {1 A3 s3 `                if(object_id) MEM_free(object_id);
; r' h3 L% H) ^. z                if(object_type) MEM_free(object_type);
            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
7 Q6 g1 u* b3 l) e7 q                variable_name, uid);
9 K5 A6 U4 b( o        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
6 p% L1 X' m' g3 a        if(uid) MEM_free(uid);
    }
  m7 I8 R1 F6 g2 e) H- G    return (exists_in_db);
2 |8 [: s' l. ~% k; t  v% V}
, M5 ^1 ~0 z, f1 Q' W