VAR
...
l:DevMod             BYTE,DIM(1024)
l:DevModString       STRING(1024), over(l:DevMod)
...

CODE
...
PRINTER{PROPPRINT:Device}   = 'MyPrinter'
PRINTER{PROPPRINT:PaperBin} = 2
l:DevModString = PRINTER{PROPPRINT:DEVMODE}
ret# = LlSetPrinterInPrinterFile(l:Job, l:LL_Project, l:Report, -1, l:Drucker, address(l:DevMod))
...

Regards
Ralf