ATXBULL ; IHS/OHPRD/TMJ - THE ROUTINE TO TRIGGER PT TAXONOMY BULLETIN ; 13 Oct 2016 3:44 PM
Source file <ATXBULL.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 2 | C^%DTC EN^DIQ1 |
DRG Grouper | 1 | $$ICDDX^ICDEX |
MailMan | 1 | ^XMB |
Patient Care Component Reports | 1 | $$START1^APCLDF |
Name | Comments | DBIA/ICR reference |
---|---|---|
NEWCASE | ;EP -- called by taxonomy system
|
|
EN | ; ENTRY POINT
|
|
GETHRNS | ;Get all HRN's for this patient
|
|
CHK | ;
|
|
CHECK3 | ;Don't send bulletin if Bulletin Visit Type is Not contained in Visit Type
|
|
INIT | ;
|
|
DIQ1 | ;
|
|
EXIT | ||
X2 | ;
|
|
CHECK4 | ;
|
|
X1 | ;K ATXPOVDA,ATXDT
|
|
CHECK2 | ;Don't send bulletin if NOT First Visit
|
|
CHECK | ; If pt had same pov within last 30 days don't send another bulletin
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ATXAX - [#9002226] | CHK+7, CHK+8, CHK+10, CHK+12, CHK+14, CHK+16, CHK+18, CHK+20, CHK+22, NEWCASE+6 , CHECK3+1, DIQ1+16, DIQ1+18, GETHRNS+7 |
^AUPNPAT - [#9000001] | DIQ1+19, DIQ1+20, DIQ1+23, DIQ1+26, DIQ1+27, DIQ1+28, GETHRNS+1, GETHRNS+2, GETHRNS+4, GETHRNS+5 |
^AUPNVPOV - [#9000010.07] | CHK+1, CHK+3, CHK+4, CHK+9, CHECK+1, CHECK+3, CHECK+5, CHECK2+2, NEWCASE+2, NEWCASE+6 , CHECK3+3, DIQ1+5, DIQ1+11, DIQ1+17, DIQ1+18, DIQ1+21 |
^AUPNVPOV("AA" | CHECK+4, CHECK+5 |
^AUPNVSIT - [#9000010] | CHK+10, CHK+12, CHECK+1, CHECK3+4, DIQ1+5, DIQ1+11, DIQ1+18, DIQ1+21 |
^AUTTCOM - [#9999999.05] | DIQ1+23, DIQ1+24 |
^AUTTLOC - [#9999999.06] | DIQ1+19, DIQ1+20 |
^AUTTSU - [#9999999.22] | DIQ1+24 |
^AUTTTRI - [#9999999.03] | DIQ1+26, DIQ1+28 |
^DIC(4 - [#4] | DIQ1+21, GETHRNS+5 |
^DPT - [#2] | DIQ1+25, DIQ1+29 |
^UTILITY("DIQ1" | DIQ1+3, DIQ1+6, DIQ1+7, DIQ1+8, DIQ1+9, DIQ1+10, DIQ1+12, DIQ1+13, DIQ1+14, GETHRNS+11! |
^XMB(3.6 - [#3.6] | CHK+8, GETHRNS+7 |
Name | Line Occurrences |
---|---|
CHECK | CHK+16 |
CHECK2 | CHK+18 |
CHECK3 | CHK+14 |
CHECK4 | CHK+20 |
CHK | CHK+3 |
DIQ1 | CHK+23 |
EXIT | EN+9 |
INIT | EN+8 |
X1 | CHK+1, CHK+2, CHK+4, CHK+10, CHK+12, CHK+14, CHK+16, CHK+18, CHK+20, CHK+22 |
X2 | NEWCASE+7, NEWCASE+8 |
Name | Field # of Occurrence |
---|---|
^( | DIQ1+3, DIQ1+6, DIQ1+7, DIQ1+8, DIQ1+9, DIQ1+10, DIQ1+12, DIQ1+13, DIQ1+14 |
^(0 | DIQ1+18, DIQ1+19, DIQ1+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%X | EXIT+1! |
%Y | EXIT+1! |
APCL | NEWCASE+4~ |
APCL(1 | NEWCASE+8 |
APCLER | NEWCASE+4~, NEWCASE+6*, NEWCASE+7 |
APCLX | NEWCASE+4~, NEWCASE+6* |
APCLY | NEWCASE+4~, NEWCASE+5*, NEWCASE+6 |
ATXCOM | DIQ1+23*, DIQ1+24, GETHRNS+12! |
ATXDOLH | EXIT! |
ATXDT | EXIT!, CHK+7, CHK+8, CHK+10, CHK+12, CHK+14, CHK+16, CHK+18, CHK+20, CHK+22 , CHECK3+1, DIQ1+16, DIQ1+18, GETHRNS+7 |
ATXDUZ | EXIT!, GETHRNS+8*, GETHRNS+10 |
ATXFAC | GETHRNS+3*, GETHRNS+4*, GETHRNS+5, GETHRNS+12! |
ATXGETDA | CHECK+5*, CHECK+6! |
ATXHRN | GETHRNS+5*, GETHRNS+12! |
ATXI | EXIT! |
>> ATXICD | CHK+4, CHECK+5, DIQ1+5 |
ATXID | CHECK+2*, CHECK+4, CHECK+6! |
ATXJ | EXIT! |
ATXPDFN | EXIT!, DIQ1+17*, DIQ1+19, DIQ1+20, DIQ1+23, DIQ1+25, DIQ1+26, DIQ1+27, DIQ1+28, DIQ1+29 , GETHRNS+1, GETHRNS+2, GETHRNS+4, GETHRNS+5 |
>> ATXPOVDA | CHK+1, CHK+3, CHK+4, CHK+9, CHECK+1, CHECK+3, CHECK+4, CHECK2+2, NEWCASE+1, NEWCASE+2 , NEWCASE+6, NEWCASE+8, CHECK3+3, DIQ1+1 |
ATXPTDA | CHECK+3*, CHECK+4, CHECK+5, CHECK+6! |
ATXQUIT | EN+6~, EN+7*, CHK+14, CHK+16, CHK+18, CHK+20, CHECK+5*, CHECK2+2*, NEWCASE+7*, NEWCASE+9* , CHECK3+4* |
ATXSTOP | CHK+6!, CHK+22! |
ATXSU | DIQ1+24*, GETHRNS+12! |
>> ATXT | NEWCASE+6 |
>> ATXTYPE | CHECK3+1*, CHECK3+2, CHECK3+4 |
ATXVDATE | CHECK+1*, CHECK+2, CHECK+4*, CHECK+5, CHECK+6! |
>> ATXVISDA | CHK+9*, CHK+10, CHK+12 |
ATXVST | EXIT!, CHECK3+3*, CHECK3+4, DIQ1+18*, DIQ1+19 |
>> CTR | GETHRNS+3*, GETHRNS+5* |
D0 | NEWCASE+4~, DIQ1+1* |
DA | NEWCASE+4~, DIQ1+1*, DIQ1+3, DIQ1+5, DIQ1+6, DIQ1+7, DIQ1+8, DIQ1+9, DIQ1+10, DIQ1+11 , DIQ1+12, DIQ1+13, DIQ1+14, DIQ1+17, DIQ1+18, DIQ1+21, GETHRNS+11 |
>> DIC | DIQ1+1* |
>> DR | DIQ1+1* |
DUZ | GETHRNS+8*, GETHRNS+10* |
DUZ(2 | DIQ1+20 |
U | CHK+3, CHK+7, CHK+8, CHK+9, CHK+10, CHK+12, CHK+14, CHK+16, CHK+18, CHK+20 , CHECK+1, CHECK+3, CHECK2+2, NEWCASE+2, NEWCASE+6, NEWCASE+8, CHECK3+1, CHECK3+3, CHECK3+4, DIQ1+5 , DIQ1+11, DIQ1+16, DIQ1+17, DIQ1+18, DIQ1+19, DIQ1+20, DIQ1+21, DIQ1+23, DIQ1+24, DIQ1+25 , DIQ1+26, DIQ1+27, DIQ1+28, DIQ1+29, GETHRNS+2, GETHRNS+5, GETHRNS+7 |
V | NEWCASE+4~, NEWCASE+8* |
X | INIT+1*, CHK+2, CHK+3*, CHECK+2, NEWCASE+4~, DIQ1+25*, DIQ1+26*, DIQ1+28*, DIQ1+29* |
X1 | EXIT+1!, CHECK+2* |
X2 | EXIT+1!, CHECK+2* |
XMB | GETHRNS+7*, GETHRNS+11! |
XMB( | DIQ1+11*, GETHRNS+5* |
XMB(1 | DIQ1+3* |
XMB(11 | DIQ1+12* |
XMB(13 | DIQ1+13* |
XMB(14 | DIQ1+14* |
XMB(15 | DIQ1+21* |
XMB(16 | DIQ1+23* |
XMB(17 | DIQ1+24* |
XMB(18 | DIQ1+25* |
XMB(19 | DIQ1+26* |
XMB(2 | DIQ1+6* |
XMB(20 | DIQ1+16* |
XMB(21 | DIQ1+27* |
XMB(22 | DIQ1+28* |
XMB(23 | DIQ1+29* |
XMB(3 | DIQ1+7* |
XMB(4 | DIQ1+8* |
XMB(7 | DIQ1+9* |
XMB(8 | DIQ1+5* |
XMB(9 | DIQ1+10*, DIQ1+11 |
XMB(99 | DIQ1+19*, DIQ1+20* |
Y | NEWCASE+4~ |
>> ZTQUEUED | EXIT+2 |
>> ZTREQ | EXIT+2* |