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

admin

# a6 r! y6 o8 H* o6 T# G3 D9 F4 bTeamcenter二次开发源码分享：判断对象是否存在在数据库中

! @4 h# ~. L) U8 V+ M2 `#include <TC/tc_startup.h>
1 s* `- f% h& S! B#include <pom/pom/pom.h>
#include <ITK/mem.h>
/ e$ I& R" `  a2 D1 q8 w2 g( W. H#include <tccore/workspaceobject.h>

' p7 h) i" W+ plogical is_instance_in_database(char *variable_name, tag_t object)
/ X( R4 A6 t4 D7 ~5 x0 @{
    logical exists_in_db = FALSE;
' Y& L& Y; L+ v; i, i  _# J    if(object == NULLTAG) ECHO("\t %s: NULLTAG \n", variable_name);
5 @0 f5 \, c- `1 {    else
' M' @% X7 `+ i2 @& T    {
- e- G: [% n" |9 Y        char *uid = NULL;
  C$ X2 H( W& Z+ l4 G4 t' H/ a        ITK__convert_tag_to_uid(object, &uid);
        POM_instance_exists(object, &exists_in_db);
8 I1 g, d# c. q: R* Y0 o        if(exists_in_db == TRUE)
: k# Q7 k+ d2 [* m- q, T        {
            if(is_WorkspaceObject(object) )
8 o: {$ Z4 f$ F3 X: F* v/ }            {
                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));
; ]+ n8 I" M' R5 w                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",
                variable_name, uid);
4 G  X+ H2 C2 y- L( J! ]6 j  Y        }
        else ECHO("\t %s - POM_instance_exists: false \n", variable_name);
' t/ R- k3 k+ u! y$ o0 u        if(uid) MEM_free(uid);
    }
    return (exists_in_db);
4 Y5 a4 b% j! _  G: E8 Y}