ORWU ;SLC/KCM - GENERAL UTILITIES FOR WINDOWS CALLS ;Oct 30, 2024@13:27
Source file <ORWU.m>
| 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
|
| 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 |