Routine: ORWU

Information

ORWU ; SLC/KCM - General Utilites for Windows Calls;17-May-2010 08:32;PLS

Source Information

Source file <ORWU.m>

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Kernel	7	$$UP^XLFSTR ($$PATCH,$$VERSION)^XPDUTL $$ACCESS^XQCHK $$KSP^XUPARAM $$PROD^XUPROD HASH^XUSHSHP $$DECRYP^XUSRB1
VA Fileman	4	^%DT FIND^DIC FIELD^DID $$ROOT^DILFD
Registration	2	WIN^DGPMDDCF $$SITE^VASITE
Order Entry Results Reporting	1	NP1^ORWU1
Toolkit	1	($$GET,GETLST)^XPAR

Package	Total	Caller Graph
Order Entry Results Reporting	8	ORCMENU1 ORQPTQ2 ORQQVS ORQRY01 ORRHCQ ORWDXM2 ORWGN ORWU1
Tracking Procedure Workflow	2	BTPWTIUN BTPWTIUT

Entry Points

Name	Comments	DBIA/ICR reference
DT(Y,X,%DT)	; Internal Fileman Date/Time ; change the '00:00' that could be passed so Fileman doesn't reject
INPLOC(Y,FROM,DIR)	;Return a set of wards from HOSPITAL LOCATION ; .Y=returned list, FROM=text to $O from, DIR=$O direction,
DEVICE(Y,FROM,DIR)	; Return a subset of entries from the Device file ; .LST(n)=IEN;Name^DisplayName^Location^RMar^PLen ; FROM=text to $O from, DIR=$O direction
USERINFO(REC)	; Relevant info for current user ; return DUZ^NAME^USRCLS^CANSIGN^ISPROVIDER^ORDERROLE^NOORDER^DTIME^ ; COUNTDOWN^ENABLEVERIFY^NOTIFYAPPS^MSGHANG^DOMAIN^SERVICE^ ; AUTOSAVE^INITTAB^LASTTAB^WEBACCESS^ALLOWHOLD^ISRPL^RPLLIST^ ; CORTABS^RPTTAB^STANUM^GECSTATUS^PRODACCT
EXTNAME(VAL,IEN,FN)	; return external form of pointer ; IEN=internal number, FN=file number
HOSPLOC(Y,FROM,DIR)	; Return a set of locations from HOSPITAL LOCATION ; .Y=returned list, FROM=text to $O from, DIR=$O direction,
HASOPTN(VAL,OPTION)	; returns TRUE if the user has access to a menu option
CLINLOC(Y,FROM,DIR)	; Return a set of clinics from HOSPITAL LOCATION ; .Y=returned list, FROM=text to $O from, DIR=$O direction,
URGENCY(Y)	; -- retrieve set values from dd for discharge summary urgency
ORDROLE()	; returns the role a person takes in ordering ; VAL: 0=nokey, 1=clerk, 2=nurse, 3=physician, 4=student, 5=bad keys
NPHASKEY(VAL,NP,KEY)	; returns TRUE if the person has the security key
VERSRV(VAL,X,CLVER)	; Return server version of option name
HASKEY(VAL,KEY)	; returns TRUE if the user possesses the security key
GBLREF(VAL,FN)	; return global reference for file number
VERSION(VAL,X)	;Return version of package or namespace
VALIDSIG(ESOK,X)	; returns TRUE if valid electronic signature
NEWPERS(ORY,ORFROM,ORDIR,ORKEY,ORDATE,ORVIZ,ORALL)	; Return a set of names from the NEW PERSON file. ; SLC/PKS: Code moved to ORWU1 on 12/3/2002.
TOOLMENU(ORLST)	; returns a list of items for the Tools menu
VALDT(Y,X,%DT)	; Validate date/time
PARAM(VAL,APARAM)	; return a parameter value for a user ; call assumes current user, default entities, single instance
ACTLOC(LOC)	; Function: returns TRUE if active hospital location ; IA# 10040.
PATCH(VAL,X)	; Return 1 if patch X is installed
GENERIC(Y,FROM,DIR,REF)	; Return a set of entries from xref in REF ; .Y=returned list, FROM=text to $O from, DIR=$O direction,
PARAMS(ORLIST,APARAM)	; return a list of parameter values ; call assumes current user, default entities, multiple instances

External References

Name	Field # of Occurrence
^%DT	DT+3, VALDT+1
WIN^DGPMDDCF	ACTLOC+3
FIND^DIC	VERSRV+3
FIELD^DID	URGENCY+2
$$ROOT^DILFD	GBLREF+2
NP1^ORWU1	NEWPERS+2
$$SITE^VASITE	USERINFO+66
$$UP^XLFSTR	USERINFO+50
$$GET^XPAR	USERINFO+11, USERINFO+12, USERINFO+14, USERINFO+15, USERINFO+17, USERINFO+18, USERINFO+21, USERINFO+22, USERINFO+23, USERINFO+24 , USERINFO+25, USERINFO+67, PARAM+2
GETLST^XPAR	TOOLMENU+3, PARAMS+2
$$PATCH^XPDUTL	PATCH+1
$$VERSION^XPDUTL	VERSION+1
$$ACCESS^XQCHK	HASOPTN+1
$$KSP^XUPARAM	USERINFO+19
$$PROD^XUPROD	USERINFO+68
HASH^XUSHSHP	VALIDSIG+2
$$DECRYP^XUSRB1	VALIDSIG+1

Used in RPC

RPC Name	Call Tags
ORWU USERINFO	USERINFO
ORWU VALIDSIG	VALIDSIG
ORWU HOSPLOC	HOSPLOC
ORWU NEWPERS	NEWPERS
ORWU DEVICE	DEVICE
ORWU DT	DT
ORWU CLINLOC	CLINLOC
ORWU EXTNAME	EXTNAME
ORWU TOOLMENU	TOOLMENU
ORWU HASKEY	HASKEY
ORWU PATCH	PATCH
ORWU GENERIC	GENERIC
ORWU VALDT	VALDT
ORWU VERSRV	VERSRV
ORWU NPHASKEY	NPHASKEY
ORWU GBLREF	GBLREF
ORWU INPLOC	INPLOC
ORWU PARAM	PARAM
ORWU HAS OPTION ACCESS	HASOPTN
ORWU VERSION	VERSION
ORWU PARAMS	PARAMS

FileNo	Call Tags
^DIC(19 - [#19]	FIND^DIC
^TIU(8925 - [#8925]	FIELD^DID

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	DEVICE+5, DEVICE+6, DEVICE+8
^%ZIS(2 - [#3.2]	DEVICE+9
^DIC - [#1]	EXTNAME+2
^ORD(101.13 - [#101.13]	USERINFO+46
^SC - [#44]	ACTLOC+2, ACTLOC+3, ACTLOC+4, CLINLOC+5, INPLOC+5, HOSPLOC+5
^SC("B"	CLINLOC+3, CLINLOC+4, INPLOC+3, INPLOC+4, HOSPLOC+3, HOSPLOC+4
^VA(200 - [#200]	USERINFO+6, USERINFO+20, USERINFO+28, USERINFO+39, USERINFO+40, VALIDSIG+3, TOOLMENU+2
^XUSEC(	HASKEY+1, NPHASKEY+1
^XUSEC("ORELSE"	USERINFO+7, ORDROLE+3, ORDROLE+5
^XUSEC("OREMAS"	USERINFO+7, ORDROLE+3, ORDROLE+4
^XUSEC("ORES"	USERINFO+7, USERINFO+8, ORDROLE+3, ORDROLE+6
^XUSEC("PROVIDER"	USERINFO+8, USERINFO+9, ORDROLE+6, ORDROLE+7

Label References

Name	Line Occurrences
$$ACTLOC	CLINLOC+5, INPLOC+6, HOSPLOC+5
$$ORDROLE	USERINFO+10

Naked Globals

Name	Field # of Occurrence
^("SUBTYPE"	DEVICE+8
^("TIME"	DEVICE+8
^("TYPE"	DEVICE+8
^(0	DEVICE+8
^(1	DEVICE+8
^(5	TOOLMENU+2
^(90	DEVICE+8
^(91	DEVICE+8
^(95	DEVICE+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DT~, DT+3!, VALDT~, VALDT+1
ANENT	TOOLMENU+1~, TOOLMENU+2*, TOOLMENU+3
APARAM	PARAM~, PARAM+2, PARAMS~, PARAMS+2
BADVAL	VERSRV+2~, VERSRV+7, VERSRV+8, VERSRV+9, VERSRV+10, VERSRV+11*, VERSRV+12
CLVER	VERSRV~, VERSRV+1
CNT	CLINLOC+2~, CLINLOC+3, INPLOC+2~, INPLOC+3, HOSPLOC+2~, HOSPLOC+3, GENERIC+2~, GENERIC+3, DEVICE+3~*, DEVICE+5
CORTABS	USERINFO+5~, USERINFO+37, USERINFO+59, USERINFO+63
D0	ACTLOC+2~, ACTLOC+3*
DIR	CLINLOC~, CLINLOC+3, CLINLOC+4, INPLOC~, INPLOC+3, INPLOC+4, HOSPLOC~, HOSPLOC+3, HOSPLOC+4, GENERIC~ , GENERIC+3, GENERIC+4, DEVICE~, DEVICE+5
DT	USERINFO+36, ACTLOC+5, DEVICE+13
DTIME	USERINFO+13
DUZ	USERINFO+6, USERINFO+7, USERINFO+8, USERINFO+9, USERINFO+20, USERINFO+28, USERINFO+39, USERINFO+40, HASKEY+1, HASOPTN+1 , ORDROLE+3, ORDROLE+4, ORDROLE+5, ORDROLE+6, ORDROLE+7, VALIDSIG+3, TOOLMENU+2
DUZ(0	DEVICE+16
ESOK	VALIDSIG~, VALIDSIG+1, VALIDSIG+3
FN	GBLREF~, GBLREF+1, GBLREF+2, EXTNAME~, EXTNAME+2
FROM	CLINLOC~, CLINLOC+3, CLINLOC+4, CLINLOC+6, INPLOC~, INPLOC+3, INPLOC+4, INPLOC+7, HOSPLOC~, HOSPLOC+3* , HOSPLOC+4, HOSPLOC+6, GENERIC~, GENERIC+3, GENERIC+4, GENERIC+5, DEVICE~, DEVICE+4, DEVICE+5*, DEVICE+6 , DEVICE+18
I	CLINLOC+2~, CLINLOC+3, CLINLOC+6, INPLOC+2~, INPLOC+3, INPLOC+7, HOSPLOC+2~, HOSPLOC+3, HOSPLOC+6, GENERIC+2~* , GENERIC+3, GENERIC+5, DEVICE+3~, DEVICE+5, DEVICE+19, URGENCY+1~, URGENCY+3
IEN	CLINLOC+2~, CLINLOC+4, CLINLOC+5, CLINLOC+6, INPLOC+2~, INPLOC+4, INPLOC+5, INPLOC+6, INPLOC+7, HOSPLOC+2~ , HOSPLOC+4, HOSPLOC+5, HOSPLOC+6, GENERIC+2~, GENERIC+4, GENERIC+5, EXTNAME~, EXTNAME+3, DEVICE+3~, DEVICE+6* , DEVICE+8, DEVICE+19
KEY	HASKEY~, HASKEY+1, NPHASKEY~, NPHASKEY+1
LOC	ACTLOC~, ACTLOC+2, ACTLOC+3, ACTLOC+4
NP	NPHASKEY~, NPHASKEY+1
OPTION	HASOPTN~, HASOPTN+1
ORA	DEVICE+7~, DEVICE+14, DEVICE+16
ORALL	NEWPERS~
ORDATE	NEWPERS~
ORDATEOK	USERINFO+5~, USERINFO+51, USERINFO+52, USERINFO+53, USERINFO+55, USERINFO+56, USERINFO+59, USERINFO+60
ORDD	URGENCY+1~
ORDD("POINTER"	URGENCY+3
ORDIR	NEWPERS~
ORDT	USERINFO+5~, USERINFO+36*, USERINFO+52, USERINFO+55, USERINFO+56
OREFF	USERINFO+5~, USERINFO+42*, USERINFO+52
OREXP	USERINFO+5~, USERINFO+43*, USERINFO+54, USERINFO+55, USERINFO+56
ORFROM	NEWPERS~
ORKEY	NEWPERS~
ORLIST	PARAMS~, PARAMS+2
ORLST	TOOLMENU~, TOOLMENU+3, VERSRV+2~
ORLST("DILIST"	VERSRV+4, VERSRV+5
>> ORPCNT	DEVICE+14*
ORPX	DEVICE+7~, DEVICE+14, DEVICE+16
ORRPL	USERINFO+5~, USERINFO+28, USERINFO+29, USERINFO+31, USERINFO+38, USERINFO+39*, USERINFO+40
ORRPL1	USERINFO+5~, USERINFO+29*, USERINFO+30
ORRPL2	USERINFO+5~, USERINFO+31*, USERINFO+32
ORTAB	USERINFO+5~, USERINFO+40, USERINFO+41, USERINFO+42, USERINFO+43, USERINFO+44, USERINFO+45, USERINFO+46, USERINFO+47, USERINFO+48 , USERINFO+49, USERINFO+50*, USERINFO+59, USERINFO+60
ORVIZ	NEWPERS~
>> ORWCLVER	VERSRV+1*
ORY	NEWPERS~
POP	DEVICE+7~, DEVICE+15, DEVICE+16, DEVICE+17
REC	USERINFO~, USERINFO+6, USERINFO+7, USERINFO+8, USERINFO+9, USERINFO+10, USERINFO+11, USERINFO+12, USERINFO+13, USERINFO+14* , USERINFO+16, USERINFO+17, USERINFO+18, USERINFO+19, USERINFO+20, USERINFO+21, USERINFO+22, USERINFO+23, USERINFO+24, USERINFO+25 , USERINFO+30, USERINFO+32, USERINFO+63, USERINFO+64, USERINFO+66, USERINFO+67, USERINFO+68*
REF	GENERIC~, GENERIC+3, GENERIC+4, EXTNAME+2~*, EXTNAME+3
RPTTAB	USERINFO+5~, USERINFO+37, USERINFO+60, USERINFO+64
SHOW	DEVICE+3~, DEVICE+18*, DEVICE+19
U	USERINFO+6, USERINFO+7, USERINFO+8, USERINFO+9, USERINFO+10, USERINFO+11, USERINFO+12, USERINFO+13, USERINFO+14, USERINFO+16 , USERINFO+17, USERINFO+18, USERINFO+19, USERINFO+20, USERINFO+21, USERINFO+22, USERINFO+23, USERINFO+24, USERINFO+25, USERINFO+29 , USERINFO+30, USERINFO+31, USERINFO+32, USERINFO+42, USERINFO+43, USERINFO+44, USERINFO+48, USERINFO+63, USERINFO+64, USERINFO+66 , USERINFO+67, USERINFO+68, VALIDSIG+3, ACTLOC+5, CLINLOC+5, INPLOC+5, HOSPLOC+5, EXTNAME+3, DEVICE+12, DEVICE+18 , DEVICE+19
VAL	HASKEY~, HASKEY+1, HASOPTN~, HASOPTN+1, HASOPTN+2, HASOPTN+3, NPHASKEY~, NPHASKEY+1, GBLREF~, GBLREF+1 , GBLREF+2, EXTNAME~, EXTNAME+2, EXTNAME+3, PARAM~, PARAM+2, PATCH~, PATCH+1, VERSION~, VERSION+1 , VERSRV~, VERSRV+4, VERSRV+5, VERSRV+6, VERSRV+8, VERSRV+9, VERSRV+10, VERSRV+11, VERSRV+12
X	DT~, DT+2, VALDT~, USERINFO+5~, USERINFO+15, USERINFO+16, VALIDSIG~, VALIDSIG+1, VALIDSIG+3, ACTLOC+2~ , ACTLOC+3, ACTLOC+4, ACTLOC+5, DEVICE+3~, DEVICE+11, DEVICE+12, DEVICE+13, URGENCY+1~, URGENCY+3, PATCH~ , PATCH+1, VERSION~, VERSION+1, VERSRV~, VERSRV+3
X0	DEVICE+7~, DEVICE+8*, DEVICE+12, DEVICE+18, DEVICE+19
X1	DEVICE+7~, DEVICE+8*, DEVICE+19
X90	DEVICE+7~, DEVICE+8*, DEVICE+13
X91	DEVICE+7~, DEVICE+8*, DEVICE+19
X95	DEVICE+7~, DEVICE+8*, DEVICE+16
XSTYPE	DEVICE+7~, DEVICE+8*, DEVICE+9
XTIME	DEVICE+7~, DEVICE+8*, DEVICE+14
XTYPE	DEVICE+7~, DEVICE+8*, DEVICE+11
Y	DT~, VALDT~, CLINLOC~, INPLOC~, HOSPLOC~, GENERIC~, DEVICE~, URGENCY~
Y(	CLINLOC+6, INPLOC+7, HOSPLOC+6, GENERIC+5, DEVICE+19, URGENCY+3

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORWU

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: