2016 report printing issue

I've been using the same vb.net application to print (PDF and hard copy) from PCDMIS 2011 for a few years now. In 2016 it no longer works the same. After printing once, it will not print a second time. PCDMIS doesn't even flinch when the second set of commands are called. If I print the PDF first, it skips the hard copy, if I print the hard copy first, it skips the PDF...no matter what, it will not print twice in a row, like it used to. We have upgraded 7 machines to 2016, all have the same problem.

Any thoughts??


'print to PDF

[FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2]prt.EditWindow.SetPrintOptionsEx(PCDLRN.[/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]PCDPRINTLOC[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].PCD_FILE, PCDLRN.[/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]ENUM_PCD_ON_OFF[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].DMIS_ON, PCDLRN.[/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]PCDPRINTFILEMODE[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].PCD_NEWFILE, 1, [/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]sPath[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2], PCDLRN.[/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]PCDFILEPRINTFORMAT[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].PCD_PDF, [/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#0000ff][FONT=Consolas][SIZE=2][COLOR=#0000ff][FONT=Consolas][SIZE=2][COLOR=#0000ff]False[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2])[/SIZE][/FONT][/SIZE][/FONT]
[FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2]RepWin.PrintReport()

'print hard copy

prt.EditWindow.SetPrintOptions([/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]PCDPRINTLOC[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].PCD_PRINTER, [/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]ENUM_PCD_ON_OFF[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].DMIS_ON, [/SIZE][/FONT][/SIZE][/FONT][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af][FONT=Consolas][SIZE=2][COLOR=#2b91af]PCDPRINTFILEMODE[/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][/COLOR][/SIZE][/FONT][FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2].PCD_OVERWRITE, 1)[/SIZE][/FONT][/SIZE][/FONT]
[FONT=Consolas][SIZE=2][FONT=Consolas][SIZE=2]RepWin.PrintReport()[/SIZE][/FONT][/SIZE][/FONT]

Darius11 over 5 years ago

Hi,

I'm trying to add printing code for PDF output to a script. I took code from above and paste to script, then I had changed "sPath" to patch + report title which I do need.

Code is:

[part.EditWindow.SetPrintOptionsEx(PCDLRN.PCDPRINTLOC.PCD_FILE, PCDLRN.ENUM_PCD_ON_OFF.DMIS_OFF, PCDLRN.PCDPRINTFILEMODE.PCD_OVERWRITE, 1, sPath, PCDLRN.PCDFILEPRINTFORMAT.PCD_PDF, False)

RepWin.PrintReport()]

This code at the moment do not work, It giving message: "Error on lines:145-Missing parameter(s)". Line 145 is first line from code above.

I am using PC-DMIS 2015. My question what parameter I did miss?

Regards
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
SABarber over 5 years ago

I do not know what you mean by “patch + report title”. If your copied code is correct you seem to have a space in ”PCDPRINTL OC”. Also assuming you really don’t have the []s in the code.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
Darius11 over 5 years ago in reply to SABarber

Hi
"patch + report title" example of this would be "C:\ test32.xls"
”PCDPRINTL OC” I did find and did fix, but it didn't fix problem problem and you are right, code is without [].
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
NinjaBadger over 5 years ago in reply to SABarber

Awesome - this is brilliant!
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel
Darius11 over 5 years ago in reply to SABarber

This code not perfect but working. FILEMANE patch+ title
[part.reportwindow.RefreshReport
part.editwindow.SetPrintOptionsEx PCD_FILE, DMIS_OFF, PCD_OVERWRITE, 0, FILENAME, PCD_PDF, False
part.reportwindow.PrintReport]

Thanks for help
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel