GMTSDVR ; SLC/JER,KER - Health Summary Driver ; 04/30/2002
Source file <GMTSDVR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MAIN | ; Control branching
|
|
PTPC | ; Combined Patient/Patient Copy
|
|
PATCOPY(GMP,GMPAT) | ; Copies patients from GMP to GMPAT array
|
|
RESUB(GMP) | ; Resubscript GMP Array
; Subscripts in GMP array are converted to numeric |
|
ENXQ | ; External call for tasked HS print
; ; Input: GMTSTYP=Record # of HS type in file 142 ; DFN=Record # of patient in file 2 ; GMTSPX1=Optional internal FM ending date ; GMTSPX2=Optional internal FM beginning date ; ; NOTE: Optional date range variables are both ; required if a date range is desired. ; ; To call from TaskMan: ; S ZTRTN="ENXQ^GMTSDVR" ; S ZTSAVE("GMTSTYP")="" ; S ZTSAVE("DFN")="" ; D ^%ZTLOAD |
|
ENX(DFN,GMTSTYP,GMTSPX2,GMTSPX1) | ; External call to print a Health Summary
; ; Input: GMTSTYP=Record # of HS type in file 142 ; DFN=Record # of patient in file 2 ; GMTSPX1=Optional internal FM ending date ; GMTSPX2=Optional internal FM beginning date ; ; NOTE: Optional date range variables are both ; required if a date range is desired. ; |
|
SELTYP | ; Select Health Summary Type(s)
|
|
PQ | ; Queued subroutine for HS by patient
|
|
LOADSEG | ; Load Enabled Components into GMTSEG Array
|
|
SELFILE | ; Get Selection item information for GMTSEG(
|
|
HSOUT | ; Output summary, with device control
; Call with: ZTRTN |
|
NOQUE | ; Do Not Queue Output
|
|
QUE | ; Queue output
|
|
ACTPROF(GMDFN) | ; Print Action Profile for Patient
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|