ORVCODAEMON ;SPFO/AJB - VISTA CUTOVER ;Feb 19, 2021@09:28:36
Source file <ORVCODAEMON.m>
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 |
---|---|---|
SPAWN(THREADS) | ; spawn daemon tasks
|
|
DAEMON(GBL,INF,IEN,BROOD,THREAD,BMARK) | ; create background tasks, non-interactive
|
|
NEUROTICA(GBL,INF) | ; 'You just don't get it...what it is, well you're not really sure...'
|
|
TOTEM(INF) | ; 'I believe that what I'm feeling changes how the world appears...'
|
|
BLOCKS(THREADS,TOTAL) | ;
|
|
TASK(GBL,INF,IEN,BROOD,THREAD,BMARK) | ; background task, non-interactive
|
|
BE(DFN) | ; The Body Electric? aka Am I a Test Patient?
|
|
NEXUS6(DFN,TERMIEN) | ; N6MAA10816 - Primary care visit in last 3 years?
; input IEN of reminder term: VA-NEXUS CLINIC IN LAST THREE YEARS |
|
VISIT(DFN,X) | ; DBIA #2028 returns if patient has visit in X days
|
|
DTXT(DOCTXT) | ; do section to populate document text
|
|
DATA |
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | TASK+6 |
$$S^%ZTLOAD | DAEMON+18 |
$$FMR^ORVCO | SPAWN+21 |
$$LU^ORVCO | NEUROTICA+2 |
EXIT^ORVCO | SPAWN+21 |
PROMPT^ORVCO | SPAWN+27 |
THEGARDEN^ORVCOEND | DAEMON+54 |
$$CREATE^TIUVCO | DAEMON+29 |
CLEAN^XGF | SPAWN+27 |
SAY^XGF | SPAWN+12 |
$$DT^XLFDT | VISIT+1 |
$$FMADD^XLFDT | SPAWN+3 |
$$FMDIFF^XLFDT | VISIT+3, VISIT+6 |
$$HDIFF^XLFDT | DAEMON+39, DAEMON+44 |
$$HTE^XLFDT | DAEMON+40, DAEMON+41, DAEMON+45, DAEMON+46 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XTMP("ORVCO" | SPAWN+3*, SPAWN+4, SPAWN+5 |
Name | Line Occurrences |
---|---|
$$BE | SPAWN+13 |
$$NEXUS6 | DAEMON+23 |
$$VISIT | SPAWN+14 |
@( | NEXUS6+4, NEXUS6+6, DTXT+2, DTXT+3, DTXT+4 |
BLOCKS | SPAWN+23 |
DTXT | DAEMON+25 |
NEUROTICA | SPAWN+6 |
TASK | SPAWN+25 |
TOTEM | SPAWN+22 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BLOCKS | BLOCKS+1~, BLOCKS+2*, BLOCKS+3*, BLOCKS+6, BLOCKS+11, BLOCKS+13 |
BMARK | DAEMON~, DAEMON+12, DAEMON+14, DAEMON+27, DAEMON+54, TASK~ |
BROOD | DAEMON~, DAEMON+14, DAEMON+21, TASK~ |
CNT | SPAWN+10~, DAEMON+3~, BLOCKS+1~, BLOCKS+4*, BLOCKS+6, BLOCKS+7*, BLOCKS+8* |
CNT("Actual" | SPAWN+11*, SPAWN+12, TOTEM+1 |
CNT("Documents" | DAEMON+31*, DAEMON+33 |
CNT("Interval" | DAEMON+11*, DAEMON+18, DAEMON+27 |
CNT("No Prima | ry Care" , DAEMON+9*, DAEMON+23*, DAEMON+34, TOTEM+8 |
CNT("No Visit | s" , SPAWN+14*, TOTEM+2 |
CNT("Patients" | SPAWN+10*, SPAWN+15*, SPAWN+17, SPAWN+20, TOTEM+4 |
CNT("Processed" | DAEMON+14*, DAEMON+16*, DAEMON+18, DAEMON+20, DAEMON+21*, DAEMON+23, DAEMON+27, DAEMON+32 |
CNT("Test Pat | ients" , SPAWN+13*, TOTEM+3 |
CRD | SPAWN+17, SPAWN+20, DAEMON+3~, DAEMON+9*, DAEMON+28 |
DA | DAEMON+29~*, DAEMON+30 |
DFN | SPAWN+10~*, SPAWN+13, SPAWN+14, SPAWN+15, SPAWN+24*, SPAWN+25, DAEMON+3~, DAEMON+14*, DAEMON+23, DAEMON+24 , DAEMON+29, DAEMON+30, BLOCKS+1~, BLOCKS+4*, BLOCKS+6*, BLOCKS+9, BLOCKS+13, BE~, BE+1, BE+2 , NEXUS6~, VISIT~, VISIT+2, VISIT+5 |
DOCTXT | DAEMON+25~*, DAEMON+29, DTXT~ |
DT | SPAWN+3, VISIT+1*, VISIT+3, VISIT+6 |
>> EXIT | SPAWN+21* |
FIEVAL | NEXUS6+3~ |
FIEVAL(1 | NEXUS6+7 |
FINDPA | NEXUS6+3~ |
FINDPA(0 | NEXUS6+5* |
GBL | SPAWN+2~, SPAWN+4*, SPAWN+6, SPAWN+15, SPAWN+25, DAEMON~, DAEMON+14, DAEMON+24, NEUROTICA~, BLOCKS+6 , TASK~, BE+1~*, BE+2, VISIT+1~*, VISIT+2, VISIT+3, VISIT+5* |
GBL("DPT" | SPAWN+4*, SPAWN+10, SPAWN+15, NEUROTICA+3 |
IEN | SPAWN+2~, DAEMON~, DAEMON+14, TASK~ |
IEN( | SPAWN+24, SPAWN+25, BLOCKS+13* |
IEN(0 | BLOCKS+11* |
INF | SPAWN+2~, SPAWN+5*, SPAWN+6, SPAWN+7, SPAWN+22, SPAWN+25, DAEMON~, DAEMON+4, DAEMON+5, DAEMON+6 , DAEMON+7, DAEMON+9, DAEMON+19*, DAEMON+20, DAEMON+23, DAEMON+27, DAEMON+30, DAEMON+32*, DAEMON+33, DAEMON+34 , DAEMON+35, DAEMON+36, DAEMON+37, DAEMON+38, DAEMON+39, DAEMON+40, DAEMON+41, DAEMON+42, DAEMON+43, DAEMON+44 , DAEMON+45, DAEMON+46, DAEMON+47, DAEMON+48, DAEMON+49, DAEMON+50, DAEMON+51, DAEMON+53, NEUROTICA~, NEUROTICA+1 , NEUROTICA+3, TOTEM~, TOTEM+1, TOTEM+2, TOTEM+3, TOTEM+4*, TOTEM+5, TOTEM+6, TOTEM+7, TOTEM+8 , TOTEM+9*, BLOCKS+3, TASK~, TASK+6 |
IOF | SPAWN+1 |
LASTV | VISIT+1~, VISIT+2*, VISIT+3*, VISIT+5*, VISIT+6* |
LINE | DTXT+1~* |
>> MODE | SPAWN+16, SPAWN+20, TOTEM+5, TOTEM+7 |
NEXUS6 | SPAWN+2~, DAEMON+23, NEUROTICA+2* |
NODE | BE+1~, BE+2*, BE+3, BE+4 |
PFAC | DAEMON+3~, DAEMON+9*, TOTEM+6 |
PtName | DAEMON+24~*, DAEMON+30 |
RMD | DAEMON+3~, DAEMON+9*, DAEMON+11, DAEMON+23, DTXT+3, DTXT+4 |
ROU | NEXUS6+3~, NEXUS6+4*, NEXUS6+6* |
SECT | DTXT+1~*, DTXT+2, DTXT+3, DTXT+4 |
TERMARR | NEXUS6+3~ |
TERMIEN | NEXUS6~, NEXUS6+2 |
THREAD | SPAWN+2~, SPAWN+24*, SPAWN+25, SPAWN+26*, DAEMON~, DAEMON+7, DAEMON+19*, DAEMON+20, DAEMON+23, DAEMON+27 , DAEMON+32*, DAEMON+33, DAEMON+34, DAEMON+38, DAEMON+39, DAEMON+40, DAEMON+41, DAEMON+47*, DAEMON+48, DAEMON+49 , DAEMON+50, BLOCKS+1~, BLOCKS+4*, BLOCKS+6, BLOCKS+10, BLOCKS+11, BLOCKS+12*, BLOCKS+13, TASK~, TASK+1* , TASK+2 |
THREADS | SPAWN~, SPAWN+7*, SPAWN+23, BLOCKS~, BLOCKS+2, BLOCKS+3*, BLOCKS+4, BLOCKS+6, BLOCKS+10, BLOCKS+11 , BLOCKS+13 |
TIME | DAEMON+3~, DAEMON+12*, DAEMON+14 |
>> TITLE("Reminders" | TOTEM+7 |
>> TITLE("Summary" | TOTEM+7 |
TOTAL | SPAWN+2~, SPAWN+23, DAEMON+3~, DAEMON+9*, DAEMON+11, TOTEM+4*, BLOCKS~, BLOCKS+2, BLOCKS+3 |
TOTAL("FM" | SPAWN+8, NEUROTICA+3* |
Title | DAEMON+3~, DAEMON+9*, DAEMON+29 |
U | SPAWN+3, SPAWN+15, SPAWN+16, SPAWN+20, DAEMON+9, DAEMON+30, NEUROTICA+3, TOTEM+7, BE+2, BE+3 , BE+4, NEXUS6+5, VISIT+3, DTXT+2, DTXT+3, DTXT+4 |
USR | DAEMON+3~, DAEMON+9*, DAEMON+29, TOTEM+5 |
X | VISIT~, VISIT+3, VISIT+6 |
ZTDESC | TASK+1~, TASK+2* |
ZTDTH | TASK+1~, TASK+3* |
ZTIO | TASK+1~, TASK+3* |
>> ZTREQ | DAEMON+2* |
ZTRTN | TASK+1~, TASK+5* |
ZTSAVE | TASK+1~ |
ZTSAVE("BMARK" | TASK+4* |
ZTSAVE("BROOD" | TASK+4* |
ZTSAVE("GBL" | TASK+4* |
ZTSAVE("IEN" | TASK+4* |
ZTSAVE("INF" | TASK+4* |
ZTSAVE("NEXUS6" | TASK+4* |
ZTSAVE("THREAD" | TASK+4* |
ZTSK | TASK+1~, TASK+6 |
>> ZTSTOP | DAEMON+21*, DAEMON+32, DAEMON+42 |
Name | Field # of Occurrence |
---|---|
$T(DATA+LINE | DTXT+1 |