!SETPU()

!SETPU()

Top  Previous  Next

 

The !SETPU() subroutine sets the characteristics of a print unit.

 

 

Format

 

CALL !SETPU(key, unit, value, status)

 

where

 

keyidentifies the parameter to set. This is as for the SETPU statement.

 

unitevaluates to the print unit number.

 

valueis the value to set for the given parameter.

 

statusis the return status value. Zero if the action is successful, a non-zero error code if the action fails.

 

 

The !SETPU() subroutine sets the print unit characteristic specified by key to the given value. It is closely related to the SETPU statement.

 

 

Example

 

CALL !SETPU(PU$LOCATION, 3, "LASER", STATUS)

 

The above statement sets the destination for print unit 3 to be the LASER printer.