TIUTIUS ; MILW/JMC - Functions to search TIU documents ; Sep 10, 2025@16:50:10
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 |
| 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 |