PXRMLCR ; SLC/PJH - Create Patient List from individual finding rule; 04/15/2014
Source file <PXRMLCR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LR1 | ||
| SECURE | ;option to secure the list
|
|
| PL1 | ||
| LIST | ||
| RULE | ||
| DPAT | ||
| PURGE | ;Option to purge the list
|
|
| START | ||
| LRULE(RULE) | ;Select List Rule
|
|
| EXIT | ||
| REMOVE(IEN) | ;
|
|
| HELP(CALL) | ;General help text routine
|
|
| DATE | ||
| PLIST(LIST,TEXT,IENO) | ;Select Patient List
|
|
| RUN(PXRMRULE,PXRMLIST,PXRMNODE,BEG,END,PXRMDPAT,PXRMTPAT) | ;
|
|
| TPAT |
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | TPAT+32 |
| EN^DDIOL | LR1+29 |
| ^DIC | PL1+7, LR1+5 |
| ^DIK | LIST+4 |
| ^DIR | TPAT+26 |
| $$ASKYN^PXRMEUT | DPAT, TPAT, PL1+19 |
| $$LDELOK^PXRMEUT | PL1+21 |
| DATES^PXRMEUT | DATE |
| HELP^PXRMEUT | HELP+17 |
| RUN^PXRMLCR | TPAT+2 |
| CLEAR^PXRMRULE | RUN+4 |
| START^PXRMRULE | RUN+2 |
| ASK^PXRMXD | SECURE+2, PURGE+2 |
| $$FMTE^XLFDT | TPAT+23 |
| $$NOW^XLFDT | TPAT+20 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PXRMXP(810.5 - [#810.5] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXRM(810.4 - [#810.4] | LR1+14, LR1+17, LR1+18, LR1+25, REMOVE+1* |
| ^PXRMXP(810.5 - [#810.5] | LIST+2, TPAT+21 |
| ^TMP("PXRMLCR" | START+8! |
| ^XTMP("PXRM_DISEV" | START+2 |
| Name | Line Occurrences |
|---|---|
| DATE | DPAT+1 |
| DPAT | TPAT+1 |
| LIST | RULE |
| LR1 | LR1+6, LR1+15, LR1+27 |
| LRULE | RULE |
| PL1 | PL1+8, PL1+14, PL1+20, PL1+22 |
| PLIST | LIST |
| RULE | DATE |
| SECURE | PURGE+2 |
| START | SECURE+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BEG | START~, DATE, TPAT+2, RUN~, RUN+2 |
| CALL | HELP~, HELP+2, HELP+6, HELP+10, HELP+13 |
| >> DA | LIST+4* |
| DIC | PLIST+1~, PL1*, LRULE+1~, LR1* |
| DIC("A" | PL1+1*, LR1+1* |
| DIC("DR" | PL1+5* |
| DIC("S" | PL1+2*, LR1+3* |
| DIC(0 | PL1*, LR1* |
| DIK | LIST+3~, LIST+4* |
| DIR | TPAT+19~ |
| DIR("A" | TPAT+22*, TPAT+23*, TPAT+24* |
| DIR(0 | TPAT+25* |
| DLAYGO | PLIST+1~, PL1* |
| DTOUT | START~, LIST, SECURE+2, PURGE+2, RULE, DATE, DPAT+1, TPAT+1, TPAT+19~, TPAT+27 , PL1+9*, PL1+11, PL1+20, LR1+7*, LR1+9 |
| DUOUT | START~, LIST, SECURE+2, PURGE+2, RULE, DATE, DPAT+1, TPAT+1, TPAT+19~, TPAT+27 , PL1+10*, PL1+11, PL1+20, LR1+8*, LR1+9 |
| DUZ | PL1+5 |
| END | START~, DATE, TPAT+2, RUN~, RUN+2 |
| ERROR | LR1+13~, LR1+16*, LR1+17, LR1+20*, LR1+21*, LR1+22*, LR1+26*, LR1+27 |
| HTEXT | HELP+1~, HELP+17 |
| HTEXT(1 | HELP+3*, HELP+7*, HELP+11*, HELP+14* |
| HTEXT(2 | HELP+4*, HELP+8*, HELP+15* |
| HTEXT(3 | HELP+16* |
| IEN | REMOVE~, REMOVE+1 |
| IENO | PLIST~, PL1+14 |
| >> IORESET | START+12 |
| LIST | PLIST~, PL1+16*, PL1+25* |
| LIT | START~, START+10*, DATE |
| LR | LR1+13~, LR1+19*, LR1+21, LR1+24, LR1+25 |
| LRTYPE | LR1+13~, LR1+25*, LR1+26 |
| MINDT | TPAT+19~, TPAT+20*, TPAT+23, TPAT+25 |
| NL | LR1+13~, LR1+16*, LR1+20*, LR1+21*, LR1+22*, LR1+26* |
| OP | LR1+13~, LR1+19*, LR1+22, LR1+24 |
| OWRITE | PL1+18~, PL1+19*, PL1+20, PL1+21*, PL1+22 |
| PATCREAT | SECURE+1!, SECURE+2* |
| PLISTPUG | PURGE+1!, PURGE+2* |
| >> PXRMDEBG | TPAT+2 |
| PXRMDPAT | START~, DPAT*, TPAT+2, RUN~, RUN+2 |
| PXRMLIST | START~, LIST, LIST+1, LIST+2, LIST+4, TPAT+2, TPAT+21, RUN~, RUN+2 |
| PXRMNODE | START~, START+10*, TPAT+2, RUN~, RUN+2, RUN+4 |
| PXRMRULE | START~, RULE, TPAT+2, RUN~, RUN+2, RUN+4 |
| PXRMTPAT | START~, TPAT*, TPAT+2, RUN~, RUN+2 |
| RULE | LRULE~, LR1+11*, LR1+14, LR1+17, LR1+18 |
| SDTIME | TPAT+19~, TPAT+28*, TPAT+31 |
| SEQ | LR1+13~, LR1+19*, LR1+20 |
| STIME | TPAT+19~ |
| SUB | LR1+13~, LR1+14*, LR1+15, LR1+16*, LR1+17*, LR1+18 |
| TEMP | LR1+13~, LR1+18*, LR1+19 |
| TEXT | START+6~, START+14*, LIST, PLIST~, PL1+1, LR1+13~, LR1+29 |
| TEXT( | LR1+20*, LR1+21*, LR1+22*, LR1+26* |
| TEXT(1 | LR1+28* |
| U | LIST+2, TPAT+21, TPAT+25, PL1+9, PL1+14, PL1+16, PL1+19, PL1+21, PL1+25, LR1+7 , LR1+11, LR1+19, LR1+25, REMOVE+1 |
| X | TPAT+19~, PLIST+1~, PL1+8, PL1+9, LRULE+1~, LR1+6, LR1+7 |
| Y | TPAT+19~, TPAT+28, PLIST+1~, PL1+10, PL1+14, PL1+16, PL1+19, PL1+21, PL1+25, LRULE+1~ , LR1+8, LR1+11 |
| ZTDESC | TPAT+4~, TPAT+5*, TPAT+21 |
| ZTDTH | TPAT+4~, TPAT+31* |
| ZTIO | TPAT+4~, TPAT+16* |
| ZTRTN | TPAT+4~, TPAT+6* |
| ZTSAVE | TPAT+4~ |
| ZTSAVE("BEG" | TPAT+7* |
| ZTSAVE("END" | TPAT+8* |
| ZTSAVE("PATCREAT" | TPAT+9* |
| ZTSAVE("PLISTPUG" | TPAT+15* |
| ZTSAVE("PXRMDPAT" | TPAT+10* |
| ZTSAVE("PXRMLIST" | TPAT+11* |
| ZTSAVE("PXRMNODE" | TPAT+12* |
| ZTSAVE("PXRMRULE" | TPAT+13* |
| ZTSAVE("PXRMTPAT" | TPAT+14* |
| >> ZTSK | TPAT+33 |