Retrieve relative record number on CHAIN ended in error

Hi all,
    I've the following problem: I've a file opened in update and I make a 
CHAIN(e) on a record that is already allocate by another job.
The CHAIN obviously ended in error but in this case the reletive record number 
does not retur into the INFDS of the file.
I need that relative record number but I found it only into the program status 
ds in message format (from position 91 to 170).
So I could retrieve it working on the text message but it is not very "good" 
way;  there's a way (API or other) to obtain this relative recond number under 
numeric format???
 
Thank a lot!
 

Fabrizio Gurrieri - BARTOLINI SPA 
Via E.Mattei  42 - 40138 BOLOGNA (Italy) 
Tel:+39 051 6015593 - Fax:+39 051 530365 
E-Mail: Fabrizio.Gurrieri@xxxxxxxxxxxx 
Internet: http://www.bartolini.it <http://www.bartolini.it/>