MEDstructElementVarAttInfo.c
Aller à la documentation de ce fichier.00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019 #include <med.h>
00020 #include <med_config.h>
00021 #include <med_outils.h>
00022
00023 #include <stdlib.h>
00024 #include <string.h>
00025
00040 med_err
00041 MEDstructElementVarAttInfo(const med_idt fid,
00042 const char* const modelname,
00043 const int attit,
00044 char* const varattname,
00045 med_attribute_type* const varatttype,
00046 med_int* const ncomponent
00047 )
00048
00049 {
00050
00051 med_err _ret=-1;
00052 char _path[MED_TAILLE_STRCT+MED_NAME_SIZE+1+MED_TAILLE_VARATR+MED_NAME_SIZE+1]=MED_STRCT;
00053 int _num = attit -1;
00054
00055
00056
00057
00058 _MEDmodeErreurVerrouiller();
00059
00060 strcat(_path,modelname);
00061 strcat(_path,MED_VARATR);
00062
00063
00064
00065
00066 if ( _MEDobjectGetName(fid, _path ,_num, varattname) < 0 ) {
00067 MED_ERR_(_ret,MED_ERR_ACCESS,MED_ERR_DATAGROUP,_path);ISCRUTE_int(attit);
00068 goto ERROR;
00069 }
00070 strcat(_path,varattname);
00071
00072 if ( MEDstructElementVarAttInfoByName(fid,
00073 modelname,
00074 varattname,
00075 varatttype,
00076 ncomponent
00077 ) < 0 ) {
00078 MED_ERR_(_ret,MED_ERR_CALL,MED_ERR_API,MED_ERR_STRUCT_MSG);
00079 SSCRUTE(modelname);SSCRUTE(_path);SSCRUTE("MEDstructElementVarAttInfoByName");
00080 goto ERROR;
00081 }
00082
00083 _ret = 0;
00084
00085 ERROR:
00086
00087 return _ret;
00088 }