All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Chrys, this is the code that works for us.
in a macro
loop through the procedures
0^C,
@INIT,
[EMAIL PROTECTED](oper.seq.no) [EMAIL
PROTECTED](oper.proc.seq.no) C+1^C,@CLEAN}},
subroutine to put the values in an MV array
CLEAN
@oper.proc^PROC,
""^TXT,
0-1^D,
DO{D+1^D'>L(PROC) IF{PROC#D=".";TXT_(PROC#D)^TXT}},
TXT^/MV[C]
in the report calculated field:
xx.proc3
DAT=FREE
JFY=L
LEN=5
VAL=/MV[3]
The comma at the end of the do loop may have to be re-evaluated. This code was
pulled from the middle of a much larger macro. The subroutine called CLEAN was
actually built to take all the punctuation out of the ICD9 codes. You may not
need that part but you would need the assignment into the /MV[C].
Shirley Hammack
I.T. Financial Analyst
Jackson County Memorial Hospital
580-477-7484
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Chrys Steele
Sent: Thursday, August 10, 2006 8:39 AM
To: [email protected]
Subject: [MEDITECH-L] Report Writer - ABS operations data
All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Does anyone have a report that outputs in a flat file one record for each
of the patient's operations?
The information that I need for each record is acct number, oper.date,
oper.proc, oper.surg, oper.cpt, oper.cpt.mod[1] and oper.cpt.mod[2].
I can get the first 3 fields, but the surgeon only appears with the first
procedure for the oper.seq.no. I haven't been able to pull in the cpt &
modifiers at all.
If you don't have a file layout, but a report that puts them all on one
line, I can use that.
Thanks!
Chrys Steele
Information Systems Director
Springs Memorial Hospital
800 W. Meeting Street
Lancaster, SC 29720
803.286.1357
[EMAIL PROTECTED]
Disclaimer: This electronic message may contain information that is
Confidential or legally privileged. It is intended only for the use of the
individual(s) and entity named in the message. If you are not an intended
recipient of this message, please notify the sender immediately and delete
the material from your computer. Do not deliver, distribute or copy this
message and do not disclose its contents or take any action in reliance on
the information it contains.
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
This email has been scanned by the JCMH McAfee Webshield appliance and has been
cleared for delivery. If you have any concerns or questions, call the IT
Helpdesk at x2646.
The documents accompanying this transmission contain confidential information,
belonging to the sender, that is legally privileged. This information is
intended only for the use of the individual or entity named above. The
authorized recipient of this information is prohibited from disclosing this
information after its stated need has been fulfilled.
If you are not the intended recipient, you are hereby notified that any
reading, disclosure, copying, distribution, or action taken in reliance on the
contents of these documents is strictly prohibited. Violators may be
prosecuted. If you have received this email in error, please notify the sender
immediately and destroy the transmitted information.
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
