Quick losing request buffer info

[Walker, Chris]

You need to open xxxx on a different channel, otherwise the read pointers
are reset when you use it for reference.

File yyyy alias xxxx reference open 1

If it's a reference file there's no need to do an explicit "get", just check
the id, or even just "newrecord of yyyy".

Chris Walker
Tate & Lyle
London

> -----Original Message-----
> From:	Jeff Hoffman [SMTP:J.Hoffman@cchs.usyd.edu.au]
> Sent:	Thursday, June 03, 1999 10:02 PM
> To:	powerh-l@lists.swau.edu
> Subject:	Quick losing request buffer info
> 
> Hi Ya!
> 
> Got a problem. Platform OpenVMS 7.10.g1, RMS Indexed sequential files.
> 
> The screen looks at details of people (ID) booked for a room then trying
> to
> find out if an ID has more than 1 booking on the file
> 
> Screen x
> 
> file yyyy primary
> acc via room request room using room
> 
> file yyyy alias xxxx reference
> acc via id using id of yyyy
> sel if room of yyyy <> room of xxxx
> 
> temp has_more_than_1 char*1
> 
> .....
> ...
> 
> procedure postfind
> begin
>   let has_more_than_1 = "N"
>   if id of yyyy > 0
>   then begin
>     get xxxx via id using id of yyyy optional
>     if accessok
>     then let has_more_than_1 = "Y"
>     end
>   end
> 
> While the ID is 0, everything is OK, but as soon as the get is executed
> the
> request buffer is lost and more records are retrieved.
> 
> Can anybody tell me why.
> 
> Thanks
> +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
> +-+
> + Jeff Hoffman                         + e-mail:
> J.Hoffman@cchs.usyd.EDU.AU +
> + Director                             +
> +
> + WoniCon Pty Ltd                      +                           ,-_|\
> +
> + 21 Prices Circuit                    +  voice: +61 2 9542 1527  /     \
> +
> + Woronora    NSW     2141             +    fax: +61 2 9521 3979  \_,-._*
> +
> + AUSTRALIA                            +                               v
> +
> +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
> +-
> +
> = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> =
> Subscribe: "subscribe powerh-l" in message body to
> majordomo@lists.swau.edu
> Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
> powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
> This list is closed, thus to post to the list, you must be a subscriber.
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.