Work on Summary.

[yaz-moved-to-github.git] / server / seshigh.c

diff --git a/server/seshigh.c b/server/seshigh.c
index 7b558eb..b420bbc 100644 (file)
--- a/server/seshigh.c
+++ b/server/seshigh.c
@@ -4,7 +4,13 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: seshigh.c,v $
- * Revision 1.59  1996-05-14 09:26:46  quinn
+ * Revision 1.61  1996-06-10 08:56:16  quinn
+ * Work on Summary.
+ *
+ * Revision 1.60  1996/05/30  11:03:10  quinn
+ * Fixed NextresultSetPosition bug fixed.
+ *
+ * Revision 1.59  1996/05/14  09:26:46  quinn
  * Added attribute set to scan backend
  *
  * Revision 1.58  1996/02/20  12:53:04  quinn
@@ -921,6 +927,7 @@ static Z_Records *pack_records(association *a, char *setname, int start,
                    reclist.records[reclist.num_records] =
                         surrogatediagrec(a->proto, fres->basename, 16, 0);
                    reclist.num_records++;
+                   *next = fres->last_in_set ? 0 : recno + 1;
                    continue;
                }
            }
@@ -930,6 +937,7 @@ static Z_Records *pack_records(association *a, char *setname, int start,
                reclist.records[reclist.num_records] =
                    surrogatediagrec(a->proto, fres->basename, 17, 0);
                reclist.num_records++;
+               *next = fres->last_in_set ? 0 : recno + 1;
                continue;
            }
        }
@@ -958,6 +966,8 @@ static Z_Records *pack_records(association *a, char *setname, int start,
                case VAL_GRS1: thisext->which = Z_External_grs1; break;
                case VAL_EXPLAIN: thisext->which = Z_External_explainRecord;
                    break;
+               case VAL_SUMMARY: thisext->which = Z_External_summary; break;
+               case VAL_OPAC: thisext->which = Z_External_OPAC; break;
 
                default:
                    logf(LOG_FATAL, "Unknown structured format from backend.");