>>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.


Try this:

....
 if not empty(m.lcPrinter)
      scan for layout==m.lcLayout
           set printer to name (m.lcPrinter)
           report form (lcLayout)  to printer  noconsole nodialog
           set printer to
      endscan
   endif