Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: GMTSPL

Package: Health Summary

Routine: GMTSPL


Information

GMTSPL ; SLC/JER,KER - Print/Queue HS for Patient Lists ; 02/27/2002 [1/27/05 8:27am]

Source Information

Source file <GMTSPL.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Health Summary 7 SELTYP1^GMTS  EN^GMTS1  ^GMTSLTR  MAIL^GMTSMAIL  (REGDT4,REGDTM4)^GMTSU  $$TYPE^GMTSULT  HEADER^GMTSUP  
VA FileMan 3 (C,NOW)^%DTC  $$GET1^DIQ  ^DIR  
Kernel 1 $$UP^XLFSTR  
Outpatient Pharmacy 1 DFN^PSOSD1  
Scheduling 1 GETPLIST^SDAMA202  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Health Summary 2 GMTSDVR  GMTSPD2  

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Print/Queue for Patient Lists
;
; Call with:
;
; GMTSTYP = Pointer to file 142
; GMTSSC = Pointer to file 44^Hosp Loc Name^
; Hosp Loc Type^Begin Visit/Surg Date^
; Opt end Visit/Surgery Date
; GMTSSC() = GMTSSC - Array of multiple locations
; [GMPSAP] = Optional flag set to 1 if OP Rx
; Action Profile is to print
;
CTRL ; Controls Branching
PAGE ; Pause at BOP for interactive users
NOPAT(LOC) ; Handles unpopulated Hospital location
CLINIC(LOC) ; Gets list of next-day appointments for clinic
WARD(LOC) ; Gets list of patients for a ward
OR(LOC) ; Gets list of patients scheduled for surgery
ORX ; Exit Surgery
PAT(LOC) ; Checks for patients at selected location
DRIVER ; Sets variables for GMTS1 and calls ^%ZTLOAD

External References

Name Field # of Occurrence
C^%DTC CLINIC+7, PAT+5, PAT+23
NOW^%DTC NOPAT+2, CLINIC+3
$$GET1^DIQ MAIN+18, MAIN+19, CTRL+9, NOPAT+7
^DIR PAGE+6
SELTYP1^GMTS DRIVER+8
EN^GMTS1 DRIVER+8
^GMTSLTR CTRL+5
MAIL^GMTSMAIL CLINIC+14, PAT+12
REGDT4^GMTSU CLINIC+4, CLINIC+5, CLINIC+20, WARD+6, OR+9
REGDTM4^GMTSU NOPAT+2
$$TYPE^GMTSULT NOPAT+3, DRIVER+6
HEADER^GMTSUP NOPAT+7, NOPAT+8
DFN^PSOSD1 CTRL+18
GETPLIST^SDAMA202 CLINIC+9, PAT+7
$$UP^XLFSTR DRIVER+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ALL"
  • Line Location: CTRL+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CTRL+9
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: NOPAT+7
Function Call: WRITE
  • Prompt: !!,"No Patients found at ",LOC," location.",!
  • Line Location: NOPAT+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NOPAT+8
Function Call: WRITE
  • Prompt: !!,"No Patients found at ",LOC," location.",!
  • Line Location: NOPAT+8
Routine Call
  • DIR
  • Line Location:
    • PAGE+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMT(142.99 - [#142.99] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] CTRL+17
^DIC(42 - [#42] WARD+2, PAT+3
^DPT - [#2] WARD+7, OR+7
^DPT("CN" WARD+3, WARD+4, PAT+3
^GMT(142 - [#142] NOPAT+2, NOPAT+4, DRIVER+5, DRIVER+7
^GMT(142.99 - [#142.99] CTRL+16
^SC - [#44] MAIN+17, WARD+2, PAT+3
^SRF - [#130] OR+6
^SRF("AOR" OR+4, OR+5, PAT+21, PAT+23
^SRS("B" OR+2, PAT+20
^TMP("GMTSPL" CTRL+1!, CTRL+6, CTRL+7, CTRL+10, CTRL+11, CTRL+19!, CLINIC+23*, WARD+7*, OR+10*, DRIVER+5
^TMP($J CLINIC+12, CLINIC+14, CLINIC+15!, CLINIC+16, CLINIC+18, CLINIC+21, CLINIC+22, CLINIC+24!, PAT+10, PAT+12
, PAT+13!, PAT+15, PAT+16, PAT+17!
^XMB(1 - [#4.3] CTRL+17

Label References

Name Line Occurrences
$$CLINIC CTRL+3
$$PAT MAIN+22
CTRL MAIN+23, MAIN+24, MAIN+27
DRIVER CTRL+13
NOPAT CTRL+7
OR CTRL+3
ORX OR+2
PAGE CTRL+18
WARD CTRL+3

Naked Globals

Name Field # of Occurrence
^( OR+10
^("T" NOPAT+4, DRIVER+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NOPAT+1~, NOPAT+2, CLINIC+1~, OR+1~, PAT+1~
%H NOPAT+1~, CLINIC+1~, OR+1~, PAT+1~
%I NOPAT+1~, CLINIC+1~, OR+1~
%T NOPAT+1~, CLINIC+1~, OR+1~, PAT+1~, DRIVER+1~
%Y NOPAT+1~, CLINIC+1~, OR+1~
BEG MAIN+14~, MAIN+15*, MAIN+16
C DRIVER+1~
COR MAIN+14~, MAIN+19*, MAIN+20, MAIN+21
D0 DRIVER+1~
DFN CTRL+1~, CTRL+13*, PAGE+2, WARD+1~, WARD+4*, WARD+7, OR+1~, OR+6*, OR+7, OR+10
, DRIVER+5
DIC NOPAT+3*!, DRIVER+6*!
DIC(0 NOPAT+3*, DRIVER+6*
DIR PAGE+1~
DIR("?" PAGE+5*
DIR("A" PAGE+4*
DIR(0 PAGE+4*
>> DIROUT MAIN+26, CTRL+10, CTRL+11, CTRL+13, PAGE+6*
DT WARD+6
END MAIN+14~, MAIN+15*, MAIN+16
GMBDT CLINIC+1~, CLINIC+4*, CLINIC+23
GMBEG OR+1~, OR+3*, OR+4*, OR+5, OR+9, PAT+1~, PAT+22*, PAT+23*
GMDATE CLINIC+1~, CLINIC+20*, CLINIC+23
GMDFN CLINIC+1~, CLINIC+21*, CLINIC+23
GMDT CLINIC+1~, WARD+1~, WARD+6*, WARD+7, OR+1~, OR+9*, OR+10
GMDUOUT CTRL+12~, CTRL+13
GMEDT CLINIC+1~, CLINIC+5*, CLINIC+23
GMEND OR+1~, OR+3*, OR+4
GMI CLINIC+1~, CLINIC+2*, CLINIC+16*, CLINIC+18, CLINIC+21, CLINIC+22, OR+1~, OR+2*, OR+4, OR+5
GMJ OR+1~, OR+5*, OR+6
GMLOC WARD+1~, WARD+2*, WARD+3, WARD+4
GMLTYPE CTRL+1~, CTRL+3*
GMNAME CLINIC+1~, CLINIC+22*, CLINIC+23
>> GMPAT( PAGE+2
>> GMPAT("" PAGE+2
GMPNM CTRL+1~, CTRL+10*, CTRL+11, CLINIC+1~, OR+1~, OR+7*, OR+10, DRIVER+5
>> GMPSAP CTRL+14
GMTDFN CTRL+1~, CTRL+11*, CTRL+13
GMTS NOPAT+1~, DRIVER+1~
GMTS0 DRIVER+1~
GMTS1 DRIVER+1~
GMTS2 DRIVER+1~
GMTSAGE DRIVER+3~
GMTSBYE CTRL+2~*, CTRL+3*, CTRL+4
GMTSCDT CLINIC+1~, CLINIC+2*, CLINIC+3*, CLINIC+4, CLINIC+7, CLINIC+9, PAT+1~, PAT+6*, PAT+7, DRIVER+3~
GMTSCDT(0 DRIVER+5*
GMTSDATE PAT+1~, PAT+14*, PAT+16*, PAT+18
GMTSDOB DRIVER+1~
GMTSDTM NOPAT+1~, NOPAT+2*, DRIVER+1~
GMTSEG DRIVER+2~, DRIVER+8
GMTSEGC DRIVER+2~
GMTSEGI DRIVER+2~
GMTSERR CLINIC+11~, CLINIC+12*, CLINIC+13, CLINIC+14, PAT+9~, PAT+10*, PAT+11, PAT+12
GMTSEXIT MAIN+12~*, MAIN+17
GMTSHDR NOPAT+1~
GMTSI PAT+14~*, PAT+15*, PAT+16
GMTSLAST CLINIC+1~, CLINIC+8*, CLINIC+9, CLINIC+19
GMTSLFG NOPAT+1~, NOPAT+4*
GMTSLO DRIVER+1~
GMTSLOCK DRIVER+1~
GMTSLPG DRIVER+2~
GMTSLTR CTRL+1~, CTRL+5*
GMTSPG NOPAT+1~
GMTSPHDR DRIVER+3~
GMTSPNM DRIVER+2~
GMTSRB DRIVER+2~
GMTSRES CLINIC+1~, CLINIC+9, CLINIC+10, PAT+1~, PAT+7, PAT+8
GMTSSC MAIN+15, MAIN+18~, MAIN+20*, MAIN+21*, MAIN+22, MAIN+27*, CTRL+3, CTRL+5, CTRL+7
GMTSSC( MAIN+26, MAIN+27
GMTSSC("ALL" MAIN+13, CTRL+6
GMTSSC(0 MAIN+24, MAIN+25
GMTSSN DRIVER+3~
GMTSTITL NOPAT+1~, NOPAT+4*, DRIVER+3~, DRIVER+7*
GMTSTN NOPAT+1~, NOPAT+2*, NOPAT+3, DRIVER+2~, DRIVER+5*, DRIVER+6
GMTSTOF DRIVER+3~
>> GMTSTYP NOPAT+2, DRIVER+5
GMTSWARD DRIVER+3~
GMTSX DRIVER+3~
GMW DRIVER+4~
GMY PAT+1~*, PAT+3*, PAT+5*, PAT+18*, PAT+20*, PAT+21*, PAT+22, PAT+23*, PAT+24
I DRIVER+4~
IEN MAIN+14~, MAIN+17*, MAIN+18, MAIN+19, MAIN+20
IO CTRL+1
IOF CTRL+9, NOPAT+8
IOSL PAGE+2, PAGE+3
IOST CTRL+5, CTRL+9, PAGE+2
>> IOT PAGE+2
LOC NOPAT~, NOPAT+7, NOPAT+8, CLINIC~, CLINIC+2, CLINIC+5, CLINIC+6, CLINIC+7, CLINIC+9, WARD~
, WARD+2, OR~, OR+2, OR+3, PAT~, PAT+1, PAT+3*, PAT+4, PAT+5, PAT+6
, PAT+7, PAT+20, PAT+21, PAT+22
LTYPE PAT+1~*, PAT+2, PAT+18, PAT+19
MULTLOC MAIN+12~, MAIN+26*, MAIN+27
NAM MAIN+18~*, MAIN+20
OLOC PAT+20~*, PAT+21, PAT+22, PAT+23
PAT MAIN+14~, MAIN+22*
PRM MAIN+14~, MAIN+15*
PSOINST CTRL+1~, CTRL+17*
PSONOPG CTRL+1~, CTRL+15*
PSOPAR CTRL+1~, CTRL+16*
PSTYPE CTRL+1~, CTRL+15*
RAN MAIN+14~, MAIN+16*, MAIN+21
SEX DRIVER+4~
U CTRL+3, CTRL+5, CTRL+7, CTRL+16, CTRL+17, NOPAT+4, CLINIC+2, CLINIC+5, CLINIC+6, CLINIC+7
, CLINIC+22, WARD+2, WARD+7, OR+3, OR+7, PAT+1, PAT+3, PAT+4, PAT+5, PAT+6
, PAT+21, PAT+22, DRIVER+7
VA DRIVER+4~
VADM DRIVER+4~
VAIN DRIVER+4~
VAINDT DRIVER+4~
VAROOT DRIVER+4~
VDT CLINIC+1~
X PAGE+1~, PAGE+6, NOPAT+1~, NOPAT+2*, NOPAT+3*, CLINIC+1~, CLINIC+3, CLINIC+4*, CLINIC+5*, CLINIC+8
, CLINIC+17~, CLINIC+18*, CLINIC+19, CLINIC+20, WARD+1~, WARD+5~, WARD+6*, OR+1~, OR+8~, OR+9*
, PAT+1~, PAT+7, PAT+16, PAT+18, PAT+23, DRIVER+4~, DRIVER+6*
X1 CLINIC+1~, CLINIC+6*, CLINIC+7*, OR+1~, PAT+1~, PAT+5*, PAT+23*
X2 CLINIC+1~, CLINIC+6*, CLINIC+7*, OR+1~, PAT+1~, PAT+5*, PAT+23*
Y PAGE+1~, NOPAT+1~, NOPAT+3*, NOPAT+4, CLINIC+1~, WARD+1~, OR+1~, PAT+1~, DRIVER+4~, DRIVER+6*
, DRIVER+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All