+/*
+ * The table below should be moved to the ODR structure itself and
+ * be an image of the association context: To help
+ * map indirect references when they show up.
+ */
+static Z_ext_typeent type_table[] =
+{
+ {VAL_SUTRS, Z_External_sutrs, (Odr_fun) z_SUTRS},
+ {VAL_EXPLAIN, Z_External_explainRecord, (Odr_fun)z_ExplainRecord},
+ {VAL_RESOURCE1, Z_External_resourceReport1, (Odr_fun)z_ResourceReport1},
+ {VAL_RESOURCE2, Z_External_resourceReport2, (Odr_fun)z_ResourceReport2},
+ {VAL_PROMPT1, Z_External_promptObject1, (Odr_fun)z_PromptObject1 },
+ {VAL_GRS1, Z_External_grs1, (Odr_fun)z_GenericRecord},
+ {VAL_EXTENDED, Z_External_extendedService, (Odr_fun)z_TaskPackage},
+#ifdef ASN_COMPILED
+ {VAL_ITEMORDER, Z_External_itemOrder, (Odr_fun)z_IOItemOrder},
+#else
+ {VAL_ITEMORDER, Z_External_itemOrder, (Odr_fun)z_ItemOrder},
+#endif
+ {VAL_DIAG1, Z_External_diag1, (Odr_fun)z_DiagnosticFormat},
+ {VAL_ESPEC1, Z_External_espec1, (Odr_fun)z_Espec1},
+ {VAL_SUMMARY, Z_External_summary, (Odr_fun)z_BriefBib},
+ {VAL_OPAC, Z_External_OPAC, (Odr_fun)z_OPACRecord},
+ {VAL_SEARCHRES1, Z_External_searchResult1, (Odr_fun)z_SearchInfoReport},
+ {VAL_DBUPDATE, Z_External_update, (Odr_fun)z_IUUpdate},
+ {VAL_DATETIME, Z_External_dateTime, (Odr_fun)z_DateTime},
+ {VAL_UNIVERSE_REPORT, Z_External_universeReport, (Odr_fun)z_UniverseReport},
+ {VAL_NONE, 0, 0}
+};
+
+Z_ext_typeent *z_ext_getentbyref(oid_value val)
+{
+ Z_ext_typeent *i;
+
+ for (i = type_table; i->dref != VAL_NONE; i++)
+ if (i->dref == val)
+ return i;
+ return 0;
+}
+