Changeset 285 for XMLIO_V2/dev/dev_rv/src/xmlio/fortran/icfield.cpp

Timestamp:

09/26/11 14:19:55 (13 years ago)

Author:

hozdoba

Message:

 

File:

• XMLIO_V2/dev/dev_rv/src/xmlio/fortran/icfield.cpp (modified) (1 diff)

XMLIO_V2/dev/dev_rv/src/xmlio/fortran/icfield.cpp

@@ -244 +244 @@
       *_ret = xmlioserver::CObjectFactory::GetObject<xmlioserver::tree::CFieldGroup>(id).get();
    }
+
+
+   // -------------------- Vérification des identifiants -----------------------
+
+   void xios_field_valid_id (bool * _ret, const char * _id, int _id_len)
+   {
+      std::string id;
+      if (!cstr2string(_id, _id_len, id)) return;
+
+      *_ret = xmlioserver::CObjectFactory::HasObject<xmlioserver::tree::CField>(id);
+   }
+
+   void xios_fieldgroup_valid_id (bool * _ret, const char * _id, int _id_len)
+   {
+      std::string id;
+      if (!cstr2string(_id, _id_len, id)) return;
+
+      *_ret = xmlioserver::CObjectFactory::HasObject<xmlioserver::tree::CFieldGroup>(id);
+   }
    
 } // extern "C"