Data Representation Model API

SE_FIELDS_PTR model_fields_ptr;

SE_TOKEN_ENUM model_tag;

if (SE_GetFields(model_obj, &model_fields_ptr) != SE_SUCCESS)

{

fprintf(stderr, "Error - can't get the Model's fields!\n");

exit(-1);

}

if (SE_IdentifyObject(model_obj, &model_tag) != SE_SUCCESS) ||

!SE_IsA(model_tag, SE_MODEL_TOKEN))

{

fprintf(stderr, "Error - the Model has a problem!\n");

exit(-1);

}

if (model_fields_ptr->u.Model.name.string_length)

{

if (!(model_ptr->name = (char *) calloc(model_fields_ptr->

u.Model.name.string_length+1, sizeof(char))))

{

fprintf(stderr,"Unable to calloc memory for Model Name (%s)\n",

model_fields_ptr->u.Model.name.string_value);

exit(-1);

}

strcpy(model_ptr->name,model_fields_ptr->u.Model.name.string_value);

}