YAZ + DELPHI How to get the detail of records?

Hi Jean Pierre,

	After christmas we come back to work. I agree with you is
very usefull
for the yaz Delph implementation that we share our
experiences and
problems here.

	I talked with Rodrigo Kiguti and he explained for me the
problem with the
name of functions. As Giannis Kosmas said the Call  to
GetProcAddress was
incorrect.  I  replace the substring " at "  with
"" and my problem of
ACCESS VIOLATION is finish.

	I did a connection with a server Z39 without problem. The
Record Count of
a search is correct too. My problem now is how to read the
detail of each
record and put it on a STRING GRID?  Look the program:

   FHOST := 'z3950.loc.gov';
   FPORT := 7090;

   q := 'attr 1=4 attr 4=1 "A brief history of
Merthyr"';
   type_spec := 'raw';
   q := UTF8Encode(q);
   r := ZOOM_connection_search_pqf(ZOOM_connection,
PChar(q));
   fRecordCount := ZOOM_resultset_size(r);
   ShowMessage('Recuperou ' + IntToStr(fRecordCount)); //
This line is OK

  // Loop

      for i := 0 to fRecordCount - 1 do
      begin
            ZOOM_Rec := ZOOM_resultset_record(r, i);
            zraw_record := ZOOM_record_get(ZOOM_Rec,
PChar(type_spec),len); // ZRAW_RECORD is NIL, what is the
problem??

           …
      End;

       I need to Know how get the DETAIL of each RECORD and
show it in a
STRING GRID this way:

00714cam  22002411  4500
001 841223
005 19891016000000.0
008 780112s1973    bl       b    000 0 por
035    $9 (DLC)   77483165
906    $a 7 $b cbc $c orignew $d u $e ncip $f 19 $g
y-gencatlg
010    $a    77483165
040    $a DLC $c DLC $d DLC
043    $a s-bl---
050 00 $a LAW
100 1  $a Pires, Ariosvaldo de Campos.
245 12 $a A coađcäao irresistâivel no direito penal
brasileiro.
250    $a [2. ed.
260    $a Belo Horizonte, $b Editora Lemi, $c 1973]
300    $a xi, 72 p. $c 23 cm.
504    $a Bibliography: p. 69-72.
650  0 $a Violence (Law) $z Brazil.
650  0 $a Violence (Law)
991    $b c-LL $h LAW BRAZIL 7 Pire  $t Copy 1 $w BOOKS


Any help would be appreciated

Regards

Wellington

//----------------------------------------------------------
----------
From: "Lamon Jean-Pierre" <jpierre.lamonmediatheque.ch>
Hi,

I think it would be very usefull for the yaz Delph
implementation that you
share
your experiences here 

Regards
JP



_______________________________________________
Yazlist mailing list
Yazlistlists.indexdata.dk
http://lists.indexdata.dk/cgi-bin/mailman/listinfo/yaz
list

Search for "ISO2709". It is the layout of the
record.

--- welbczm.ufrn.br wrote:

> Hi Jean Pierre,
> 
> 	After christmas we come back to work. I agree with
> you is very usefull
> for the yaz Delph implementation that we share our
> experiences and
> problems here.
> 
> 	I talked with Rodrigo Kiguti and he explained for
> me the problem with the
> name of functions. As Giannis Kosmas said the Call 
> to GetProcAddress was
> incorrect.  I  replace the substring " at " 
with
> "" and my problem of
> ACCESS VIOLATION is finish.
> 
> 	I did a connection with a server Z39 without
> problem. The Record Count of
> a search is correct too. My problem now is how to
> read the detail of each
> record and put it on a STRING GRID?  Look the
> program:
> 
>    FHOST := 'z3950.loc.gov';
>    FPORT := 7090;
> 
>    q := 'attr 1=4 attr 4=1 "A brief
history of
> Merthyr"';
>    type_spec := 'raw';
>    q := UTF8Encode(q);
>    r := ZOOM_connection_search_pqf(ZOOM_connection,
> PChar(q));
>    fRecordCount := ZOOM_resultset_size(r);
>    ShowMessage('Recuperou ' +
> IntToStr(fRecordCount)); // This line is OK
> 
>   // Loop
> 
>       for i := 0 to fRecordCount - 1 do
>       begin
>             ZOOM_Rec := ZOOM_resultset_record(r, i);
>             zraw_record := ZOOM_record_get(ZOOM_Rec,
> PChar(type_spec),len); // ZRAW_RECORD is NIL, what
> is the
> problem??
> 
>            …
>       End;
> 
>        I need to Know how get the DETAIL of each
> RECORD and show it in a
> STRING GRID this way:
> 
> 00714cam  22002411  4500
> 001 841223
> 005 19891016000000.0
> 008 780112s1973    bl       b    000 0 por
> 035    $9 (DLC)   77483165
> 906    $a 7 $b cbc $c orignew $d u $e ncip $f 19 $g
> y-gencatlg
> 010    $a    77483165
> 040    $a DLC $c DLC $d DLC
> 043    $a s-bl---
> 050 00 $a LAW
> 100 1  $a Pires, Ariosvaldo de Campos.
> 245 12 $a A coađcäao irresistâivel no direito penal
> brasileiro.
> 250    $a [2. ed.
> 260    $a Belo Horizonte, $b Editora Lemi, $c 1973]
> 300    $a xi, 72 p. $c 23 cm.
> 504    $a Bibliography: p. 69-72.
> 650  0 $a Violence (Law) $z Brazil.
> 650  0 $a Violence (Law)
> 991    $b c-LL $h LAW BRAZIL 7 Pire  $t Copy 1 $w
> BOOKS
> 
> 
> Any help would be appreciated
> 
> Regards
> 
> Wellington
> 
>
//----------------------------------------------------------
----------
> From: "Lamon Jean-Pierre"
> <jpierre.lamonmediatheque.ch>
> Hi,
> 
> I think it would be very usefull for the yaz Delph
> implementation that you
> share
> your experiences here 
> 
> Regards
> JP
> 
> 
> 
> _______________________________________________
> Yazlist mailing list
> Yazlistlists.indexdata.dk
>
http://lists.indexdata.dk/cgi-bin/mailman/listinfo/yaz
list
> 


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection
around 
http://mail.yahoo.com 

_______________________________________________
Yazlist mailing list
Yazlistlists.indexdata.dk
http://lists.indexdata.dk/cgi-bin/mailman/listinfo/yaz
list