+
+ZEBRA_RES zebra_sort_get_ord(ZebraHandle zh,
+ Z_SortAttributes *sortAttributes,
+ int *ord,
+ int *numerical)
+{
+ AttrType structure;
+ int structure_value;
+ attr_init_AttrList(&structure, sortAttributes->list, 4);
+
+ *numerical = 0;
+ structure_value = attr_find(&structure, 0);
+ if (structure_value == 109)
+ *numerical = 1;
+
+ if (zebra_attr_list_get_ord(zh, sortAttributes->list,
+ zinfo_index_category_sort,
+ 's', VAL_BIB1, ord)== ZEBRA_OK)
+ return ZEBRA_OK;
+ if (zebra_attr_list_get_ord(zh, sortAttributes->list,
+ zinfo_index_category_sort,
+ 'S', VAL_BIB1, ord)== ZEBRA_OK)
+ return ZEBRA_OK;
+ return ZEBRA_FAIL;
+}
+
+
+/*
+ * Local variables:
+ * c-basic-offset: 4
+ * indent-tabs-mode: nil
+ * End:
+ * vim: shiftwidth=4 tabstop=8 expandtab
+ */
+