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