isCOBOL Evolve : Appendices : Library Routines : P$ : P$GETDEVICECAPABILITIES
P$GETDEVICECAPABILITIES
The P$GETDEVICECAPABILITIES returns some information about the current printing device.
Syntax 1
 CALL "P$GETDEVICECAPABILITIES" USING deviceCaps
Parameters
deviceCaps
Group Item
Group Item defined as follows:
 
01 DeviceCapabilities.
   02  DC-DriverVersion   pic 9(10) Binary(4).
   02  DC-TechnologyValue pic 9     Binary(4).
   02  DC-HorzSize        pic 9(10) Binary(4).
   02  DC-VertSize        pic 9(10) Binary(4).
   02  DC-HorzRes         pic 9(10) Binary(4).
   02  DC-VertRes         pic 9(10) Binary(4).
   02  DC-LogPixelsX      pic 9(10) Binary(4).
   02  DC-LogPixelsY      pic 9(10) Binary(4).
   02  DC-AspectX         pic 9(10) Binary(4).
   02  DC-AspectY         pic 9(10) Binary(4).
   02  DC-AspectXY        pic 9(10) Binary(4).
   02  DC-PhysicalWidth   pic 9(10) Binary(4).
   02  DC-PhysicalHeight  pic 9(10) Binary(4).
   02  DC-PhysicalOffsetX pic 9(10) Binary(4).
   02  DC-PhysicalOffsetY pic 9(10) Binary(4).
   02  DC-ScalingFactorX  pic 9(10) Binary(4).
   02  DC-ScalingFactorY  pic 9(10) Binary(4).
 
Note - DC-DriverVersion, Dc-ScalingFactorX and DC-ScalingFactorY are always zero, while DC-TechnologyValue is always 2.
Syntax 2
 CALL "P$GETDEVICECAPABILITIES" USING settingName1, settingValue1 
                                     [settingName2, settingValue2]
                                      ... 
                                     [settingNameN, settingValueN]
Parameters
settingName1
settingName2
...
settingNameN
PIC X(n)
Specifies the setting name.
Possible values are:
 
"Driver Version"
"Technology"
"Horizontal Size"
"Vertical Size"
"Horizontal Resolution"
"Vertical Resolution"
"Logical Pixels X"
"Logical Pixels Y"
"Aspect X"
"Aspect Y"
"Aspect XY"
"Physical Width"
"Physical Height"
"Physical Offset X"
"Physical Offset Y"
"Scaling Factor X"
"Scaling Factor Y"
settingValue1
settingValue2
...
settingValueN
PIC X(n) or PIC 9(n) depending on the value type
Receives the setting value.