BKMRMEX ;PRXM/HC/ALA-HMS Exam Reminders ; 13 Nov 2007 4:02 PM
Source file <BKMRMEX.m>
Package | Total | Call Graph |
---|---|---|
IHS HIV Management System | 4 | (ADATAX,CPTTAX,LABTAX,LOINC)^BKMIXX (EXAMTAX,ICDTAX)^BKMIXX1 (CLNTAX,PRVTAX)^BKMIXX2 ADDLINE^BKMVF32 |
Kernel | 1 | $$SCH^XLFDT |
Patient Care Component | 1 | ($$DATE,WRITE)^APCHSMU |
Name | Comments | DBIA/ICR reference |
---|---|---|
EX02(GUI) | ;EP - REM.P.02
; Dental Exam Due ; Due date = Today, if no dental exam (P.02) ever documented. ; Due date = Date of most recent dental exam + 365 days (or 12 months) ; If "Now," then text = "Dental Exam may be due now; last documented [date]." |
|
EX01(GUI) | ;EP - REM.P.01
; Eye Exam Due ; Due date = Today, if no dilated eye exam (P.03) ever documented. ; Due date = Date of most recent dilated eye exam + 183 days (or 6 months) ; if any CD4 Absolute laboratory test (T.30) since most recent ; dilated eye exam is < 50. ; Above definition changed from CD4 (T.2) to CD4 Absolute (T.30) and from most recent to any. ; Due date = Date of most recent dilated eye exam + 365 days (or 12 months). ; If "Now," then text = "Dilated eye exam may be due now; last documented [date]." |
|
WRITE(REM,GUI) | ; Write out the reminder
|
Name | Field # of Occurrence |
---|---|
$$DATE^APCHSMU | WRITE+4, WRITE+5 |
WRITE^APCHSMU | WRITE+6 |
ADATAX^BKMIXX | EX02+9 |
CPTTAX^BKMIXX | EX01+13, EX01+32 |
LABTAX^BKMIXX | EX01+29 |
LOINC^BKMIXX | EX01+30 |
EXAMTAX^BKMIXX1 | EX01+12, EX02+8 |
ICDTAX^BKMIXX1 | EX01+15, EX02+11 |
CLNTAX^BKMIXX2 | EX01+23 |
PRVTAX^BKMIXX2 | EX01+19 |
ADDLINE^BKMVF32 | EX01+37, EX02+15 |
$$SCH^XLFDT | EX01+33, EX01+35, EX02+13 |
Name | Line Occurrences |
---|---|
WRITE | EX01+38, EX02+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APCHLAST | WRITE+1*, WRITE+2, WRITE+7, WRITE+9! |
APCHNEXT | WRITE+3*, WRITE+4, WRITE+5, WRITE+7, WRITE+9! |
APCHSTEX | WRITE+9! |
APCHSTEX(1 | WRITE+2*, WRITE+4*, WRITE+5*, WRITE+7 |
>> BKMSUP | WRITE+8 |
CD4 | EX01+9~, EX01+26~, EX01+34*, EX01+35* |
CLN | EX01+9~, EX01+22*, EX01+23 |
>> DFN | EX01+12, EX01+13, EX01+15, EX01+19, EX01+23, EX01+29, EX01+30, EX01+32, EX02+8, EX02+9 , EX02+11 |
DT | EX01+36, EX02+14, WRITE+4, WRITE+5 |
DUE | EX01+9~, EX01+11*, EX01+33*, EX01+35*, EX01+36*, EX01+37, EX02+5~, EX02+7*, EX02+13*, EX02+14* , EX02+15 |
GLOBAL | EX01+26~, EX01+28*, EX01+29, EX01+30, EX01+31*, EX01+32 |
GUI | EX01~, EX01+10*, EX01+38, EX02~, EX02+6*, EX02+16, WRITE~, WRITE+6, WRITE+7 |
LABTEST | EX01+26~ |
LAST | EX01+9~, EX01+11*, EX01+12, EX01+14*, EX01+16*, EX01+20*, EX01+24*, EX01+25, EX01+27, EX01+33 , EX01+35, EX01+36, EX01+37, EX02+5~, EX02+7*, EX02+8, EX02+10*, EX02+12*, EX02+13, EX02+14 , EX02+15 |
LAST1 | EX01+9~, EX01+11*, EX01+13, EX01+14, EX01+15, EX01+16, EX01+19, EX01+20, EX01+23, EX01+24 , EX02+5~, EX02+7*, EX02+9, EX02+10, EX02+11, EX02+12 |
LIST | EX01+9~, EX01+37, EX02+5~, EX02+15, WRITE+8, WRITE+9! |
LIST( | WRITE+1, WRITE+3 |
LRESULT | EX01+9~, EX01+11* |
PRV | EX01+9~, EX01+18*, EX01+19 |
REM | WRITE~, WRITE+1, WRITE+3 |
>> REMDUE | WRITE+7* |
>> REMLAST | WRITE+7* |
>> REMLIST | WRITE+8* |
>> REMNEXT | WRITE+7* |
SINCE | EX01+26~, EX01+27*, EX01+29, EX01+30, EX01+32 |
U | EX01+35 |