All messages should be posted in plain text.  HTML will be converted to
attachments.    The meditech-l web site is MTUsers.com
======================================

We do it thru FORMS Automation

Dee Ramirez
Delnor-Community Hospital
(630) 208-4251

-----Original Message-----
From: Gary Hall [mailto:[EMAIL PROTECTED] 
Sent: Monday, May 01, 2006 9:53 PM
To: Meditech-L
Subject: [MEDITECH-L] Anne Miller's request for printing an image in an
NPRreport (Magic)

All messages should be posted in plain text.  HTML will be converted to
attachments.    The meditech-l web site is MTUsers.com
======================================

For Anne Miller & the L: the only home-grown way I know to print a
graphic in an NPR report is to print through PREVIEW first. So, it's not
ideal, but it does work. Below you'll find the original note from Brian
Schmit, and my correction to his code (there was a missing line of code
in his original e-mail). If you need a working version of the code, let
me know, I'll be glad to send it. 

Gary Hall
Clinical Applications Specialist
Estes Park Medical Center
Information Systems Department
970-577-4443

-----Original Message-----
From: Gary Hall 
Sent: Monday, May 01, 2006 4:12 PM
To: Gary Hall
Subject: RE: [MEDITECH-L] image in an NPR report (Magic)



Brian, I got the horizontal dimension figured out. There was a missing
line in the PRINT.IMAGE routine (@Z.esc_"*p+"_(DPC*B)_"X"^!) that, when
added, allows you to control the horizontal dimension. I've added it as
the third line in the PRINT.IMAGE routine below.

So, to control the horizontal position of the graphic, vary the 20 in
that third line to the desired value.

To vary the vertical spacing of the graphic, vary the value of C, of
course.

To vary the size of the graphic, vary the value of B.

Thanks for getting me started on this! This will be very useful.

Gary Hall
Clinical Applications Specialist
Estes Park Medical Center
Information Systems Department
970-577-4443

-----Original Message-----
From: Brian Schmit [mailto:[EMAIL PROTECTED]
Sent: Thursday, January 05, 2006 3:17 PM
To: Bill Mullins; [EMAIL PROTECTED]; [email protected]
Subject: RE: [MEDITECH-L] RE: Bitmaps

Hi everyone,

It is possible to print a bitmap from a MAGIC report, but you must send
it to PREVIEW.  I do not know if it will work with any other print
destinations.  After it displays in PREVIEW, you can then print it to
your real printer from there.

Here is the code to accomplish this.  I have not worked with it much so
some tweaking of the offset and length might be involved.  This code
would go into a macro for printing the image, and the macro would be
called via the AL Footnote.  In this case, this macro prints a jpeg file
located at C:\74.jpg.

;
; A = file name and path
; B = X offset
; C = Height in Rows
;
[EMAIL PROTECTED](@Z.loc.ppii.print.preview);
   {"C:\74.jpg",20,20}^{A,B,C},
   @PRINT.IMAGE,
   @SPACE.OVER}

PRINT.IMAGE
96.000000*B/@Z.rpt.real.cpi:0D^LEN,
300:3D/@Z.rpt.cpi#0.^DPC,
@Z.esc_"*p+"_(DPC*20)_"X"^!,
IF{C 96.000000*C-16/@Z.rpt.real.lpi:0D;LEN}^HT,
250.000000/@Z.rpt.real.lpi:0D^MOVE.Y,
@[EMAIL PROTECTED]"*p"_(0-MOVE.Y)_"Y"^!,
@SEND.TO.PPII,
@POP^!

PUSH
@Z.esc_"&f0S"

POP
@Z.esc_"&f1S"

SPACE.OVER
IF{B+0'>0;
   1 @Z.esc_"*p+"_(DPC*B)_"X"^!;
   I(" ":B)^!}

SEND.TO.PPII
%Z.right(A,0,"\")^NM,
D(254,3)^!,
D(254,14)^!,
"{Image|Copy|"_A_"|"_NM_"|"_LEN_"|"_HT_"|"_0_"}"^!,
D(254)^!,
D(254,3)^!

Please let me know if you have any questions.

Good luck,

Brian Schmit
Sr. Programmer, Picis
Direct: 781 557 3315
Fax: 781 557 3140
100 Quannapowitt Parkway
Suite 405
Wakefield, MA 01880
[EMAIL PROTECTED]
www.picis.com

Please visit www.picis.com/meditech for additional information about our
NPR Report Writing Trainings.

The information in this email is confidential and may be legally
privileged. It is intended solely for the addressee. Access or use by
any other person to this internet email is not authorized and may be
unlawful. If you are not the intended recipient, please delete or
destroy this email. If you do not wish to receive future emails from the
sender, please reply directly to this email requesting you be removed
from any mailing list.


Gary Hall
Clinical Applications Specialist
Estes Park Medical Center
Information Systems Department
970-577-4443

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Miller, Anne
Sent: Monday, May 01, 2006 2:11 PM
To: [email protected]
Subject: [MEDITECH-L] image in an NPR report (Magic)

All messages should be posted in plain text.  HTML will be converted to
attachments.    The meditech-l web site is MTUsers.com
======================================





The information contained in this message may be privileged and
confidential and protected from disclosure.  If the reader of this
message is not the intended recipient, or an employee or agent
responsible for delivering this message to the intended recipient, you
are hereby notified that any dissemination, distribution or copying of
this communication is strictly prohibited.  If you have received this
communication in error, please notify the sender of this communication
immediately.




_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l

_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l

Reply via email to