mmmm... I'm don't now.... try whit this... I'm think that the code will be make want do you.

Good Last.-

Declare Long OpenPrinter in "winspool.drv" String pPrinterName, Long @phPrinter, String @pDefault
Declare Long DocumentProperties IN "winspool.drv" LONG hwnd, LONG hPrinter, String pDeviceName, LONG pDevModeOutput, LONG pDevModeInput, Long fMode
DECLARE LONG GlobalAlloc IN "kernel32" LONG wFlags, LONG dwBytes
DECLARE LONG GlobalFree IN "kernel32" LONG HMEM
Declare Long ClosePrinter IN "winspool.drv" Long hPrinter

b = REPLICATE( CHR(0), 200 )
c = 0

?OpenPrinter ( "\\BUE-00-PRN\099P8103", @c, @b)

a = GlobalAlloc( 0x40, 148 )
b = GlobalAlloc( 0x40, 148 )

*|-- Read
?DocumentProperties( 0, c, "099P8103", a, b, 0x04 + 0x02 )

*|-- Write
?DocumentProperties( 0, c, "099P8103", b, a, 0x08 )

*|-- Free memory
?GlobalFree( a )
?GlobalFree( b )

*|-- Close Printer
?ClosePrinter( c )