From:	US2RMC::"law@corp1.cincom.com" "Socket" 29-JUL-1995 17:16:02.69
To:	open-vms-sig@decus.org
CC:	
Subj:	Thanks for help reading SYS$OUTPUT of detached process

Greetings all,

I want to express my thanks for those who helped with my question on
how to make the SYS$OUTPUT file of a detached process readable from
another process.  And special thanks to Harry Flowers 
(FLOWERS@NARNIA.MEMPHIS.EDU) who gave me the precise 2 lines of code 
needed.

FYI the final code fragment is appended below.

Cheers, Bill Law  :-)
Cincom Systems Inc.
blaw@cincom.com

-----------------------------------------------------------------------

static int stdout_reopened = 0;	/* 1 after fopen(stdout)             */
char	   outname[256];	/* ASCII stdout filename             */
 |
 |
if( !stdout_reopened )		/* Only reopen stdout once           */
{
    fgetname( stdout, outname );/* Get stdout filename               */
    fclose( stdout );		/* Close stdout, then reopen shared  */
    stdout = fopen( outname, "a+", "ctx=rec","shr=get" );
    stdout_reopened = 1;
}
fflush( stdout );		/* Flush all internal buffers to RMS */
fsync( fileno(stdout) );	/* Flush RMS buffers out to disk     */

% ====== Internet headers and postmarks (see DECWRL::GATEWAY.DOC) ======
% Received: from mail1.digital.com by us2rmc.zko.dec.com (5.65/rmc-22feb94) id AA21309; Sat, 29 Jul 95 17:05:18 -040
% Received: from Topaz.DECUS.Org by mail1.digital.com; (5.65 EXP 4/12/95 for V3.2/1.0/WV) id AA09729; Sat, 29 Jul 1995 14:01:20 -070
% Received: from Reprocess.DECUS.Org by DECUS.Org (PMDF V4.2-13 #9698) id <01HTFTOXWVKG934PPH@DECUS.Org>; Sat, 29 Jul 1995 10:31:09 ED
% Received: from CORP1 (corp1.cincom.com) by DECUS.Org (PMDF V4.2-13 #9698) id <01HTER2UJZC0934PTY@DECUS.Org>; Fri, 28 Jul 1995 16:05:15 ED
% Date: Fri, 28 Jul 1995 15:55:26 -0400
% From: law@corp1.cincom.com (Socket() to me)
% Subject: Thanks for help reading SYS$OUTPUT of detached process
% To: open-vms-sig@decus.org
% Errors-To: open-vms-sig-owner@DECUS.Org
% Warnings-To: open-vms-sig-owner@DECUS.Org
% Message-Id: <95072815552590@corp1.cincom.com>
% X-Vms-To: SMTP%"open-vms-sig@decus.org"
% X-Vms-Cc: LAW
% Content-Transfer-Encoding: 7BIT
% Comments: Send OPEN-VMS-SIG subscribe/unsubscribe requests to mailserv@DECUS.Org