Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Result from Report Form Printer Prompt
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 6 SP5
OS:
Windows XP
Miscellaneous
Thread ID:
01470972
Message ID:
01529148
Views:
34
>That should work (never tested though :o)))
>Instead of
>
>SET PRINTER TO (lcSelectedPrinter)
>
>use
>
>SET PRINTER TO NAME (lcSelectedPrinter)
>
This is what I'm testing, but yet it doesn't seem to work:
scan
   lcLayout = layout
   if reccount('csrPrint') > 1
      = messagebox('Ready to print '+transform(lblcount)+' labels using layout '+alltrim(justfname(trim(lcLayout)))+'.'+chr(13) + chr(13) + ;
         'Select the printer to use...',64,'Ready to print')
   endif
   select r_invent
   lcPrinter = getprinter()
   if not empty(m.lcPrinter)
      set printer to name (m.lcPrinter)
      scan for layout==m.lcLayout
         report form (lcLayout)  to printer  noconsole nodialog

      endscan
   endif
   select csrPrint
endscan
I'm testing using PDF printer (don't have the real printer) and I get one job only and both selected labels are printed into one file. What is wrong here?

Thanks in advance.
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform