TIUTIUS ; MILW/JMC - Functions to search TIU documents; May 24, 2006 ; 2/16/16 1:49pm
Source file <TIUTIUS.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 3 | ^%ZTLOAD $$LOW^XLFSTR SETUP^XQALERT |
Order Entry Results Reporting | 3 | ($$TMDEV,REGDEV)^ORB31 (TEAMPROV,TMSPT)^ORQPTQ1 ATTPRIM^ORQPTQ3 |
Text Integration Utility | 3 | ($$ISADDNDM,$$PTNAME)^TIULC1 $$UPPER^TIULS DQ^TIUTIUS |
Registration | 1 | PID^VADPT6 |
Scheduling | 1 | $$NMPCPR^SCAPMCU2 |
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 |
---|---|---|
Text Integration Utility | 1 | TIUTIUS |
Name | Comments | DBIA/ICR reference |
---|---|---|
TASK(AUMTDA) | ; Task searching of document for specified text
|
|
DQ | ; Tasked entry point to search TIU document for specified text
; that should generate an alert to appropriate CPRS team. |
|
SENDXQA | ; Send Kernel alert to appropriate team or team device
|
|
SENDSA | ; Build and sent alerts to signer
|
|
SKIP() | ; Check if we should skip alerting this team if they already have been sent an alert.
|
|
ADDRECP | ; Send to additional notification recipients.
; If no associate PC provider(3) then check and send to PC provider (1). ; If team (6) then check if patient is member of team. ; If PCP (7-19) checks for associated PCP in PATIENT file (#2) , fields 695021-695033 |
|
CHKTEAM(AUMTEAM) | ; Check if this patient is linked to this team
|
|
ADDTEAM(AUMTEAM) | ; Add members of team to list of recipients
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | TASK+18 |
$$GET1^DIQ | DQ+15, SENDXQA+12 |
$$TMDEV^ORB31 | ADDTEAM+6 |
REGDEV^ORB31 | ADDTEAM+7 |
TEAMPROV^ORQPTQ1 | ADDTEAM+8 |
TMSPT^ORQPTQ1 | CHKTEAM+5 |
ATTPRIM^ORQPTQ3 | ADDRECP+15 |
$$NMPCPR^SCAPMCU2 | ADDRECP+11, ADDRECP+12 |
$$ISADDNDM^TIULC1 | TASK+5 |
$$PTNAME^TIULC1 | SENDXQA+6 |
$$UPPER^TIULS | DQ+26 |
DQ^TIUTIUS | TASK+20 |
PID^VADPT6 | SENDXQA+7 |
$$LOW^XLFSTR | DQ+28, DQ+71 |
SETUP^XQALERT | SENDXQA+26, SENDSA+12 |
FileNo | Call Tags |
---|---|
^SC - [#44] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | ADDRECP+19 |
^TIU(8925 - [#8925] | TASK+8, DQ+5, DQ+10, DQ+12, DQ+13, DQ+14, DQ+69, DQ+70, SENDXQA+5, SENDXQA+11 , SENDSA+5 |
^TIU(8925.71 - [#8925.71] | DQ+19, DQ+20, DQ+21, DQ+26, DQ+30, DQ+31, SENDXQA+19, SENDXQA+21, SENDXQA+23, SENDSA+8 , ADDRECP+7, ADDRECP+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AUMPRT | DQ+3~, DQ+12*, DQ+13 |
AUMTADD | TASK+1~, TASK+5*, TASK+12, DQ+9 |
AUMTCNT | SENDSA+2~ |
AUMTD | ADDTEAM+4~, ADDTEAM+6*, ADDTEAM+7 |
AUMTDA | TASK~, TASK+2, TASK+5, TASK+8, DQ+5, DQ+10, DQ+12, DQ+14, DQ+69, DQ+70 , DQ+79!, SENDXQA+5, SENDXQA+11, SENDXQA+18, SENDSA+5, SENDSA+9 |
AUMTDEV | ADDTEAM+4~, ADDTEAM+7 |
AUMTDEV( | ADDTEAM+7* |
AUMTDUZ | SENDSA+2~, SENDSA+5*, SENDSA+6, SENDSA+11 |
AUMTEAM | SENDXQA+2~, SENDXQA+22!, SENDXQA+23*, SENDXQA+24, SKIP+5, CHKTEAM~, CHKTEAM+7, ADDTEAM~, ADDTEAM+6, ADDTEAM+8 , ADDTEAM+10 |
AUMTEAM( | ADDTEAM+12 |
AUMTEAM(1 | ADDTEAM+9 |
AUMTHL | SENDXQA+2~, SENDXQA+11*, SENDXQA+12 |
AUMTHL(0 | SENDXQA+12*, SENDXQA+19 |
AUMTI | DQ+3~, DQ+18*, DQ+19*, DQ+20, DQ+21, DQ+26, DQ+28, DQ+30, DQ+31, DQ+32 , DQ+33, DQ+68*, DQ+69*, DQ+70, SENDXQA+2~, SENDXQA+15*, SENDXQA+16*, SENDXQA+19, SENDXQA+21, SENDXQA+23 , SENDSA+2~, SENDSA+7*, SENDSA+8*, SKIP+4, SKIP+5, ADDRECP+7, ADDRECP+8, ADDTEAM+10 |
AUMTJ | DQ+3~, DQ+73*, DQ+74*, DQ+75, SENDXQA+2~, SKIP+2~, SKIP+3*, SKIP+4*, SKIP+5, ADDRECP+5~ , ADDRECP+6*, ADDRECP+11*, ADDRECP+12*, ADDRECP+13, ADDTEAM+4~, ADDTEAM+11*, ADDTEAM+12* |
AUMTK | DQ+3~, SENDXQA+2~, SENDXQA+20*, SENDXQA+21*, SENDXQA+23, ADDRECP+5~, ADDRECP+6*, ADDRECP+9*, ADDRECP+10, ADDRECP+11 , ADDRECP+12, ADDRECP+14, ADDRECP+16, ADDRECP+17, ADDRECP+18, ADDRECP+20 |
AUMTL | ADDRECP+5~, ADDRECP+6*, ADDRECP+7*, ADDRECP+8 |
AUMTL(0 | ADDRECP+8*, ADDRECP+9, ADDRECP+17 |
AUMTMSG | SENDSA+2~, SENDSA+7*, SENDSA+8*, SENDSA+10 |
AUMTMSPT | DQ+3~, CHKTEAM+5 |
AUMTMSPT( | CHKTEAM+7 |
AUMTSA | SENDXQA+2~, SENDXQA+29 |
AUMTSA( | SENDSA+8, SKIP+4, SKIP+5, ADDTEAM+10* |
AUMTSKIP | SENDXQA+2~, SKIP+2~, SKIP+3*, SKIP+5*, SKIP+6 |
AUMTVL | DQ+3~, DQ+10*, DQ+11, DQ+13*, DQ+14*, DQ+15, DQ+31 |
AUMTVL(0 | DQ+15*, DQ+32 |
AUMTVLS | DQ+3~, DQ+26*, DQ+30, DQ+32 |
AUMTX | ADDRECP+5~, ADDRECP+15, ADDRECP+16, ADDRECP+19*, ADDRECP+20 |
AUMTXQA | DQ+3~ |
AUMTXQA( | DQ+75*, DQ+77, SENDXQA+16 |
AUMTXT | DQ+3~, DQ+49 |
AUMTXT( | DQ+28*, DQ+31*, DQ+32*, DQ+33!, DQ+74, DQ+75 |
AUMTZ | DQ+3~, DQ+77* |
DFN | SENDXQA+3~, SENDXQA+5*, SENDXQA+6, ADDRECP+11, ADDRECP+12, ADDRECP+15, ADDRECP+19, CHKTEAM+5 |
DT | ADDRECP+11, ADDRECP+12 |
I | TASK+1~, TASK+8*, CHKTEAM+4~, CHKTEAM+6*, CHKTEAM+7* |
TIU0 | SENDXQA+3~, SENDXQA+5* |
TIUPNM | SENDXQA+3~, SENDXQA+6*, SENDXQA+8, SENDXQA+19, SENDSA+10 |
TIUSSN | SENDXQA+3~, SENDXQA+8*, SENDXQA+19, SENDSA+10 |
U | DQ+12, SENDXQA+5 |
VA | SENDXQA+3~ |
VA("BID" | SENDXQA+8 |
X | TASK+1~, DQ+3~, DQ+21*, DQ+22, DQ+28* |
X( | TASK+8* |
X(0 | TASK+12 |
X0 | DQ+3~ |
X1 | DQ+3~, DQ+68*, DQ+70*, DQ+71*, DQ+73*, DQ+75 |
XQA | SENDXQA+3~, SENDXQA+17!, SENDXQA+26, SENDSA+3~ |
XQA( | SENDSA+11*, ADDRECP+13*, ADDRECP+16*, ADDRECP+20*, ADDTEAM+12* |
XQADATA | SENDXQA+3~, SENDXQA+17!, SENDXQA+18*, SENDSA+3~ |
XQADFN | SENDXQA+17!, SENDSA+3~ |
XQAID | SENDXQA+3~, SENDXQA+17!, SENDXQA+18*, SENDSA+3~, SENDSA+9* |
XQAMSG | SENDXQA+3~, SENDXQA+17!, SENDXQA+19*, SENDSA+3~, SENDSA+10* |
XQAROU | SENDXQA+3~, SENDXQA+17!, SENDXQA+18*, SENDSA+3~ |
XQATEXT | SENDXQA+3~, SENDXQA+17!, SENDSA+3~ |
Y | DQ+3~ |
ZTDESC | TASK+1~, TASK+16* |
ZTDTH | TASK+1~, TASK+15* |
ZTIO | TASK+1~, TASK+15* |
ZTRTN | TASK+1~, TASK+16* |
ZTSAVE | TASK+1~ |
ZTSAVE("AUMTADD" | TASK+15* |
ZTSAVE("AUMTDA" | TASK+15* |
ZTSK | TASK+1~, TASK+20 |