Most all applications here are written in-house, using COBOL/VIEW/IMAGE.

Most all RUN commands are executed from within a UDC, with ;STDLIST={A
disc file or $NULL}. (I do this because some debug DISPLAY statements go
into production code from time-to-time.) From within these block mode
applications we have some character mode son processes, that use
$STDLIST & $STDIN for I/O. Because son processes inherit the parents
$STDLIST, I issue the following file equation:

FILE SCREENX;DEV=16;CCTL;SHR;ACC=INOUT

{NOTE: 16 is the LDEV from the WHO intrinsic}

The (CHARACTER MODE) son process is then started with $STDLIST=*SCREENX,
here's a COBOL example:

--------------------
     Initialize Message-Fields Getproc-Linkage.
     Move c-main to getproc-name.
     Move "G" to getproc-lib.
     MOVE "NOCBLOAD" TO JCW-NAME.
     MOVE ZERO TO JCW-VALUE JX.
     CALL INTRINSIC "FINDJCW" USING JCW-NAME JCW-VALUE JX.
     IF JCW-VALUE  = 1 move "Y" to getproc-nocb.
     Move "CS" to getproc-priority.
     If c-screen = "NO VIEW3000" or "$CHARMODE"
        MOVE "*SCREENX" TO STDLIST-VALUE.
     Move PROGRAM-PARM-VALUE TO getproc-parmval.
     STRING SD-USER-NAME SD-USER-PASSWORD
     DELIMITED BY SIZE INTO Getproc-Info.

     CALL "GETPROC" using getproc-linkage.
---------------------

The problem is this:

When the Logon LDEV is a VT/Telnet/Network connection, the character
mode son process will inherit the parents $STDLIST, and not "*SCREENX".

When the Logon LDEV is Serial/DTC the character mode son process is
*SCREENX.

How can I get the Network connection to work the same as the Serial
connection?

Any help will be appreciated.

Thanks,
Michael Anderson
-----
Sr. Systems Programmer
TIW Corporation
Houston, Texas (713) 729-2110 Ext: 287
mailto:[log in to unmask]
http://www.tiwtools.com