Routine: GMTSPD

Information

GMTSPD ; SLC/JER,KER - Interactive Print-by-Location ; 04/30/2002 [1/26/05 1:50pm]

Source Information

Source file <GMTSPD.m>

Caller Graph

Legends:

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 Total: 1

Package	Total	Caller Graph
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
MAIN	; Interactive Print by Location
SELTYP()	; Select Health Summary type
SELLOC(GMX)	; Select multiple Hospital Location
ASK	; Prompt for One or ALL
ASK2
A1	; Single ? Help
A2	; Double ?? Help
CONT	; Continue Displaying List
C1	; Continue Help
CHKLOC(LOC)	; Get date range for Clinics/ORs
SELDATE()	; Visit/Surgery date range for Print-by-Clinic
CKPAT(LOC)	; Checks for patients at selected location

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: MAIN+9
Function Call: WRITE	Prompt: !,"This Summary Type includes no components...Please choose another." Line Location: SELTYP+7
Function Call: WRITE	Prompt: " ",LAST Line Location: ASK2+4
Function Call: WRITE	Prompt: ! Line Location: ASK2+10
Function Call: WRITE	Prompt: " ??",!!,?5,"Not a ward, clinic or operating room" Line Location: ASK2+11
Function Call: WRITE	Prompt: !," Answer with HOSPITAL LOCATION NAME, or ABBREVIATION, TEAM or 'ALL'" Line Location: A1+1
Function Call: WRITE	Prompt: !," for all hospital locations. Enter '^' to return to Health Summary" Line Location: A1+2
Function Call: WRITE	Prompt: !," Type Selection or '^^' to exit." Line Location: A1+3
Function Call: WRITE	Prompt: ! Line Location: A2+2
Function Call: WRITE	Prompt: !,?3,"Choose from:" Condition for execution: GMTSC=1 Line Location: A2+6
Function Call: WRITE	Prompt: !,?3,GMTSL Line Location: A2+6
Function Call: WRITE	Prompt: !," Enter ether RETURN or '^'" Line Location: C1+1

Customize PDF page

Package: Health Summary