Subject Re: printer paper source
From Mervyn Bick <invalid@invalid.invalid>
Date Wed, 12 Aug 2020 16:20:58 +0200
Newsgroups dbase.getting-started
Attachment(s) getBINinfo.prg

On 2020-08-11 21:29, Mervyn Bick wrote:

> It's getting late now but looking at the .cc is on the "to do" list for
> tomorrow.

gerBINinfo.cc works like a charm.  Attached is a little demo program
which allows the user to select one of the available printers.

I don't have access to a network so I haven't tried that side of the .cc

Mervyn.



clear
set procedure to getBINinfo.cc
r = new report()
r.printer.chooseprinter()
cPrinter = r.printer.printername
x = new getBINinfo(cPrinter,'0')
?cPrinter
?
?'Paper bins'
for i = 1 to x.aBinNames.size
      ? x.aBins[i]
      ?? '    '+ x.aBinNames[i]
   endfor
?
?'Paper sizes'
for i = 1 to x.aSourceNames.size
   ? x.aSources[i]
   ?? "     " + x.aSourceNames[i]
endfor