HMPDJ08 ;SLC/MKB,ASMR/RRB,ASF,HM - TIU Documents;May 15, 2016 14:15
Source file <HMPDJ08.m>
Package | Total | Call Graph |
---|---|---|
Enterprise Health Management Platform | 8 | ($$FAC,$$VUID)^HMPD ADD^HMPDJ $$NAME^HMPDJ04 ($$CP1,$$LR1,$$RA1)^HMPDJ08A $$CATG^HMPDTIU ADD^HMPMETA $$EN^HMPSTMP ($$JSONDT,$$SETUID,SETTEXT)^HMPUTILS |
Text Integration Utility | 6 | $$CLASS^TIUCNSLT CPCLASS^TIUCP EXTRACT^TIULQ $$ISA^TIULX $$CLASS^TIUSROI $$RESOLVE^TIUSRVLO |
Kernel | 1 | ($$LOW,$$UP)^XLFSTR |
Radiology Nuclear Medicine | 1 | EN1^RAO7PC1 |
VA FileMan | 1 | $$GET1^DIQ |
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 | 3 | HMPDJ0 HMPDJ02 HMPDJ08A |
Name | Comments | DBIA/ICR reference |
---|---|---|
TIU1(ID) | ; -- document
|
|
EN1(HMPX,TIU,OUTPUT) | ; -- document
; Expects DFN, HMPX=IEN^$$RESOLVE^TIUSRVLO(IEN) or equivalent ; TIU = document class#, or code (CP, RA, LR) if non-TIU ; OUTPUT = store the result in the output array instead (by reference) |
|
B | ; other TIU data
|
|
C | ; text blocks, signatures
|
|
D | ; addenda
|
|
ENQ | ; end
|
|
USER(N,IEN,NAME,ROLE,DATE,SBN,SBT) | ; -- set author, signer(s)
|
|
SETUP | ; -- convert FILTER("attribute") = value to TIU criteria
; Expects: FILTER("category") = code (see $$CATG) ; FILTER("status") = 'signed','unsigned','all' ; Returns: CLASS,[SUBCLASS,STATUS] |
|
LR() | ; -- Return ien of Lab class
|
|
MATCH(DOC,STS) | ; -- Return 1 or 0, if document DA matches search criteria
|
|
MQ | ||
TYPE(X) | ; -- Return name of category type X
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | B+5, MATCH+7 |
$$FAC^HMPD | EN1+28 |
$$VUID^HMPD | B+4 |
ADD^HMPDJ | ENQ+6 |
$$NAME^HMPDJ04 | B+13 |
$$CP1^HMPDJ08A | TIU1+2 |
$$LR1^HMPDJ08A | TIU1+3 |
$$RA1^HMPDJ08A | TIU1+7 |
$$CATG^HMPDTIU | B+9 |
ADD^HMPMETA | ENQ+5 |
$$EN^HMPSTMP | ENQ+2 |
$$JSONDT^HMPUTILS | EN1+25, B+6, B+7, D+5, USER+6 |
$$SETUID^HMPUTILS | EN1+23, EN1+33, B+2, B+13, D+4, USER+2 |
SETTEXT^HMPUTILS | C+21, D+18 |
EN1^RAO7PC1 | TIU1+5 |
$$CLASS^TIUCNSLT | SETUP+19 |
CPCLASS^TIUCP | SETUP+31 |
EXTRACT^TIULQ | B+1 |
$$ISA^TIULX | MATCH+10 |
$$CLASS^TIUSROI | SETUP+16, SETUP+28 |
$$RESOLVE^TIUSRVLO | EN1+13, EN1+17 |
$$LOW^XLFSTR | SETUP+11 |
$$UP^XLFSTR | EN1+30, SETUP+7 |
FileNo | Call Tags |
---|---|
^TIU(8925 - [#8925] | GET1^DIQ |
^TIU(8926.1 - [#8926.1] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SC("B" | EN1+27 |
^TIU(8925.1 - [#8925.1] | B+3, LR+1, LR+2 |
^TMP("HMPTEXT" | C+19 |
^TMP($J | TIU1+6, TIU1+7!, C+20!, C+21, C+22, D+13!, D+18, D+19, ENQ+1! |
^VA(200 - [#200] | USER+3 |
Name | Field # of Occurrence |
---|---|
^(0 | LR+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BEG | TIU1+5* |
CLASS | SETUP+5!, SETUP+8*, SETUP+16*, SETUP+18*, SETUP+19*, SETUP+20*, SETUP+21*, SETUP+22*, SETUP+23*, SETUP+24* , SETUP+26*, SETUP+28*, SETUP+30*, SETUP+31*, SETUP+33*, SETUP+35* |
CP | SETUP+6~, SETUP+31 |
DA | EN1+12~*, EN1+13, EN1+16~*, EN1+17, MATCH+1~, MATCH+2*, MATCH+7 |
DATE | USER~, USER+5, USER+6 |
>> DFN | TIU1+2, TIU1+3, TIU1+5, TIU1+6, TIU1+7, EN1+21, EN1+23, EN1+33, B+13, D+4 |
DOC | EN1+4~, ENQ+7, MATCH~, MATCH+2, MATCH+4, MATCH+6 |
DOC("amended" | B+7* |
DOC("documentClass" | B+11* |
DOC("documentDefUid" | B+2* |
DOC("documentTypeCode" | B+10* |
DOC("documentTypeName" | B+10* |
DOC("encounterName" | B+13* |
DOC("encounterUid" | B+13* |
DOC("entered" | B+6* |
DOC("facilityCode" | EN1+29* |
DOC("facilityName" | EN1+29* |
DOC("images" | EN1+31* |
DOC("lastUpdateTime" | ENQ+2*, ENQ+3 |
DOC("localId" | EN1+23* |
DOC("localTitle" | EN1+24* |
DOC("nationalTitle" | B+4*, B+5* |
DOC("parentUid" | EN1+33* |
DOC("referenceDateTime" | EN1+25*, C+2 |
DOC("stampTime" | ENQ+3*, ENQ+5 |
DOC("status" | EN1+30*, C+3 |
DOC("subject" | EN1+32* |
DOC("text" | C+2*, C+3*, C+4*, C+22*, D+3*, D+4*, D+5*, D+19*, USER+2*, USER+3* , USER+4*, USER+6*, USER+8* |
DOC("uid" | EN1+23*, C+4, ENQ+5 |
DOC("urgency" | B+8* |
>> END | TIU1+5* |
ERR | EN1+4~ |
ERRMSG | EN1+20~, EN1+22* |
ERRPAT | EN1+20~, EN1+21* |
ES | EN1+4~, C+7* |
ES(1204 | C+13 |
ES(1208 | C+14 |
ES(1209 | C+16 |
ES(1302 | C+15 |
ES(1501 | C+8*, C+11 |
ES(1502 | C+8*, C+11 |
ES(1503 | C+11 |
ES(1504 | C+11 |
ES(1507 | C+12 |
ES(1508 | C+12 |
ES(1509 | C+12 |
ES(1510 | C+12 |
ES(1601 | C+17 |
ES(1602 | C+17 |
ES(1603 | C+17 |
ES(1604 | C+17 |
ES(1605 | C+17 |
FAC | EN1+27~ |
>> FILTER("category" | SETUP+7 |
>> FILTER("status" | SETUP+11 |
HMPA | C+1~, D+1*, D+2, D+4, D+17 |
HMPADD | C+1~, D+2!* |
HMPADD( | D+3 |
HMPADD(1202 | D+7 |
HMPADD(1204 | D+10 |
HMPADD(1208 | D+11 |
HMPADD(1209 | D+12 |
HMPADD(1301 | D+5 |
HMPADD(1302 | D+6 |
HMPADD(1501 | D+8 |
HMPADD(1502 | D+8 |
HMPADD(1507 | D+9 |
HMPADD(1508 | D+9 |
>> HMPIEN | EN1+7*, EN1+8 |
>> HMPMETA | ENQ+5 |
HMPT | C+1~, C+5*, D+2*, D+3, D+4, D+5, D+19, USER+2, USER+3, USER+4 , USER+6, USER+8 |
>> HMPTEXT | C+18, D+13 |
HMPTIU | EN1+4~ |
HMPTIU( | B+2, B+6, B+7, B+8, B+9, B+12, C+7, C+19, D+1, D+2 , D+17 |
HMPX | EN1~, EN1+6, EN1+7, EN1+11, EN1+12, EN1+13*, EN1+15, EN1+17*, EN1+19, EN1+24 , EN1+25, EN1+26, EN1+30, EN1+31, EN1+32, EN1+33, B+3, B+12, C+5, C+7 |
HMPY | EN1+4~ |
I | EN1+4~, C+5*, C+6, C+11, C+12, C+13, C+14, C+15, C+16, C+17 , D+2*, D+6, D+7, D+8, D+9, D+10, D+11, D+12, MATCH+9~, MATCH+10* |
ID | TIU1~, TIU1+1, TIU1+2, TIU1+3, TIU1+4, TIU1+5, TIU1+6, TIU1+7, TIU1+8 |
IEN | EN1+4~, EN1+6*, EN1+8*, EN1+16, EN1+22, EN1+23, B+1, B+2, B+6, B+7 , B+8, B+9, B+12, C+7, C+19, D+1, D+2, D+17, USER~, USER+1 , USER+2, USER+3 |
L | D+15~*, D+16 |
LOC | EN1+27~*, EN1+28 |
LOCAL | MATCH+1~, MATCH+7*, MATCH+10 |
N | USER~, USER+1*, USER+2, USER+3, USER+4, USER+6, USER+8 |
NAME | USER~, USER+3, USER+7 |
NT | EN1+4~, B+3*, B+4, B+5 |
OK | MATCH+1~, MATCH+8, MATCH+9*, MATCH+10* |
OUTPUT | EN1~, ENQ+5, ENQ+6, ENQ+7* |
R | D+15~*, D+16 |
ROLE | USER~, USER+4 |
SBN | USER~, USER+7*, USER+8 |
SBT | USER~, USER+8 |
SHOWADD | EN1+12~*, EN1+16~* |
STATUS | SETUP+5!, SETUP+8*, SETUP+12*, SETUP+30, SETUP+33, MATCH+4 |
STS | SETUP+6~, SETUP+11*, SETUP+12, MATCH~, MATCH+6 |
SUB | EN1+4~ |
SUBCLASS | SETUP+5!, SETUP+8*, SETUP+19*, SETUP+20*, SETUP+21*, SETUP+22*, SETUP+23*, SETUP+24*, MATCH+8, MATCH+10 |
T | D+15~*, D+16 |
TEXT | EN1+4~ |
TIU | EN1~, EN1+6*, EN1+11, EN1+15, B+1, B+9, B+12, C+19 |
TYPE | SETUP+6~, SETUP+7*, SETUP+15*, SETUP+16, SETUP+18, SETUP+19, SETUP+20, SETUP+21, SETUP+22, SETUP+23 , SETUP+24, SETUP+26, SETUP+28, SETUP+29, SETUP+33, SETUP+35 |
U | EN1+6, EN1+13, EN1+17, EN1+19, EN1+24, EN1+25, EN1+26, EN1+29, EN1+30, EN1+31 , EN1+32, EN1+33, B+3, B+12, C+5, USER+3, LR+2, MATCH+4, MATCH+6, MATCH+10 |
V | D+15~*, D+16* |
X | EN1+4~, EN1+26*, EN1+27, EN1+28*, EN1+29, EN1+30*, B+2*, B+3, B+6*, B+7* , B+8*, B+9*, B+10, B+11, B+12*, B+13, C+5*, C+6, C+7*, C+8 , C+19*, C+21, D+15~, D+16*, D+17*, D+18, MATCH+9~, MATCH+10*, TYPE~, TYPE+1* , TYPE+2, TYPE+3, TYPE+4, TYPE+5, TYPE+6, TYPE+7, TYPE+8, TYPE+9, TYPE+10, TYPE+11 , TYPE+12 |
Y | LR+1~*, LR+2*, LR+3, MATCH+1~*, MATCH+11*, MQ |