HMPROS8 ;SLC/AGP,ASMR/RRB - Get CPRS User Default Roster List ; 6/11/14 8:38pm
Source file <HMPROS8.m>
Package | Total | Call Graph |
---|---|---|
Enterprise Health Management Platform | 3 | ($$PID,API)^HMPDJFS ENCODE^HMPJSON ($$JSONDT,$$SETUID)^HMPUTILS |
Order Entry Results Reporting | 3 | ($$FDEFSRC,DEFLIST,DEFSORT)^ORQPTQ11 CLINPTS2^ORQPTQ2 BYWARD^ORWPT |
Kernel | 2 | $$DOW^XLFDT $$UP^XLFSTR |
Registration | 1 | (INP,KVA)^VADPT |
Toolkit | 1 | $$GET^XPAR |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Enterprise Health Management Platform | 1 | HMPCRPC |
Name | Comments | DBIA/ICR reference |
---|---|---|
BLDSORT(NODE,SRC,SORT,SEQ) | ; emulate TStringList Sort found in CPRS
; append separator to ensure string sort (rather than numeric) ; append SEQ to avoid dropping node where SORTKEY is duplicated ; SORT: A:Alphabetic;R:Room/Bed;P:Appointment Date;T:Terminal Digit;S:Source |
|
CHKPAT(PATIENTS,SERVER) | ;
|
|
GETDLIST(RESULT,SERVER) | ;
|
|
GETDLSTX | ;
|
|
SETAPPT(SOURCE,APPT,DFN,CNT) | ;
|
|
STINP(DFN,CNT,ROOM) | ;
|
|
STPTSRC(SOURCE,CNT) | ;
|
|
LSTSRC(ADUZ) | ; Return type of list source
; T:TeamList, W:Ward List, P:Provider List, S:Specialty List, C:Clinic List, M:Combination |
|
GETCLIST(RESULT,SERVER,ID,START,END) | ;
|
|
GTSOURCE(TYPE,INT) | ;
|
|
STGSRCE(SPEC,INT) | ;
|
|
GETWLIST(RESULT,SERVER,ID) | ;
|
|
SRTSRC(SORT,SRCTYPE,SRCNAME) | ; Set sort type, source type, source name
|
Name | Field # of Occurrence |
---|---|
$$PID^HMPDJFS | GETDLIST+23, GETCLIST+15, GETWLIST+13 |
API^HMPDJFS | CHKPAT+8 |
ENCODE^HMPJSON | GETDLSTX+1, GETCLIST+21, GETWLIST+18 |
$$JSONDT^HMPUTILS | SETAPPT+2 |
$$SETUID^HMPUTILS | SETAPPT+5, STINP+4, STINP+8, GTSOURCE+6, STGSRCE+7 |
$$FDEFSRC^ORQPTQ11 | GETDLIST+16 |
DEFLIST^ORQPTQ11 | GETDLIST+9 |
DEFSORT^ORQPTQ11 | GETDLIST+8, GETCLIST+3, GETWLIST+3 |
CLINPTS2^ORQPTQ2 | GETCLIST+4 |
BYWARD^ORWPT | GETWLIST+4 |
INP^VADPT | STINP+3 |
KVA^VADPT | STINP+3, STINP+5, STINP+11 |
$$DOW^XLFDT | LSTSRC+11 |
$$UP^XLFSTR | LSTSRC+11 |
$$GET^XPAR | LSTSRC+5, LSTSRC+7, LSTSRC+8, LSTSRC+9, LSTSRC+10, LSTSRC+11 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(42 - [#42] | STINP+6, GTSOURCE+5, STGSRCE+6, GETWLIST+17 |
^DPT - [#2] | GETDLIST+21 |
^HMP(800000 - [#800000] | CHKPAT+5 |
^SC - [#44] | STINP+7, GETCLIST+20, GTSOURCE+8, STGSRCE+9 |
^TMP("HMPRESULT" | GETDLIST+11! |
^TMP("HMPSORT" | BLDSORT+15*, GETDLIST+11!, GETDLIST+17, GETDLSTX+3! |
^TMP("HMPTEMP" | GETDLIST+11!, GETDLIST+28*, GETDLIST+29*, GETDLIST+30*, GETDLSTX+1, GETDLSTX+4!, SETAPPT+2*, SETAPPT+5*, STINP+2*, STINP+4* , STINP+8*, STINP+9*, STINP+10*, STPTSRC+3*, STPTSRC+5*, STPTSRC+6*, STPTSRC+7*, GETCLIST+2!, GETCLIST+16*, GETCLIST+17* , GETCLIST+21, GETWLIST+2!, GETWLIST+14*, GETWLIST+18, SRTSRC+1*, SRTSRC+2*, SRTSRC+3* |
^TMP("OR" | GETDLIST+5!, GETDLIST+12, GETDLIST+13, GETDLIST+15! |
^VA(200 - [#200] | LSTSRC+4 |
Name | Line Occurrences |
---|---|
$$GTSOURCE | GETDLIST+26, GETCLIST+5 |
$$LSTSRC | GETDLIST+6 |
$$STGSRCE | GETDLIST+10 |
BLDSORT | GETDLIST+14 |
CHKPAT | GETDLSTX+2 |
SETAPPT | GETDLIST+31, GETCLIST+18 |
SRTSRC | GETDLIST+16, GETCLIST+20, GETWLIST+17 |
STINP | GETDLIST+33, GETWLIST+15 |
STPTSRC | GETDLIST+35 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADUZ | LSTSRC~, LSTSRC+3*, LSTSRC+4, LSTSRC+5 |
>> API | LSTSRC+11* |
APPT | GETDLIST+1~, GETDLIST+25*, GETDLIST+31, SETAPPT~, SETAPPT+2, SETAPPT+4, GETCLIST+1~, GETCLIST+14*, GETCLIST+18 |
ARGS | CHKPAT+1~, CHKPAT+8 |
ARGS("command" | CHKPAT+2* |
ARGS("localId" | CHKPAT+7* |
ARGS("server" | CHKPAT+3* |
ARRAY | GETDLIST+1~ |
CNT | GETDLIST+1~, GETDLIST+12*, GETDLIST+13, GETDLIST+14, GETDLIST+17*, GETDLIST+20*, GETDLIST+28, GETDLIST+29, GETDLIST+30, GETDLIST+31 , GETDLIST+33, GETDLIST+35, SETAPPT~, SETAPPT+2, SETAPPT+5, STINP~, STINP+2, STINP+4, STINP+8, STINP+9 , STINP+10, STPTSRC~, STPTSRC+3, STPTSRC+5, STPTSRC+6, STPTSRC+7, GETCLIST+1~, GETCLIST+7*, GETCLIST+8, GETCLIST+10 , GETCLIST+11, GETCLIST+12*, GETCLIST+13*, GETCLIST+16, GETCLIST+17, GETCLIST+18, GETWLIST+1~, GETWLIST+5*, GETWLIST+6, GETWLIST+8 , GETWLIST+9, GETWLIST+10*, GETWLIST+11*, GETWLIST+14, GETWLIST+15 |
DFN | GETDLIST+1~, GETDLIST+21*, GETDLIST+22, GETDLIST+23, GETDLIST+31, GETDLIST+33, SETAPPT~, SETAPPT+5, STINP~, STINP+4 , GETCLIST+1~, GETCLIST+14*, GETCLIST+15, GETCLIST+18, GETWLIST+1~, GETWLIST+12*, GETWLIST+13, GETWLIST+15 |
DT | LSTSRC+11 |
DUZ | GETDLIST+6, GETDLIST+16, LSTSRC+3 |
END | GETCLIST~, GETCLIST+4 |
ERROR | GETDLIST+1~, GETCLIST+1~, GETWLIST+1~ |
FROM | LSTSRC+2~, LSTSRC+5*, LSTSRC+6, LSTSRC+7, LSTSRC+8, LSTSRC+9, LSTSRC+10, LSTSRC+11, LSTSRC+12 |
GBL | GETDLIST+1~, GETDLIST+17*, GETDLIST+18*, GETDLIST+19 |
GSOURCE | GETDLIST+1~, GETDLIST+10*, GETDLIST+26 |
HMPARRAY | GETCLIST+1~, GETCLIST+4, GETWLIST+1~, GETWLIST+4 |
HMPARRAY( | GETCLIST+7, GETCLIST+8, GETWLIST+5, GETWLIST+6 |
HMPOUT | GETDLIST+2~, GETDLIST+9 |
HMPSORT | GETDLIST+2~, GETDLIST+8, GETDLIST+14, GETDLIST+16, GETCLIST+1~, GETCLIST+3, GETCLIST+10, GETCLIST+20, GETWLIST+1~, GETWLIST+3 , GETWLIST+8, GETWLIST+17 |
HMPSRC | GETDLIST+2~, GETDLIST+6*, GETDLIST+7*, GETDLIST+10, GETDLIST+14, GETDLIST+16, GETDLIST+25 |
ID | GETCLIST~, GETCLIST+4, GETCLIST+5, GETCLIST+20, GETWLIST~, GETWLIST+4, GETWLIST+17 |
IEN | LSTSRC+2~, LSTSRC+7*, LSTSRC+8*, LSTSRC+9*, LSTSRC+10*, LSTSRC+11* |
INT | GTSOURCE~, GTSOURCE+5*, GTSOURCE+6, GTSOURCE+8, STGSRCE~, STGSRCE+6*, STGSRCE+7, STGSRCE+9 |
ISOUT | GETDLIST+1~, GETDLIST+27* |
ITR | GETCLIST+1~, GETCLIST+12*, GETCLIST+13, GETWLIST+1~, GETWLIST+10*, GETWLIST+11 |
LISTIEN | GETDLIST+1~, GETDLIST+7*, GETDLIST+10 |
LOC | SETAPPT+1~, SETAPPT+3*, SETAPPT+4, STINP+1~, STINP+6*, STINP+7, STINP+8 |
LROOT | GETDLIST+1~, GETDLIST+17*, GETDLIST+18 |
NAME | GETDLIST+1~ |
NODE | BLDSORT~, BLDSORT+4, BLDSORT+6*, BLDSORT+7, BLDSORT+8, BLDSORT+10, BLDSORT+11, BLDSORT+12, BLDSORT+13, BLDSORT+15 , GETDLIST+1~, GETDLIST+13*, GETDLIST+14, GETDLIST+19*, GETDLIST+21, GETDLIST+24, GETDLIST+25, GETDLIST+28, STINP+1~, STINP+7* , STINP+9, STINP+10, GETCLIST+1~, GETCLIST+8*, GETCLIST+9, GETCLIST+10, GETCLIST+11, GETCLIST+13*, GETCLIST+14, GETCLIST+17 , GETWLIST+1~, GETWLIST+6*, GETWLIST+7, GETWLIST+8, GETWLIST+9, GETWLIST+11*, GETWLIST+12 |
>> ORSRV | LSTSRC+11 |
OUT | CHKPAT+1~, CHKPAT+8 |
PAT | CHKPAT+1~, CHKPAT+4*, CHKPAT+5, CHKPAT+7 |
PATIENTS | CHKPAT~, GETDLIST+1~, GETDLSTX+2, GETCLIST+1~, GETWLIST+1~ |
PATIENTS( | CHKPAT+4, GETDLIST+22*, GETCLIST+15*, GETWLIST+13* |
PATTYPE | GETDLIST+2~, GETDLIST+24*, GETDLIST+27, GETDLIST+30, GETDLIST+33 |
PATUID | GETDLIST+2~ |
PID | GETDLIST+2~, GETDLIST+23*, GETDLIST+29, GETCLIST+1~, GETCLIST+15*, GETCLIST+16, GETWLIST+1~, GETWLIST+13*, GETWLIST+14 |
REC | GTSOURCE+1~, GTSOURCE+5*, STGSRCE+1~, STGSRCE+6* |
RESULT | GETDLIST~, GETCLIST~, GTSOURCE+1~, GTSOURCE+7*, GTSOURCE+8*, GTSOURCE+9, STGSRCE+1~, STGSRCE+3*, STGSRCE+4, STGSRCE+5 , STGSRCE+8*, STGSRCE+9*, STGSRCE+10, GETWLIST~ |
ROOM | GETDLIST+2~, GETDLIST+21*, GETDLIST+33, STINP~, STINP+2, GETWLIST+1~, GETWLIST+12*, GETWLIST+15 |
ROOT | GETDLIST+2~, GETDLIST+17*, GETDLIST+18 |
S | BLDSORT+5~, BLDSORT+6*, BLDSORT+7, BLDSORT+8, BLDSORT+10, BLDSORT+11, BLDSORT+12, BLDSORT+13, BLDSORT+14, GETCLIST+1~ , GETCLIST+6*, GETCLIST+10, GETCLIST+11 |
SEQ | BLDSORT~, BLDSORT+7, BLDSORT+8, BLDSORT+10, BLDSORT+11, BLDSORT+12, BLDSORT+13, BLDSORT+14 |
SERVER | CHKPAT~, CHKPAT+3, CHKPAT+5, GETDLIST~, GETDLSTX+2, GETCLIST~, GETWLIST~ |
SORT | BLDSORT~, BLDSORT+8, BLDSORT+10, BLDSORT+11, BLDSORT+12, BLDSORT+13, BLDSORT+15, SRTSRC~, SRTSRC+3 |
SORTKEY | BLDSORT+5~, BLDSORT+7*, BLDSORT+8*, BLDSORT+10*, BLDSORT+11*, BLDSORT+12*, BLDSORT+13*, BLDSORT+14*, BLDSORT+15 |
SOURCE | GETDLIST+2~, GETDLIST+26*, GETDLIST+31, GETDLIST+35, SETAPPT~, SETAPPT+3, STPTSRC~, STPTSRC+2, STPTSRC+6, STPTSRC+7 , GETCLIST+1~, GETCLIST+5*, GETCLIST+18 |
SOURCETYPE | GETDLIST+2~ |
SPEC | GTSOURCE+1~, GTSOURCE+2*, GTSOURCE+3, GTSOURCE+4, GTSOURCE+6, STGSRCE~, STGSRCE+4, STGSRCE+5, STGSRCE+7 |
SPECTYPE | GTSOURCE+1~, GTSOURCE+3*, GTSOURCE+4, GTSOURCE+5, GTSOURCE+7, STGSRCE+1~, STGSRCE+5*, STGSRCE+6, STGSRCE+8 |
SRC | BLDSORT~, BLDSORT+8, BLDSORT+9, BLDSORT+13, BLDSORT+15 |
SRCNAME | SRTSRC~, SRTSRC+2 |
SRCTYPE | SRTSRC~, SRTSRC+1 |
SRV | LSTSRC+2~, LSTSRC+4*, LSTSRC+5, LSTSRC+7, LSTSRC+8, LSTSRC+9, LSTSRC+10 |
START | GETCLIST~, GETCLIST+4 |
STATUS | CHKPAT+1~, CHKPAT+5*, CHKPAT+6 |
TEMP | GETCLIST+1~, GETWLIST+1~ |
TEMP( | GETCLIST+10*, GETCLIST+11*, GETCLIST+12, GETCLIST+13, GETWLIST+8*, GETWLIST+9*, GETWLIST+10, GETWLIST+11 |
TYPE | GETDLIST+2~, GETDLIST+25*, GETDLIST+26, GTSOURCE~, GTSOURCE+2 |
TYPEI | GETDLIST+2~, GETDLIST+25*, GETDLIST+26 |
U | BLDSORT+4, BLDSORT+7, BLDSORT+8, BLDSORT+10, BLDSORT+11, BLDSORT+12, BLDSORT+13, BLDSORT+15, GETDLIST+7, GETDLIST+16 , GETDLIST+21, GETDLIST+24, GETDLIST+25, GETDLIST+28, SETAPPT+3, STINP+7, STINP+9, STINP+10, STPTSRC+2, STPTSRC+6 , STPTSRC+7, LSTSRC+4, LSTSRC+7, LSTSRC+8, LSTSRC+9, LSTSRC+10, LSTSRC+11, GETCLIST+9, GETCLIST+10, GETCLIST+11 , GETCLIST+14, GETCLIST+17, GETCLIST+20, GTSOURCE+4, GTSOURCE+7, GTSOURCE+8, STGSRCE+8, STGSRCE+9, GETWLIST+7, GETWLIST+8 , GETWLIST+9, GETWLIST+12, GETWLIST+17 |
UID | SETAPPT+1~, SETAPPT+3*, STINP+1~, STPTSRC+1~, STPTSRC+2*, STPTSRC+3, STPTSRC+4, STPTSRC+5, GTSOURCE+1~, GTSOURCE+6* , GTSOURCE+7, GTSOURCE+8, STGSRCE+1~, STGSRCE+7*, STGSRCE+8, STGSRCE+9 |
VAIN | STINP+1~, STPTSRC+1~ |
VAIN(1 | STINP+3, STINP+4 |
VAIN(4 | STINP+5 |
WARD | GETWLIST+1~ |
WIEN | STINP+1~, STINP+5*, STINP+6 |
X | SETAPPT+1~, SETAPPT+4*, SETAPPT+5 |
XOBDATA | GETDLIST+3~ |
XOBDATA(0 | GETDLIST+3* |
XWBOS | GETDLIST+4~ |
XWBOS(0 | GETDLIST+4* |