/* INCLUDE FILE FOR DISPLAY MANAGER EXTERNAL FUNCTIONS FOR PL/I-80 Sept. 28 */
/* Note that each call to PUTF will allocate an additional 132 bytes if the *
 * variable passed to it is not declared as CHAR(132) VAR. If your program  *
 * is space intensive, it is advised that you create a global variable that *
 * is assigned the string that you wish to pass to PUTF prior to calling it *
 * with the global variable. ex:					    *
 * PUTC = 'this is text to pass to PUTF(it could also be a char. varaible)' *
 * CALL PUTF(PUTC); /* PUTC was declared as CHAR(132) VAR */




	DCL CLRSCR ENTRY RETURNS(FIXED);	/* clear the screen */
	DCL CLSDIS ENTRY RETURNS(FIXED);	/* close file, reset term */
	DCL DISPD ENTRY(FIXED) RETURNS(FIXED);	/* show display on screen */
	DCL CURS ENTRY(CHAR(1) VAR) 
	         RETURNS(CHAR(1) VAR);		/* turn on/off cursor */
	DCL ENDF ENTRY RETURNS(FIXED);		/* returns terminating char */
	DCL GETF ENTRY RETURNS(CHAR(132) VAR);	/* gets input from keyboard */
	DCL INITDM ENTRY(CHAR(250) VAR)
		   RETURNS(FIXED);		/* initializes runtime */
	DCL NXTF ENTRY(FIXED) RETURNS(FIXED);	/* relative field positioning*/
	DCL POSF ENTRY(FIXED) RETURNS(FIXED);	/* absolutre field pos. */
	DCL OPNDIS ENTRY(CHAR(16) VAR)
	           RETURNS(FIXED);		/* open new display file */
	DCL PUTF ENTRY(CHAR(132) VAR)
		 RETURNS(FIXED);		/* write data to field */
	DCL RESF ENTRY(FIXED) 
		 RETURNS(CHAR(132) VAR);	/* resume input stored prev */
	DCL RETDM ENTRY RETURNS(CHAR(16) VAR);	/* return term capabilities */
	DCL RETF ENTRY RETURNS(CHAR(16) VAR);	/* return field capabilities */
	DCL SETF ENTRY(CHAR(16) VAR)
		 RETURNS(CHAR(16) VAR);		/* set/reset field attrs */
	DCL UPDF ENTRY RETURNS(CHAR(132) VAR);	/* update field input */

/* END OF INCLUDE FILE FOR DISPLAY MANAGER CALLS FOR PL/I-80 */