Chapter Contents

Previous

Next
typlin

typlin



Invoke the CMS TYPLIN Function

Portability: SAS/C extension


SYNOPSIS
DESCRIPTION
RETURN VALUE
CAUTIONS
ERRORS AND DIAGNOSTICS
PORTABILITY
IMPLEMENTATION
SEE ALSO
EXAMPLE


SYNOPSIS

#include <wrterm.h>

int typlin(char *buffer, short bufsiz, char color, char edit);


DESCRIPTION

typlin invokes the CMS TYPLIN function to type a line of output to the terminal. The typlin macro creates a TYPLIN parameter list and generates an inline SVC 202. A description of each of the arguments follows:

buffer
is a pointer to the string to be typed.

bufsiz
is the length of the string.

color
is one of two values specifying the color in which the string will be typed if the terminal is a typewriter terminal and the typewriter has a two-color ribbon. Use either WR_RED or WR_BLACK , both of which are defined as macros in <wrterm.h> .

edit
is a code specifying the editing to be performed by the TYPLIN function before the string is displayed. Valid values for this argument are defined as macros in <wrterm.h> . Each macro corresponds to a value for the EDIT keyword operand in the WRTERM assembler language macro. The macros WR_EDIT_YES , WR_EDIT_NO , and WR_EDIT_LONG correspond to EDIT=YES, EDIT=NO, and EDIT=LONG, respectively.


RETURN VALUE

typlin returns the value in register 15 when the TYPLIN function returns.


CAUTIONS

In XA CMS or ESA, typlin can be used only in 24-bit addressing mode.


ERRORS AND DIAGNOSTICS

The possible errors are the same as when the TYPLIN function is used in an assembler language program.


PORTABILITY

typlin is not portable.


IMPLEMENTATION

typlin creates a TYPLIN parameter list in the CRABTAUT work area. See SAS/C Compiler and Library User's Guide for more information about CRABTAUT.


SEE ALSO

See VM/SP CMS Command Reference.


EXAMPLE

void dispval(int n)
   {


   char *line[130]  ;
   int len, rc;
      /* Format and display the value of the input parameter. */
   len = format(line,"The value of n is %d",n);
   (void) typlin(line,len,WR_BLACK,WR_EDIT_NO);
   }


Chapter Contents

Previous

Next

Top of Page

Copyright © 2001 by SAS Institute Inc., Cary, NC, USA. All rights reserved.