+#if HAVE_YAZ_URSULA_H
+int MyClient::cmd_ursula(char *args)
+{
+ Z_APDU *apdu = create_Z_PDU(Z_APDU_extendedServicesRequest);
+ Z_ExtendedServicesRequest *req = apdu->u.extendedServicesRequest;
+
+ req->packageType = odr_getoidbystr(odr_encode(), "1.2.840.10003");
+
+ Z_External *ext = (Z_External *) odr_malloc(odr_encode(), sizeof(*ext));
+ req->taskSpecificParameters = ext;
+ ext->direct_reference = req->packageType;
+ ext->descriptor = 0;
+ ext->indirect_reference = 0;
+
+ ext->which = Z_External_octet;
+ ext->u.single_ASN1_type = (Odr_oct *)
+ odr_malloc (odr_encode(), sizeof(Odr_oct));
+
+ Z_UrsPDU *pdu = (Z_UrsPDU *) odr_malloc (odr_encode(), sizeof(*pdu));
+ pdu->which = Z_UrsPDU_request;
+ pdu->u.request = (Z_UrsRequest *)
+ odr_malloc (odr_encode(), sizeof(*pdu->u.request));
+ pdu->u.request->libraryNo = odr_strdup(odr_encode(), "000200");
+ pdu->u.request->borrowerTickerNo = 0;
+ pdu->u.request->disposalType = 0;
+ pdu->u.request->lastUseDate = 0;
+ pdu->u.request->num_items = 0;
+ pdu->u.request->items = (Z_UrsRequestItem **) odr_nullval();
+ pdu->u.request->counter = 0;
+ pdu->u.request->priority = 0;
+ pdu->u.request->disposalNote = 0;
+ pdu->u.request->overrule = 0;
+
+ if (!z_UrsPDU (odr_encode(), &pdu, 0, ""))
+ {
+ yaz_log (LOG_LOG, "ursula encoding failed");
+ return 1;
+ }
+ char *buf =
+ odr_getbuf (odr_encode(), &ext->u.single_ASN1_type->len, 0);
+
+ ext->u.single_ASN1_type->buf = (unsigned char*)
+ odr_malloc (odr_encode(), ext->u.single_ASN1_type->len);
+ memcpy (ext->u.single_ASN1_type->buf, buf, ext->u.single_ASN1_type->len);
+ ext->u.single_ASN1_type->size = ext->u.single_ASN1_type->len;
+
+ if (send_Z_PDU(apdu) >= 0)
+ wait();
+ return 1;
+}
+#endif
+