The function set-printer-metrics
sets the left margin and top margin, and the printable width and printable height, of the given printer. Values outside the bounds of the printer will be corrected.
To set the margins as large as possible:
(let ((metrics (capi:get-printer-metrics printer)))
(capi:set-printer-metrics printer
:left-margin 0
:top-margin 0
:width
(capi:printer-metrics-paper-width metrics)
:height
(capi:printer-metrics-paper-height metrics)))
Actually this sets the margins to the whole paper size, but the printer driver will move these in to take account of the minimum margins of the device.
get-printer-metrics
set-printer-options
print-dialog
Printing from the CAPI—the Hardcopy API
CAPI User Guide and Reference Manual (Macintosh version) - 3 Aug 2017