Joseph,

When hpfopen returns a CCG this indicates that the file was opened, but
your requested AOPTIONS were not granted. Call fgetinfo and see what the
actual AOPTIONS are. You'll have to play with the way you open the file
to get it compatible with the way the PERL script opens the file.

John Zoltak
North American Mfg Co
Cleveland Ohio



> -----Original Message-----
> From: Joseph Norris [mailto:[log in to unmask]]
> Sent: Monday, August 16, 1999 9:53 AM
> To: [log in to unmask]
> Subject: [HP3000-L] Trouble with fread after open of fifo
>
>
> Hello group,
>
> I have a Perl process opening a fifo file for write access in
> the Posix
> file space and a Cobol program opening a fifo file for read
> in the MPEix
> file space. The perl open is successful but it appears the
> the write to
> the file does not happen (i have those little debugging
> messages that tell
> me where I am). The Cobol program successfully opens the fifo file (no
> errors in the hpfopen call) and then returns a greater than condition
> code. I am not sure what is happening here. Can anyone
> suggest some paths
> to debugging this problem?
>
> Thanks.
>
> #Joseph Norris (Perl - what else is there?/HP3000/Linux/CGI/Msql)
> print @c=map chr
> $_+100,(6,17,15,16,-68,-3,10,11,16,4,1,14,-68,12,1,14,8,
> -68,4,-3,-1,7,1,14,-68,-26,11,15,1,12,4,-68,-22,11,14,14,5,15,-90);
>