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

admin

) X  m$ ~# t9 e3 \" u* i( DTeamcenter二次开发源码分享：判断对象是否存在在数据库中

8 z7 R" x& V9 M# \- r$ o2 o#include <TC/tc_startup.h>
#include <pom/pom/pom.h>
* Q* `2 ]$ Y, X' @' n#include <ITK/mem.h>
' q* x. C& }5 Z2 v- z#include <tccore/workspaceobject.h>
' G# c7 q; Z( N2 A$ e
logical is_instance_in_database(char *variable_name, tag_t object)
{
0 u* E9 w5 o; Z    logical exists_in_db = FALSE;
  }+ I, M+ ^  t' j    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
' |6 @; d. s- V) l    else
    {
        char *uid = NULL;
        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
        if(exists_in_db == TRUE)
, W/ s2 q1 Y/ @3 v0 Y        {
            if(is_WorkspaceObject(object) )
            {
                char *object_id = NULL;
                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",
' X1 g$ q( c6 z2 v                    variable_name, uid, object_id, object_type);
3 j4 ]& v% M! f2 a* k  q                if(object_id) MEM_free(object_id);
                if(object_type) MEM_free(object_type);
* u6 V, h: Q4 X, b5 @0 x6 |+ g            }
            else ECHO("\t %s:  %s - POM_instance_exists: true\n",
                variable_name, uid);
        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
        if(uid) MEM_free(uid);
    }
    return (exists_in_db);
}