Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: WVALERTS

Package: Womens Health

Routine: WVALERTS


Information

WVALERTS ;HIOFO/FT-WV ALERTS APIs ;2/19/04 13:56

Source Information

Source file <WVALERTS.m>

Entry Points

Name Comments DBIA/ICR reference
UPDATE(WVIEN) ; Updates the FILE 790.1 entry identified in WVIEN to
; show it was processed by a Clinical Reminder.
; Input: WVIEN - FILE 790.1 IEN
; Output: <none>
RESULTS(RESULT,WVIEN) ; Returns limited amount of information from the
; WV PROCEDURE file (790.1) for the IEN selected.
; Input: RESULT - Array name to return data in.
; WVIEN - FILE 790.1 IEN
EXIT ;
HS ; Health Summary variable setup
CY ; Call Health Summary extract routine GMTSLRPE to get cytology data.
; Input: LRDFN - FILE 63 ien
; GMTS1 - reverse start date/time (most recent date)
; GMTS2 - reverse end date/time (least recent date)
; MAX - maximum # of occurrences to return
; Returns ^TMP("LRCY",$J)
WEEDCY ; Weed out reports, save only report for lab accession number
; associated with this WH entry.
CYTO ; Move data from ^TMP("LRCY",$J) to RESULT for display.
SP ; Call Health Summary extract routine GMTSLRAE to get surgical
; pathology data.
; Input: LRDFN - FILE 63 ien
; GMTS1 - reverse start date/time (most recent date)
; GMTS2 - reverse end date/time (least recent date)
; MAX - maximum # of occurrences to return
; Returns ^TMP("LRA",$J)
WEEDSP ; Weed out reports, save only report for lab accession number
; associated with this WH entry.
PATH ; Move data from ^TMP("LRA",$J) to RESULT for display
ACCESSN ; Collection date & Lab Accession#
SPEC ; Specimen list
RAD ; get radiology report data

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
70.03 GETS^DIQ
^RARPT - [#74] GETS^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call