From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of MORRILL,DENISE
Sent: Friday, May 07, 2004 6:34 AM
To: [EMAIL PROTECTED]
Subject: RE: [Talk] Choose a printer from Print Destination Dialog box in CS
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Friday, May 07, 2004 8:50 AM
To: [EMAIL PROTECTED]
Subject: Re: [Talk] Choose a printer from Print Destination Dialog box in CSHi,
I add a Macro to the header of all of my NPR reports that hard codes the printer, and removing the print dialog box. You will need to be sure that each printer you call is installed as a local one.
Here is the Macro :
IF{'/GO 1^/GO,[EMAIL PROTECTED],
1^/R.WIN.COPIES;
{"E2MEDREC02","P"}^{DEV,@Z.rpt.prt.win.mode},
1^/Z.PRT.SUPPRES.DIALOG,
1^/R.NO.PRT.MSGS,
%Z.printer.close.px(""),
%Z.on.device("","",DEV,{1,1}),
@W.return("Compiling for "[EMAIL PROTECTED]),
"PRT"^/ZSPOOL.SUBMERGE},
"Transcriptions -- Medquist RDP Transcriptions Failure to Load to Meditech";
Here is the call from the report title on the general tab:
"_%(MIS)XI.MSG..zcus.is.medquist.rdp.readfail.autorun.M..m("")_"
E2MEDREC02 is the printer name.
You could also change the script to be an object script and use the windows API to go through the printer list.
Hope this helps
Bruce Krigman
Information Systems
South Shore Hospital
781-340-8299"MORRILL,DENISE" <[EMAIL PROTECTED]>
"MORRILL,DENISE" <[EMAIL PROTECTED]>
Sent by: [EMAIL PROTECTED]05/07/04 08:27 AM
Please respond to
[EMAIL PROTECTED]
To
"Boston Workstation Talk \(E-mail\)" <[EMAIL PROTECTED]>
cc
Subject
[Talk] Choose a printer from Print Destination Dialog box in CS
Good Friday morning, all!
I've searched the archives because I swear this topic has been discussed, but I only found reference to downloading a file in CS. How do I tell the system to print to a particular printer from the Pring Destination dialog box? Is there a way to scroll through the list and identify the correct one from that list?
The following code works for downloading, what modifications will make it work to print to a printer?
Do While View(, , Row:=1, col:=1, length:=17) <> "Print Destination"
Loop
Stable 1
Key "%D"
Stable 1
Key "{Tab}"
Stable 1
SendKeys "S:\filenamehere.txt"
Stable 2
SendKeys "~"
Wait 2
Pause "[EMAIL PROTECTED],1"
Enter
Wait 2
tia
Denise Morrill
Clinical Systems Analyst
Spring Harbor Hospital
123 Andover Rd
Westbrook, ME 04092
207.761.2265
[EMAIL PROTECTED]
CONFIDENTIAL NOTICE: This email message, including any attachments, is intended only for the use of the
intended recipient(s) and may contain information that is privileged, confidential and prohibited from unauthorized disclosure under applicable law. If you are not the intended recipient of this message, any dissemination, distribution or copying of this message is strictly prohibited. If you received this message in error, please notify the sender by reply email and destroy all copies of the original message.
Spring Harbor Hospital Maine's Mental Health Network
intended recipient(s) and may contain information that is privileged, confidential and prohibited from unauthorized disclosure under applicable law. If you are not the intended recipient of this message, any dissemination, distribution or copying of this message is strictly prohibited. If you received this message in error, please notify the sender by reply email and destroy all copies of the original message.
<<graycol.gif>>
<<ecblank.gif>>
