1 /* ***********************************************************
 2    *                                                         *
 3    * Copyright, (C) Honeywell Bull Inc., 1987                *
 4    *                                                         *
 5    * Copyright, (C) Honeywell Information Systems Inc., 1986 *
 6    *                                                         *
 7    *********************************************************** */
 8 
 9 /* HISTORY COMMENTS:
10   1) change(86-01-01,Flegel), approve(87-07-13,MCR7580),
11      audit(87-07-13,Leskiw), install(87-08-07,MR12.1-1072):
12      Created.
13   2) change(86-01-20,ASmith), approve(87-07-13,MCR7580),
14      audit(87-07-13,Leskiw), install(87-08-07,MR12.1-1072):
15      Documentation and added call to getc_buff
16      and allocated space for unions.
17   3) change(86-05-26,Westcott), approve(87-07-13,MCR7580),
18      audit(87-07-13,Leskiw), install(87-08-07,MR12.1-1072):
19      Support call to call_mowse_int.
20                                                    END HISTORY COMMENTS */
21 
22 /* : PROCEDURE FUNCTION (gettdata)
23 
24 Copies a number of characters from the display buffer (the buffer containing
25 information to be displayed on the screen) to a user specified buffer
26 */
27 
28 #include <dos.h>
29 #include <ws.h>
30 #include <ws_dcls.h>
31 #include <ws_func.h>
32 
33 gettdata (p_buffer_ptr)
34 
35 struct get_struc *p_buffer_ptr;
36 {
37 int length;
38 
39 /* : call user_interrupt to get data */
40 
41    length = call_mowse_int (I$GETTDATA,p_buffer_ptr,sizeof(struct get_struc));
42 
43 /* : set the last position in buffer to null and return the number of
44      characters read. */
45 
46    if (length >= 0)
47       *(p_buffer_ptr->local_buffer_pointer + length) = '\0';
48 
49    return(length);
50 }
51 ^Z