GMV WARD LOCATION

TITLEVALUE
NAMEGMV WARD LOCATION
DESCRIPTIONThis procedure extracts MAS ward locations from the Ward Location file
(#42).

Note: No other Input Parameters besides RESULT needed.
TAGWARDLOC
ROUTINEGMVGETD
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDUMMY
DESCRIPTIONWhen this input parameter is set to the letter "P", only wards that have
patients will be returned. Otherwise, all active wards will be returned.
PARAMETER TYPELITERAL
REQUIREDNO
MAXIMUM DATA LENGTH1
RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTIONReturns the global array name containing a list of MAS wards (i.e.,
^TMP($J,"GWARD")).

^TMP($J,"GWARD",n)=piece1^piece2^piece3
where:
piece1 = ward IEN (FILE 42)
piece2 = ward name (FILE 42, Field .01)
piece3 = hospital location IEN (FILE 44)
n is a sequential number starting at 1.

Example:
> S DUMMY="P"
> D WARDLOC^GMVGETD(.RESULT,DUMMY) ZW RESULT
> RESULT="^TMP(540221719,"GWARD")"
> D ^%G
> Global ^TMP($J,"GWARD"
> ^TMP(540221719,"GWARD",1)=2^1AS^2
2)=1^2-AS^1
3)=13^2-ASM^67
4)=25^214-2 DOM^149
5)=3^3AS^128
6)=4^4AS-1^4
7)=22^4B^153
8)=23^4C^155
9)=24^4D^154
10)=12^5NM^63
11)=6^6AS^10
12)=7^7AS^11
13)=8^DOM^23
14)=10^MICU^36
15)=5^NHCU^5
AVAILABILITYRESTRICTED
INACTIVEACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED