Writing to the console in MVS systems 
Author Message
 Writing to the console in MVS systems

On  Tue, 05 Mar 91 01:31:06 AST  Michael Stack <A01MES1%NIU.

Quote:

> My circumvention is to keep some WTO MF=L boiler-plate handy.  It
> doesn't follow good programming practice in that there is no macro
> expansion, but my excuse is that there are far too many WTOs in the
> universe for IBM to alter the basic format.  I shun MCSFLAGS and their
> ilk, and so avoid some of the potential difficulties.

For what it's worth, the macro IEZWPL in SYS1.AMODGEN can be used to
map the WTO/WTOR parameter lists, however, it is not as straight
forward a process as one would like.

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
-  J. Anthony Fitzgerald                  Phone:     (506) 453-4573


   PO Box 4400
   Fredericton, N.B.  Canada
   E3B 5A3



Sun, 22 Aug 1993 22:14:47 GMT  
 Writing to the console in MVS systems
On Mon, 4 Mar 91 23:27:00 CST,

Quote:
>...
> My circumvention is to keep some WTO MF=L boiler-plate handy.  It doesn't
> follow good programming practice in that there is no macro expansion,
> but my excuse is that there are far too many WTOs in the universe for
> IBM to alter the basic format.  I shun MCSFLAGS and their ilk, and so
> avoid some of the potential difficulties.

There's no perfectly legal way of doing this, but there is a way that
still uses the macro expansion to do some of the work.  Code

WTO1   WTO  ' ',MF=L,whatever_other_operands_you_need
WTO1L  EQU  *-WTO1

Now you still have to account somewhat for the format of the
expansion (remember PRINT GEN!).  Use code like this:

       MVC  WTOAREA+2(2),WTO1+2    copy flag bytes
       MVC  WTOAREA+4(???),message_text   could be an EXecuted MVC
       LA   R15,4+length_of_message_text
       STH  R15,WTOAREA+4
       LA   R15,WTOAREA(R15)       -> message text
       MVC  0(WTO1L-4-1),WTO1+4+1  copy other stuff like MCSFLAG

This may be ugly, but it's much preferable to hand expanding ROUTCDE,
DESC, MCSFLAG, etc.

/Leonard



Wed, 25 Aug 1993 14:50:00 GMT  
 Writing to the console in MVS systems
On Fri, 8 Mar 91 22:50:00 PST, I had a brain check:
Quote:
>        MVC  WTOAREA+2(2),WTO1+2    copy flag bytes
>        MVC  WTOAREA+4(???),message_text   could be an EXecuted MVC
>        LA   R15,4+length_of_message_text
>        STH  R15,WTOAREA+4

                  *********
This must be WTOAREA, *not* +4.
Quote:
>        LA   R15,WTOAREA(R15)       -> message text
>        MVC  0(WTO1L-4-1),WTO1+4+1  copy other stuff like MCSFLAG



Wed, 25 Aug 1993 15:23:00 GMT  
 
 [ 3 post ] 

 Relevant Pages 

1. Writing to the console on MVS systems

2. MVS/JES2/WTO(R)/CONSOLE AS/MPF exit/SUB SYSTEM

3. Writting to the console on MVS system.

4. (MVS) Writing a REXX function in MVS C

5. MVS REXX (console commands)

6. writing to console

7. Writing to Win32 console - MASM

8. Anyone writing console apps using win32api ?

9. erasing and writing test on console.

10. CR/LF Control With WRITEs to Console

11. write to console from C in WIN32

12. spectcl console write error

 

 
Powered by phpBB® Forum Software