All messages should be posted in plain text. HTML will be converted to attachments. The meditech-l web site is MTUsers.com ======================================
Well, since I sent the message (below) earlier today, I discovered that if I think inside the box then things aren't so hard. The attached report is the current incarnation that does what I need. Instead of using BAR.PROC as a baseline, I used BAR.PAT's transaction segment to get a list of procedures not used since xx date. I had to use some reverse logic in the line check of the detail line, and then print only the TK line if the logic was satisfied. The downside? No inclusive index for txn.ser.date or txn.procedure in BAR, which means it'll take eons to run, but not as many as if I had to do it for each procedure in turn. To test, I just set a Z.record.limit and reduced the time frame from 5 years to a few days. But it seems to work. I still welcome other ideas on this one, but for those needing a jump start, perhaps the attached report will help. Douglas B. McGaw Hospital Info Svcs Coordinator Newman Regional Health 1201 W. 12th Ave. Emporia, KS 66801 Voice: 620-343-6800 x 1130 Fax: 620-340-6133 Email: [EMAIL PROTECTED] -----Original Message----- From: McGaw, Douglas Sent: Wednesday, May 24, 2006 9:03 AM To: [email protected] Subject: ?Looking for Report that lists charge procedures NOT used in 5 years Our accounting dept presented me with a "simple" request: List all charge procedures not used in 5 years. The idea is logical and elegant. The execution, however, looks to be difficult (as in impossible?) I considered starting in BAR.PROC to list the charge procedures, then fragmenting over to BAR.PAT transaction segment to pick up whether a particular procedure has been done in the last 5 years. But can you imagine the month of Sundays it would take to do this? Then I considered trying to scan the BAR.PAT fragment only once and set up an MV array before coming back to the BAR.PROC, but I don't see how this would work. Before I beat myself silly over this, I thought I'd send out an SOS to the "L" to see if anyone has already invented this wheel. Douglas B. McGaw Hospital Info Svcs Coordinator Newman Regional Health 1201 W. 12th Ave. Emporia, KS 66801 Voice: 620-343-6800 x 1130 Fax: 620-340-6133 Email: [EMAIL PROTECTED]
notused.npr
Description: notused.npr
_______________________________________________ meditech-l mailing list [email protected] http://mtusers.com/mailman/listinfo/meditech-l
