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 |