1 /* YC 0.2 Tue Feb 29 16:45:06 CET 2000 */
2 /* Module-C: RecordSyntax-summary */
6 int z_BriefBib (ODR o, Z_BriefBib **p, int opt, const char *name)
8 if (!odr_sequence_begin (o, p, sizeof(**p), name))
9 return opt && odr_ok (o);
11 odr_implicit_tag (o, z_InternationalString,
12 &(*p)->title, ODR_CONTEXT, 1, 0, "title") &&
13 odr_implicit_tag (o, z_InternationalString,
14 &(*p)->author, ODR_CONTEXT, 2, 1, "author") &&
15 odr_implicit_tag (o, z_InternationalString,
16 &(*p)->callNumber, ODR_CONTEXT, 3, 1, "callNumber") &&
17 odr_implicit_tag (o, z_InternationalString,
18 &(*p)->recordType, ODR_CONTEXT, 4, 1, "recordType") &&
19 odr_implicit_tag (o, z_InternationalString,
20 &(*p)->bibliographicLevel, ODR_CONTEXT, 5, 1, "bibliographicLevel") &&
21 odr_implicit_settag (o, ODR_CONTEXT, 6) &&
22 (odr_sequence_of(o, (Odr_fun) z_FormatSpec, &(*p)->format,
23 &(*p)->num_format, "format") || odr_ok(o)) &&
24 odr_implicit_tag (o, z_InternationalString,
25 &(*p)->publicationPlace, ODR_CONTEXT, 7, 1, "publicationPlace") &&
26 odr_implicit_tag (o, z_InternationalString,
27 &(*p)->publicationDate, ODR_CONTEXT, 8, 1, "publicationDate") &&
28 odr_implicit_tag (o, z_InternationalString,
29 &(*p)->targetSystemKey, ODR_CONTEXT, 9, 1, "targetSystemKey") &&
30 odr_implicit_tag (o, z_InternationalString,
31 &(*p)->satisfyingElement, ODR_CONTEXT, 10, 1, "satisfyingElement") &&
32 odr_implicit_tag (o, odr_integer,
33 &(*p)->rank, ODR_CONTEXT, 11, 1, "rank") &&
34 odr_implicit_tag (o, z_InternationalString,
35 &(*p)->documentId, ODR_CONTEXT, 12, 1, "documentId") &&
36 odr_implicit_tag (o, z_InternationalString,
37 &(*p)->abstract, ODR_CONTEXT, 13, 1, "abstract") &&
38 z_OtherInformation(o, &(*p)->otherInfo, 1, "otherInfo") &&
42 int z_FormatSpec (ODR o, Z_FormatSpec **p, int opt, const char *name)
44 if (!odr_sequence_begin (o, p, sizeof(**p), name))
45 return opt && odr_ok (o);
47 odr_implicit_tag (o, z_InternationalString,
48 &(*p)->type, ODR_CONTEXT, 1, 0, "type") &&
49 odr_implicit_tag (o, odr_integer,
50 &(*p)->size, ODR_CONTEXT, 2, 1, "size") &&
51 odr_implicit_tag (o, odr_integer,
52 &(*p)->bestPosn, ODR_CONTEXT, 3, 1, "bestPosn") &&