tldm-universe/Ardent/UV/INCLUDE/GETPU.H
2024-09-09 17:51:08 -04:00

58 lines
3.6 KiB
C
Executable File

*******************************************************************************
*
* uniVerse include file for GETPU/SETPU keys
*
* Module GETPU.H
*
* (c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
* This is unpublished proprietary source code of Ardent Software Inc.
* The copyright notice above does not evidence any actual or intended
* publication of such source code.
*
*******************************************************************************
EQUATE PU$FIRSTWRITEKEY TO 1 ;* First READ/WRITE key
EQUATE PU$MODE TO 1 ;* Printer mode (0 for terminal)
EQUATE PU$WIDTH TO 2 ;* Device width (columns)
EQUATE PU$LENGTH TO 3 ;* Device length (lines)
EQUATE PU$TOPMARGIN TO 4 ;* Top margin (lines)
EQUATE PU$BOTMARGIN TO 5 ;* Bottom margin (lines)
EQUATE PU$LEFTMARGIN TO 6 ;* Left margin (columns)
EQUATE PU$SPOOLFLAGS TO 7 ;* Spool option flags
EQUATE PU$DEFERTIME TO 8 ;* Spool defer time (mins after m'night)
EQUATE PU$FORM TO 9 ;* Spool form type (string)
EQUATE PU$BANNER TO 10 ;* Spool banner (string)
EQUATE PU$LOCATION TO 11 ;* Spool location (string)
EQUATE PU$COPIES TO 12 ;* Number of copies to spool
EQUATE PU$DISKNUMBER TO 13 ;* Spool disk number
EQUATE PU$PAGING TO 14 ;* Pause at page end (terminal only)
EQUATE PU$PAGENUMBER TO 15 ;* Set page number
EQUATE PU$DISABLE TO 16 ;* Disable or enable this print unit
EQUATE PU$CONNECT TO 17 ;* Connect two print units
EQUATE PU$DEVICENO TO 18 ;* Logical device number (modes 2,4,5)
EQUATE PU$PRIORITY TO 19 ;* Spool job priority 0 - 255
EQUATE PU$USEROPTS TO 20 ;* Text string of user options to pass through
EQUATE PU$RELEASE TO 21 ;* Allow print unit to be reused.
EQUATE PU$NLSMAP TO 22 ;* Set/Read print unit NLS map.
EQUATE PU$FONTBOLD TO 23 ;* Print text in bold font.
EQUATE PU$FONTITALIC TO 24 ;* Print text in italic font.
EQUATE PU$FONTNAME TO 25 ;* Font name to be used in GDI mode.
EQUATE PU$FONTSIZE TO 26 ;* Font size to be used in GDI mode.
EQUATE PU$GDI TO 27 ;* Request GDI mode printing.
EQUATE PU$LINESPACE TO 28 ;* Line spacing to be used in GDI mode.
EQUATE PU$RAW TO 29 ;* Request raw mode printing.
EQUATE PU$TABSIZE TO 30 ;* Tab stop spacing to be used in GDI mode.
EQUATE PU$LASTWRITEKEY TO 30 ;* Last READ/WRITE key
EQUATE PU$FIRSTREADKEY TO 1001 ;* First READ-ONLY key
EQUATE PU$COLUMNSLEFT TO 1001 ;* Cols left before new line needed
EQUATE PU$LINESLEFT TO 1002 ;* Lines left before new page needed
EQUATE PU$HEADERLINES TO 1003 ;* Lines taken by current header
EQUATE PU$FOOTERLINES TO 1004 ;* Lines taken by current footer
EQUATE PU$DATALINES TO 1005 ;* Lines between current header and footer
EQUATE PU$DATACOLUMNS TO 1006 ;* Cols between left margin and dev width
EQUATE PU$ASSIGN TO 1007 ;* Assign highest available print unit
EQUATE PU$LASTREADKEY TO 1007 ;* Last READ-ONLY key
EQUATE PU$DISCONNECT TO 10000 ;* 'magic' number for a disconnected print unit
* END-CODE