DB> Is there a way to set up TSE-Pro so that when I hit a key, it'll
DB> ask "Which printer: Label printer, or Laser printer?", then load
DB> a specific printer setup associated with that selection? My label
DB> printer is on lpt1, and my regular, every-day laser printer is on
DB> lpt2.
Hello Dennis,
Yes, you can write a macro that would set up your printer before
printing a file.  It would look something like this:
--------------------------------------------------------------------------
proc PrintSet(integer set)
    integer oPrintAddFF,          // You can add any strings or integers
            oPrintBotMargin,      // to these declarations for saving /
            oPrintTopMargin       // restoring your original printer
    string oPrintDevice[250],     // settings
           oPrintInit[255]
    oPrintDevice = Set(PrintDevice, iif(set, "LPT1", "LPT2"))
    oPrintAddFF = Set(PrintAddFF, iif(set, ON, OFF))
    oPrintBotMargin = Set(PrintBotMargin, iif(set, 3, 8))
    oPrintTopMargin = Set(PrintTopMargin, iif(set, 3, 8))
    oPrintInit = Set(PrintInit, iif(set, "", "xxxyyy"))
    // Any other printer settings based on the above pattern....
    PrintFile()
    Set(PrintDevice, oPrintDevice)
    Set(PrintAddFF, oPrintAddFF)
    Set(PrintBotMargin, oPrintBotMargin)
    Set(PrintTopMargin, oPrintTopMargin)
    Set(PrintInit, oPrintInit)
    // Anything else you need to restore to it's original value
end
menu PrintItMnu()
    Title = "Which Printer?"
    "&Label Printer", PrintSet(0)
    "La&ser Printer", PrintSet(1)
end
 PrintItMnu()
----------------------------------------------------------------------------
When you press Ctrl Alt F12, this macro would display a menu allowing
you to chose from your Label Printer or the Laser Printer.  It then sets
the printer appropriately for type of printing job, it prints the
current document, then it restores your original printer settings.
Hope this helps!  If you need any more help in writing a macro to do
what you need, just give me a hollar!
                           George J. De Bruin
                       SemWare Technical Support
 -- SPEED 2.0h #10: TSE Jr, MEM-RES, OS/2 & The SemWare Editor Professional
--- FidoPCB v1.4 [ff151/a]
---------------