home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Network Support Encyclopedia 96-1
/
novell-nsepro-1996-1-cd2.iso
/
download
/
netware
/
hpt004.exe
/
PRTCNFG.SCR
< prev
next >
Wrap
Text File
|
1993-08-04
|
34KB
|
917 lines
#
# (c) Copyright 1991, 1992 Novell, Inc. All rights reserved.
#
# $Logfile: H:/csm/hostprt/vcs/prtcnfg.scv $
# $Revision: 1.9 $
# $Date: 04 Aug 1993 17:20:18 $
# $Author: SGOLDSTE $
# $Log: H:/csm/hostprt/vcs/prtcnfg.scv $
#
# Rev 1.9 04 Aug 1993 17:20:18 SGOLDSTE
# Added SetFocus element to BtUpdateAct. This will fix SPD# 7954.
#
# Rev 1.8 07 Jul 1993 09:55:02 SGOLDSTE
# Increased the width of the main screen and JobName combobox.
#
# Rev 1.7 23 Jun 1993 14:21:52 SGOLDSTE
# Increased the width of the PrinterStatus edit control.
#
# Rev 1.6 18 Jun 1993 09:48:54 SGOLDSTE
# Remove BtUpdateAct attribute query list since it is not used anymore.
#
# Rev 1.5 15 Jun 1993 13:59:20 SGOLDSTE
# Changed HelpId back to C03A.
#
# Rev 1.4 15 Jun 1993 13:41:16 SGOLDSTE
# Changed HelpId to C00B.
#
# Rev 1.3 11 Jun 1993 09:48:38 SGOLDSTE
# Added hint text.
#
# Rev 1.2 20 May 1993 08:52:42 SGOLDSTE
# Added UserID to ObjVars. Made sure that all named controls and their WndType
# have the same name.
#
# Rev 1.1 17 May 1993 15:51:16 SGOLDSTE
# Changed references for HostPrt20 to HostPrt10.
#
# Rev 1.0 14 May 1993 15:06:26 SGOLDSTE
# Initial revision.
#
LIST SCRHostPrtConfig SCRHostPrtConfig
#
# The MemCom value is the memory commisioned for screen use. If the
# memory is not available, the screen will not come up. The default
# value below is used or it can be over-written by the screen's
# ::MemCom method. The MemDcom value is set on successful memory
# commision and is used to decommision the screen's memory.
#
Element MemCom
ShortInt nameless 00600
Element MemDcom
ShortInt nameless 00000
#
Element ScreenHelpId
ShortInt nameless 00000C03A
Element ScreenTypes
ShortInt nameless ScrBySelObject
Element WndAttribute
LIST nameless SCRHostPrtConfig
Element WndClass
string nameless "SCRHostPrtConfig"
Element WndCaption
string WndCaption "Configure Printer LU"
Element WndName
string WndName "SCRHostPrtConfig"
Element WndStyle
long WndStyle 000000000
Element WndCoord
Coord WndCoord 000000033 000000031 000000220 000000180
Element WndType
ShortInt nameless 0
EndList
Element WndControl
LIST nameless Window
Element WndObject
LIST ToolBar ToolBar
Element WndAttribute
LIST ToolBar ToolBar
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
# define SS_GRAYRECT 0x00000005L
long WndStyle 050000005
Element WndCoord
Coord WndCoord 000000000 000000000 000000A00 000000026
Element WndType
ShortInt nameless ToolBar
EndList
EndList
Element WndObject
LIST BtCancelAct PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string HostPrt10 "HP_CANCEL"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Cancel Print"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 000000000 000000000 000000032 000000026
Element WndType
ShortInt nameless BtCancelAct
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtCancelAct
EndList
EndList
Element WndObject
LIST BtRestartAct PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string HostPrt10 "HP_RESTART"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Reset printer"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 000000032 000000000 000000032 000000026
Element WndType
ShortInt nameless BtRestartAct
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtRestartAct
EndList
EndList
Element WndObject
LIST BtPA1Act PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string HostPrt10 "HP_PA1"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Sends a PA1 (Program Attention 1) command to the host"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 000000064 000000000 000000032 000000026
Element WndType
ShortInt nameless BtPA1Act
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtPA1Act
EndList
EndList
Element WndObject
LIST BtPA2Act PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string HostPrt10 "HP_PA2"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Sends a PA2 (Program Attention 2) command to the host"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 000000096 000000000 000000032 000000026
Element WndType
ShortInt nameless BtPA2Act
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtPA2Act
EndList
EndList
Element WndObject
LIST BtUpdateAct PUSHBUTTON
Element SetFocus
ShortInt nameless 00001
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string nameless "CSMUPDATE"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Updates printer session's configuration with the most recent information"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 0000000C8 000000000 000000032 000000026
Element WndType
ShortInt nameless BtUpdateAct
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtUpdateAct
EndList
EndList
Element WndObject
LIST BtStartAct PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string nameless "CSMSTART"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Change printer session state to on"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 00000010A 000000000 000000032 000000026
Element WndType
ShortInt nameless BtStartAct
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtStartAct
Element ConfigElement
LIST AttributesQuery AttributesQuery
Element ObjectId
ObjectId nameless "" "2.1.2.26"
Element ObjectInstance
ShortInt nameless 00001
Element AttrList
List AttrList AttrList
# PrinterSession on
Element ObjectId
ObjectId nameless "" "2.1.3.107"
# BOOLEAN
Element DataType
ShortInt nameless 00001
Element AttrSize
ShortInt nameless 00002
Element Value
int nameless 00001
EndList
EndList
EndList
EndList
Element WndObject
LIST BtStopAct PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string nameless "CSMSTOP"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Change printer session state to off"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 00000013C 000000000 000000032 000000026
Element WndType
ShortInt nameless BtStopAcr
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtStopAct
Element ConfigElement
LIST AttributesQuery AttributesQuery
Element ObjectId
ObjectId nameless "" "2.1.2.26"
Element ObjectInstance
ShortInt nameless 00001
Element AttrList
List AttrList AttrList
# PrinterSession on
Element ObjectId
ObjectId nameless "" "2.1.3.107"
# BOOLEAN
Element DataType
ShortInt nameless 00001
Element AttrSize
ShortInt nameless 00002
Element Value
int nameless 00000
EndList
EndList
EndList
EndList
Element WndObject
LIST BtOkayAct PUSHBUTTON
Element LoadBitmap
ShortInt nameless 000000000
Element GetBitmapName
string nameless "CSMOK"
Element WndAttribute
LIST nameless PUSHBUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption "Save the changes and exit"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 05000000B
Element WndCoord
Coord WndCoord 00000017E 000000000 000000032 000000026
Element WndType
ShortInt nameless BtOkayAct
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ButtonAction
ShortInt nameless BtOkayAct
EndList
EndList
Element WndObject
LIST nameless STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Print Job Number :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 000000030 000000065 000000014
Element WndType
ShortInt nameless 00004
EndList
EndList
# Print Job Number value
Element WndObject
LIST JobNumber STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000095 000000030 000000040 000000014
Element WndType
ShortInt nameless JobNumber
EndList
EndList
Element WndObject
LIST nameless STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Print Job Status :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000140 000000030 000000065 000000014
Element WndType
ShortInt nameless 00004
EndList
EndList
# Print Job Number value
Element WndObject
LIST JobStatus STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 0000001B0 000000030 000000064 000000014
Element WndType
ShortInt nameless JobStatus
EndList
EndList
# Group box
Element WndObject
LIST nameless GROUPBOX
Element WndAttribute
LIST nameless BUTTON
Element WndClass
string nameless "BUTTON"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050020007
Element WndCoord
Coord WndCoord 00000000C 000000024 0000001F5 000000115
Element WndType
ShortInt nameless 00003
EndList
EndList
Element WndObject
LIST nameless STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Print Job / Server / Print Queue"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000095 000000049 0000000B6 000000012
Element WndType
ShortInt nameless 00004
EndList
EndList
Element WndObject
LIST JobNameCaption STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Print Job Name :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 000000060 000000065 000000012
Element WndType
ShortInt nameless JobNameCaption
EndList
EndList
Element WndObject
LIST JobName COMBOBOX
Element WndAttribute
LIST nameless COMBOBOX
Element WndClass
string nameless "COMBOBOX"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050210013
Element WndCoord
Coord WndCoord 000000095 00000005C 00000013A 000000057
Element WndType
ShortInt nameless JobName
EndList
EndList
Element WndObject
LIST nameless STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Host Application Name :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 00000007C 000000075 000000012
Element WndType
ShortInt nameless 00004
EndList
EndList
Element WndObject
LIST HostApplication STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000095 00000007C 0000000B6 000000012
Element WndType
ShortInt nameless HostApplication
EndList
EndList
Element WndObject
LIST nameless STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Printer Session State :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 000000090 000000070 000000012
Element WndType
ShortInt nameless 00004
EndList
EndList
Element WndObject
LIST PrinterSessionState STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000095 000000090 000000030 000000012
Element WndType
ShortInt nameless PrinterSessionState
EndList
EndList
Element WndObject
LIST nameless STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Printer Status :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 0000000A2 000000070 000000012
Element WndType
ShortInt nameless 00004
EndList
EndList
# Printer Status value
Element WndObject
LIST PrinterStatus STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000095 0000000A2 000000150 000000012
Element WndType
ShortInt nameless PrinterStatus
EndList
EndList
Element WndObject
LIST CharsPerLineCaption STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Chars Per Line (MPP) :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 0000000C1 000000070 000000012
Element WndType
ShortInt nameless CharsPerLineCaption
EndList
EndList
Element WndObject
LIST CharsPerLine EDIT
Element WndAttribute
LIST nameless EDIT
Element WndClass
string nameless "EDIT"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050010088
Element WndCoord
Coord WndCoord 000000095 0000000C1 000000030 000000012
Element WndType
ShortInt nameless CharsPerLine
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ConfigElement
LIST nameless ConfigElement
Element LimitText
ShortInt nameless 000000003
Element Value
ShortInt nameless 000000100
EndList
EndList
EndList
Element WndObject
LIST LinesPerInchCaption STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Lines Per Inch (LPI) :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 0000000DD 000000070 000000012
Element WndType
ShortInt nameless LinesPerInchCaption
EndList
EndList
Element WndObject
LIST LinesPerInch COMBOBOX
Element WndAttribute
LIST nameless COMBOBOX
Element WndClass
string nameless "COMBOBOX"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050210013
Element WndCoord
Coord WndCoord 000000095 0000000DA 000000030 000000060
Element WndType
ShortInt nameless LinesPerInch
EndList
Element Objects
LIST Objects Objects
Element Object
ShortInt nameless 00003
Element Object
ShortInt nameless 00004
Element Object
ShortInt nameless 00006
Element Object
ShortInt nameless 00008
EndList
EndList
Element WndObject
LIST LinesPerPageCaption STATIC
Element WndAttribute
LIST nameless STATIC
Element WndClass
string nameless "STATIC"
Element WndCaption
string WndCaption "Lines Per Page (MPL) :"
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000015 0000000F6 000000070 000000012
Element WndType
ShortInt nameless LinesPerPageCaption
EndList
EndList
Element WndObject
LIST LinesPerPage EDIT
Element WndAttribute
LIST nameless EDIT
Element WndClass
string nameless "EDIT"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050010088
Element WndCoord
Coord WndCoord 000000095 0000000F6 000000030 000000012
Element WndType
ShortInt nameless LinesPerPage
EndList
Element DataItemCtrl
LIST nameless ViewElement
Element ConfigElement
LIST nameless ConfigElement
Element LimitText
ShortInt nameless 000000003
Element Value
ShortInt nameless 000000100
EndList
EndList
EndList
Element WndObject
LIST DispStatus DispStatus
Element WndAttribute
LIST nameless DispStatus
Element WndClass
string nameless "CSMSTATUS"
Element WndCaption
string WndCaption ""
Element WndName
string WndName ""
Element WndStyle
long WndStyle 050000000
Element WndCoord
Coord WndCoord 000000000 000000106 000000271 00000001A
Element WndType
ShortInt nameless DispStatus
EndList
EndList
EndList
Element DataItemCtrl
LIST nameless ViewElement
# As a way to get control once the screen is created and the
# ObjInstAgent is ready for our commands connect to him and request
# its CsmMsAdrData:
Element RteList
LIST RteList RteList
Element NamedRte
ShortInt nameless SelObjInstCsmMsAdrData
Element RteCmd
ShortInt nameless Connect
Element RteP1
ShortInt nameless CsmMsAdrData
EndList
Element ConfigElement
# All the data needed for the screen to operate is here:
LIST nameless ConfigElement
Element PrinterSession
# This query is needed for the GetNext query of HostPrt's:
# See file NMOBJS.H for this object ID's
LIST AttributesQuery AttributesQuery
Element ObjectId
# Object Id: Host Printer Session
ObjectId nameless "" "2.1.2.26"
Element ObjectInstance
ShortInt nameless 00001
Element ObjectInstCnt
ShortInt nameless 00000
Element AttrList
List AttrList AttrList
Element ObjectId
# Object Id: LU Name
ObjectId nameless "" "2.1.3.88"
Element ObjectId
# Object Id: Job Name
ObjectId nameless "" "2.1.3.130"
Element ObjectId
# Object Id: Host Application
ObjectId nameless "" "2.1.3.56"
Element ObjectId
# Object Id: Printer Session State
ObjectId nameless "" "2.1.3.107"
Element ObjectId
# Object Id: Printer Status
ObjectId nameless "" "2.1.3.108"
Element ObjectId
# Object Id: CharsPerLine
ObjectId nameless "" "2.1.3.110"
Element ObjectId
# Object Id: LinesPerPage
ObjectId nameless "" "2.1.3.111"
Element ObjectId
# Object Id: LinesPerInch
ObjectId nameless "" "2.1.3.112"
Element ObjectId
# Object Id: Job Number
ObjectId nameless "" "2.1.3.131"
Element ObjectId
# Object Id: Job Status
ObjectId nameless "" "2.1.3.132"
EndList
EndList
Element CSActionRequest
LIST AttributesQuery AttributesQuery
Element ObjectId
ObjectId nameless "" "2.1.2.26"
Element ObjectInstance
ShortInt nameless 00001
Element AttrList
List AttrList AttrList
# BUTTON FLAG
Element ObjectId
ObjectId nameless "" "2.1.3.113"
# OCTETSTRING
Element DataType
ShortInt nameless 00004
Element AttrSize
ShortInt nameless 00002
Element Value
ShortInt nameless 00000
EndList
EndList
Element BtStartAct
LIST AttributesQuery AttributesQuery
Element ObjectId
ObjectId nameless "" "2.1.2.26"
Element ObjectInstance
ShortInt nameless 00001
Element AttrList
List AttrList AttrList
# Chars Per Line
Element ObjectId
ObjectId nameless "" "2.1.3.110"
# INTEGER
Element DataType
ShortInt nameless 00002
Element AttrSize
ShortInt nameless 00002
Element Value
ShortInt nameless 00000
# Lines Per Page
Element ObjectId
ObjectId nameless "" "2.1.3.111"
# INTEGER
Element DataType
ShortInt nameless 00002
Element AttrSize
ShortInt nameless 00002
Element Value
ShortInt nameless 00000
# Lines Per Inch
Element ObjectId
ObjectId nameless "" "2.1.3.112"
# INTEGER
Element DataType
ShortInt nameless 00002
Element AttrSize
ShortInt nameless 00002
Element Value
ShortInt nameless 00000
EndList
EndList
Element BtStopAct
LIST AttributesQuery AttributesQuery
Element ObjectId
ObjectId nameless "" "2.1.2.26"
Element ObjectInstance
ShortInt nameless 00001
Element AttrList
List AttrList AttrList
# Job Name
Element ObjectId
ObjectId nameless "" "2.1.3.130"
# PRINTABLESTRING
Element DataType
ShortInt nameless 00013
Element AttrSize
ShortInt nameless 00002
Element Value
ShortInt nameless 00000
EndList
EndList
EndList
EndList
Element ObjVars
List ObjVars ObjVars
Element UserID
string nameless "HOSTPRT"
EndList
EndList