ORWU ;SLC/KCM - GENERAL UTILITIES FOR WINDOWS CALLS ;Jul 10, 2023@09:32:14
Source file <ORWU.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 8 | ENCODE^XLFJSON $$UP^XLFSTR ($$PATCH,$$VERSION)^XPDUTL $$ACCESS^XQCHK $$KSP^XUPARAM $$PROD^XUPROD HASH^XUSHSHP $$DECRYP^XUSRB1 |
Order Entry Results Reporting | 8 | ACCESS^ORACCESS GETPAR^ORDSTCTB GETSERIES^ORFEDT NEWPERSON^ORNEWPERS GETPAR^ORPDMP SHWOTHER^ORWOTHER (EXCPLST,LDCPIDNT,PCTCOPY,VIEWCOPY,WRDCOPY)^ORWTIU NP1^ORWU1 |
VA FileMan | 4 | ^%DT FIND^DIC FIELD^DID $$ROOT^DILFD |
Registration | 2 | WIN^DGPMDDCF $$SITE^VASITE |
Toolkit | 1 | ($$GET,GETLST)^XPAR |
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 |
|
VALDT(Y,X,%DT) | ; Validate date/time
|
|
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^^JOB NUMBER^EVALREMONDIALOG |
|
HASKEY(VAL,KEY) | ; returns TRUE if the user possesses the security key
|
|
HASOPTN(VAL,OPTION) | ; returns TRUE if the user has access to a menu option
|
|
NPHASKEY(VAL,NP,KEY) | ; returns TRUE if the person has the security key
|
|
ORDROLE() | ; returns the role a person takes in ordering
; VAL: 0=nokey, 1=clerk, 2=nurse, 3=physician, 4=student, 5=bad keys |
|
VALIDSIG(ESOK,X) | ; returns TRUE if valid electronic signature
|
|
TOOLMENU(ORLST) | ; returns a list of items for the Tools menu
|
|
ACTLOC(LOC) | ; Function: returns TRUE if active hospital location
; IA# 10040. |
|
CLINLOC(Y,FROM,DIR) | ; Return a set of clinics from HOSPITAL LOCATION
; .Y=returned list, FROM=text to $O from, DIR=$O direction, |
|
INPLOC(Y,FROM,DIR) | ;Return a set of wards from HOSPITAL LOCATION
; .Y=returned list, FROM=text to $O from, DIR=$O direction, |
|
HOSPLOC(Y,FROM,DIR) | ; Return a set of locations from HOSPITAL LOCATION
; .Y=returned list, FROM=text to $O from, DIR=$O direction, |
|
NEWPERS(ORY,ORFROM,ORDIR,ORKEY,ORDATE,ORVIZ,ORALL,ORPDMP,ORSIM,OREXCLDE,ORNVA) | ; Return a set of names from the NEW PERSON file.
|
|
GBLREF(VAL,FN) | ; return global reference for file number
|
|
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, |
|
EXTNAME(VAL,IEN,FN) | ; return external form of pointer
; IEN=internal number, FN=file number |
|
PARAM(VAL,APARAM) | ; return a parameter value for a user
; call assumes current user, default entities, single instance |
|
PARAMS(ORLIST,APARAM) | ; return a list of parameter values
; call assumes current user, default entities, multiple instances |
|
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 |
|
URGENCY(Y) | ; -- retrieve set values from dd for discharge summary urgency
|
|
PATCH(VAL,X) | ; Return 1 if patch X is installed
|
|
VERSION(VAL,X) | ;Return version of package or namespace
|
|
VERSRV(VAL,X,CLVER) | ; Return server version of option name
|
|
OVERDL(VAL) | ;Return parameter value of ORPARAM OVER DATELINE
|
|
MOBAPP(VAL,ORAPP) | ;set ^TMP($J,"OR MOB APP")
|
|
JSYSPARM(RESULTS,USER) | ;
|
|
FLDINFO(ORY,FILE,FIELD,FLAGS,ATTRIBS) | ; Get field attributes
|
Name | Field # of Occurrence |
---|---|
^%DT | DT+3, VALDT+1 |
WIN^DGPMDDCF | ACTLOC+3 |
FIND^DIC | VERSRV+3 |
FIELD^DID | URGENCY+2, FLDINFO+2 |
$$ROOT^DILFD | GBLREF+2 |
ACCESS^ORACCESS | JSYSPARM+50 |
GETPAR^ORDSTCTB | JSYSPARM+45 |
GETSERIES^ORFEDT | JSYSPARM+49 |
NEWPERSON^ORNEWPERS | NEWPERS+8 |
GETPAR^ORPDMP | JSYSPARM+44 |
SHWOTHER^ORWOTHER | JSYSPARM+43 |
EXCPLST^ORWTIU | JSYSPARM+28 |
LDCPIDNT^ORWTIU | JSYSPARM+18 |
PCTCOPY^ORWTIU | JSYSPARM+10 |
VIEWCOPY^ORWTIU | JSYSPARM+14 |
WRDCOPY^ORWTIU | JSYSPARM+6 |
NP1^ORWU1 | NEWPERS+12 |
$$SITE^VASITE | USERINFO+66 |
ENCODE^XLFJSON | JSYSPARM+52 |
$$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, USERINFO+69, USERINFO+71, NEWPERS+4, PARAM+2, OVERDL+1, JSYSPARM+3, JSYSPARM+32, JSYSPARM+33 , JSYSPARM+34, JSYSPARM+42, JSYSPARM+47, JSYSPARM+48 |
GETLST^XPAR | TOOLMENU+3, TOOLMENU+6, PARAMS+2, JSYSPARM+22, JSYSPARM+38 |
$$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 |
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 |
ORWU OVERDL | OVERDL |
ORWU MOBAPP | MOBAPP |
ORWU SYSPARAM | JSYSPARM |
ORWU FLDINFO | FLDINFO |
FileNo | Call Tags |
---|---|
^DIC(19 - [#19] | FIND^DIC |
^TIU(8925 - [#8925] | FIELD^DID |
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 |
^TMP($J | MOBAPP+1*, JSYSPARM+2, JSYSPARM+52 |
^VA(200 - [#200] | USERINFO+6, USERINFO+20, USERINFO+28, USERINFO+39, USERINFO+40, VALIDSIG+3, TOOLMENU+4 |
^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 |
Name | Line Occurrences |
---|---|
$$ACTLOC | CLINLOC+5, INPLOC+6, HOSPLOC+5 |
$$ORDROLE | USERINFO+10 |
NEWPERS | NEWPERS+6 |
Name | Field # of Occurrence |
---|---|
^("SUBTYPE" | DEVICE+8 |
^("TIME" | DEVICE+8 |
^("TYPE" | DEVICE+8 |
^(0 | DEVICE+8 |
^(1 | DEVICE+8 |
^(5 | TOOLMENU+4 |
^(90 | DEVICE+8 |
^(91 | DEVICE+8 |
^(95 | DEVICE+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DT~, DT+3*!, VALDT~, VALDT+1* |
ANENT | TOOLMENU+1~, TOOLMENU+2*, TOOLMENU+3, TOOLMENU+4*, TOOLMENU+6 |
APARAM | PARAM~, PARAM+2, PARAMS~, PARAMS+2 |
ATTRIBS | FLDINFO~, FLDINFO+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 |
CNT2 | JSYSPARM+21~, JSYSPARM+23*, JSYSPARM+24*, JSYSPARM+25, JSYSPARM+27~, JSYSPARM+29*, JSYSPARM+30*, JSYSPARM+31, JSYSPARM+37~, JSYSPARM+39* , JSYSPARM+40*, JSYSPARM+41 |
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+12 |
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+4, JSYSPARM+14 |
DUZ(0 | DEVICE+15 |
DUZ(2 | JSYSPARM+6, JSYSPARM+10, JSYSPARM+14 |
ESOK | VALIDSIG~, VALIDSIG+1*, VALIDSIG+3* |
FIELD | FLDINFO~, FLDINFO+2 |
FILE | FLDINFO~, FLDINFO+2 |
FLAGS | FLDINFO~, FLDINFO+2 |
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+17 |
I | CLINLOC+2~*, CLINLOC+3, CLINLOC+6*, INPLOC+2~*, INPLOC+3, INPLOC+7*, HOSPLOC+2~*, HOSPLOC+3, HOSPLOC+6*, NEWPERS+5~ , NEWPERS+7*, GENERIC+2~*, GENERIC+3, GENERIC+5*, DEVICE+3~*, DEVICE+5, DEVICE+18*, URGENCY+1~, URGENCY+3* |
IDX | FLDINFO+1~, FLDINFO+3*, FLDINFO+4 |
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+18 |
KEY | HASKEY~, HASKEY+1, NPHASKEY~, NPHASKEY+1 |
LINE | FLDINFO+1~, FLDINFO+3*, FLDINFO+4* |
LOC | ACTLOC~, ACTLOC+2, ACTLOC+3, ACTLOC+4 |
NP | NPHASKEY~, NPHASKEY+1 |
OPTION | HASOPTN~, HASOPTN+1 |
ORA | DEVICE+7~, DEVICE+13*, DEVICE+15* |
ORALL | NEWPERS~ |
ORAPP | MOBAPP~, MOBAPP+1 |
ORCNT | TOOLMENU+1~, TOOLMENU+5*, TOOLMENU+8*, TOOLMENU+9 |
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 |
OREXCLDE | NEWPERS~, NEWPERS+1* |
OREXP | USERINFO+5~, USERINFO+43*, USERINFO+54, USERINFO+55, USERINFO+56 |
ORFROM | NEWPERS~ |
ORKEY | NEWPERS~ |
ORLIST | PARAMS~, PARAMS+2, JSYSPARM+21~, JSYSPARM+22, JSYSPARM+27~, JSYSPARM+28, JSYSPARM+37~, JSYSPARM+38 |
ORLIST( | JSYSPARM+24, JSYSPARM+25, JSYSPARM+30, JSYSPARM+31, JSYSPARM+40, JSYSPARM+41 |
ORLST | TOOLMENU~, TOOLMENU+3, VERSRV+2~ |
ORLST( | TOOLMENU+9* |
ORLST("" | TOOLMENU+5 |
ORLST("DILIST" | VERSRV+4, VERSRV+5 |
ORNVA | NEWPERS~, NEWPERS+2* |
ORPCNT | DEVICE+7~, DEVICE+13* |
ORPDMP | NEWPERS~ |
ORPX | DEVICE+7~, DEVICE+13*, DEVICE+15* |
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 |
ORSIM | NEWPERS~ |
ORT | TOOLMENU+1~, TOOLMENU+7*, TOOLMENU+9 |
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 |
ORTLST | TOOLMENU+1~, TOOLMENU+6 |
ORTLST( | TOOLMENU+7, TOOLMENU+9 |
ORVIZ | NEWPERS~ |
>> ORWCLVER | VERSRV+1* |
ORY | NEWPERS~, NEWPERS+8, FLDINFO~ |
ORY( | FLDINFO+4* |
OUT | FLDINFO+1~ |
OUT( | FLDINFO+3, FLDINFO+4 |
PARAMS | NEWPERS+5~, NEWPERS+8 |
PARAMS( | NEWPERS+7* |
PARAMS("HELP" | NEWPERS+5* |
POP | DEVICE+7~, DEVICE+14*, DEVICE+15*, DEVICE+16 |
PRM | NEWPERS+5~, NEWPERS+6*, NEWPERS+7 |
PRM(0 | NEWPERS+5*, NEWPERS+7 |
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*, USERINFO+69*, USERINFO+70*, USERINFO+71* |
REF | GENERIC~, GENERIC+3, GENERIC+4, EXTNAME+2~*, EXTNAME+3 |
RESULTS | JSYSPARM~, JSYSPARM+2* |
RPTTAB | USERINFO+5~, USERINFO+37*, USERINFO+60*, USERINFO+64 |
SHOW | DEVICE+3~, DEVICE+17*, DEVICE+18 |
TEMP | JSYSPARM+1~, JSYSPARM+43, JSYSPARM+44, JSYSPARM+45, JSYSPARM+49, JSYSPARM+50 |
TEMP("ResponsiveGUI" | JSYSPARM+48* |
TEMP("cpCopyBufferDisable" | JSYSPARM+32* |
TEMP("cpExcludeApps" | JSYSPARM+25* |
TEMP("cpExcludeNotes" | JSYSPARM+31* |
TEMP("cpIdentifiers" | JSYSPARM+19* |
TEMP("cpPercentCopy" | JSYSPARM+11* |
TEMP("cpViewCopy" | JSYSPARM+15* |
TEMP("cpWordCopy" | JSYSPARM+7* |
TEMP("orCPRSExceptionEmail" | JSYSPARM+41* |
TEMP("orCPRSExceptionLogger" | JSYSPARM+34* |
TEMP("orCPRSExceptionPurge" | JSYSPARM+33* |
TEMP("psoParkOn" | JSYSPARM+42* |
TEMP("reEvaluateReminders" | JSYSPARM+3* |
TEMP("tmRequiredFldsOff" | JSYSPARM+47* |
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, USERINFO+69, USERINFO+70, USERINFO+71, VALIDSIG+3, ACTLOC+5, CLINLOC+5, INPLOC+5, HOSPLOC+5 , NEWPERS+7, EXTNAME+3, DEVICE+11, DEVICE+17, DEVICE+18, JSYSPARM+25, JSYSPARM+31, JSYSPARM+41, FLDINFO+4 |
USER | JSYSPARM~, JSYSPARM+43, JSYSPARM+44, JSYSPARM+45, JSYSPARM+50 |
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*, OVERDL~ , OVERDL+1*, MOBAPP~, MOBAPP+2* |
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+10*, DEVICE+11*, DEVICE+12*, URGENCY+1~, URGENCY+3*, PATCH~ , PATCH+1, VERSION~, VERSION+1, VERSRV~, VERSRV+3, JSYSPARM+5~, JSYSPARM+6, JSYSPARM+7, JSYSPARM+9~, JSYSPARM+10 , JSYSPARM+11, JSYSPARM+13~, JSYSPARM+14, JSYSPARM+15, JSYSPARM+17~, JSYSPARM+18, JSYSPARM+19 |
X0 | DEVICE+7~, DEVICE+8*, DEVICE+11, DEVICE+17, DEVICE+18 |
X1 | DEVICE+7~, DEVICE+8*, DEVICE+18 |
X90 | DEVICE+7~, DEVICE+8*, DEVICE+12 |
X91 | DEVICE+7~, DEVICE+8*, DEVICE+18 |
X95 | DEVICE+7~, DEVICE+8*, DEVICE+15 |
XSTYPE | DEVICE+7~, DEVICE+8*, DEVICE+9 |
XTIME | DEVICE+7~, DEVICE+8*, DEVICE+13 |
XTYPE | DEVICE+7~, DEVICE+8*, DEVICE+10 |
Y | DT~, VALDT~, CLINLOC~, INPLOC~, HOSPLOC~, GENERIC~, DEVICE~, URGENCY~ |
Y( | CLINLOC+6*, INPLOC+7*, HOSPLOC+6*, GENERIC+5*, DEVICE+18*, URGENCY+3* |
Name | Field # of Occurrence |
---|---|
$T(NEWPERS | NEWPERS+6 |