PXRMCOND ; SLC/PKR - Routines for evaluating conditions. ;06/01/2007
Source file <PXRMCOND.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 3 | EN^DDIOL $$GET1^DID ^DIM | 
| Clinical Reminders | 1 | $$STRREP^PXRMUTIL | 
| Kernel | 1 | $$UP^XLFSTR | 
| Package | Total | Caller Graph | 
|---|---|---|
| Clinical Reminders | 7 | PXRMCF PXRMINDL PXRMINDX PXRMLOCF PXRMLOCL PXRMTAX PXRMV2IC | 
| IHS Mods To Patient Care Encounter | 1 | BPXRMREF | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| RECSUB(IND,V,VA,NSTAR,VSTAR,NM,VM,CASESEN,ICOND,CONVAL) | ;Called recursively, | |
| STARCOND(CASESEN,ICOND,V,VA,NSTAR,VSTAR) | ;Execute a star condition, | |
| SCPAR(FINDPA,CASESEN,COND,UCIFS,ICOND,VSLIST) | ;Set the Condition parameters. | |
| VSPACE(COND) | ;Make sure all spaces in the condition that come after | |
| CASESEN(X,DA,FILENUM) | ; | |
| MV(VSLIST,CASESEN,V,VA) | ;Move the elements of VA included in VSLIST | |
| SICOND(X,DA,FILENUM) | ;Set the internal condition field. Wrap all V() in $G. | |
| COND(CASESEN,ICOND,VSLIST,VA) | ;Evaluate the condition. | |
| VSUB(COND) | ;Make sure all V subscripts are quoted strings, numbers | |
| KICOND(X,DA,FILENUM) | ; | |
| VCOND(X) | ; | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PXD(811.9 - [#811.9] | KICOND+7!, SICOND+27* | 
| ^PXRMD(811.5 - [#811.5] | KICOND+6!, SICOND+26* | 
| Name | Line Occurrences | 
|---|---|
| $$STARCOND | COND+13 | 
| $$VSPACE | VCOND+21 | 
| $$VSUB | VCOND+22 | 
| MV | COND+11 | 
| RECSUB | RECSUB+12, STARCOND+28 | 
| SICOND | CASESEN+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CASESEN | COND~, COND+9, COND+11, COND+13, MV~, MV+10, RECSUB~, RECSUB+11, RECSUB+12, SCPAR~ , SCPAR+7*, SCPAR+8*, SICOND+7~, SICOND+10*, SICOND+11*, SICOND+14, SICOND+15, STARCOND~, STARCOND+28 | 
| CHAR | VSPACE+2~, VSPACE+6*, VSPACE+7, VSPACE+10 | 
| COND | CASESEN+2~, CASESEN+5*, CASESEN+6, SCPAR~, SCPAR+3*, SCPAR+6, VCOND+19~, VCOND+20*, VCOND+21, VCOND+22 , VSPACE~, VSPACE+5, VSPACE+6, VSUB~, VSUB+4, VSUB+5, VSUB+8, VSUB+11 | 
| CONDS | SCPAR+1~, SCPAR+2*, SCPAR+3, SCPAR+5, SCPAR+7 | 
| CONVAL | COND+1~, COND+2*, COND+12*, COND+13*, COND+14, RECSUB~, RECSUB+6, RECSUB+12, RECSUB+13*, RECSUB+16* , STARCOND+3~, STARCOND+27*, STARCOND+28, STARCOND+29 | 
| DA | CASESEN~, CASESEN+4, CASESEN+6, KICOND~, KICOND+6, KICOND+7, SICOND~, SICOND+9, SICOND+26, SICOND+27 | 
| DA(1 | CASESEN+4, KICOND+6, KICOND+7, SICOND+9, SICOND+26, SICOND+27 | 
| >> DIUTIL | KICOND+2, SICOND+4 | 
| FILENUM | CASESEN~, CASESEN+3, CASESEN+6, KICOND~, KICOND+5*, KICOND+6, KICOND+7, SICOND~, SICOND+8, SICOND+26 , SICOND+27 | 
| FINDPA | SCPAR~ | 
| FINDPA(10 | SCPAR+9 | 
| FINDPA(11 | SCPAR+9 | 
| FINDPA(3 | SCPAR+2 | 
| GBL | CASESEN+2~, CASESEN+3*, CASESEN+4*, CASESEN+5, SICOND+7~, SICOND+8*, SICOND+9*, SICOND+10 | 
| ICOND | COND~, COND+4, COND+12, COND+13, RECSUB~, RECSUB+12, RECSUB+13, RECSUB+16, SCPAR~, SCPAR+9* , SICOND+7~, SICOND+14*, SICOND+15*, SICOND+25*, SICOND+26, SICOND+27, STARCOND~, STARCOND+28 | 
| IND | COND+1~, COND+6*, MV+2~, MV+4*, MV+5, RECSUB~, RECSUB+6, RECSUB+7, RECSUB+9, RECSUB+12 , RECSUB+13, RECSUB+16, SICOND+7~, STARCOND+3~, STARCOND+13*, STARCOND+15, STARCOND+16, STARCOND+25, STARCOND+26, STARCOND+28* , VSPACE+2~, VSPACE+5*, VSPACE+6, VSPACE+8, VSPACE+9, VSPACE+10, VSPACE+12*, VSPACE+18*, VSUB+2~, VSUB+12* , VSUB+13 | 
| IQ | VSPACE+2~, VSPACE+14*, VSPACE+16*, VSPACE+17 | 
| JND | COND+1~, RECSUB+5~, RECSUB+6*, RECSUB+7, STARCOND+3~, STARCOND+17*, STARCOND+18, STARCOND+19, VSPACE+2~, VSPACE+15* , VSPACE+16* | 
| KND | STARCOND+3~, STARCOND+21*, STARCOND+22, STARCOND+24* | 
| LQ | VSPACE+2~, VSPACE+4*, VSPACE+8*, VSPACE+9* | 
| MATCH | STARCOND+3~, STARCOND+20*, STARCOND+24*, STARCOND+25 | 
| NE | MV+2~, MV+3*, MV+4 | 
| NEWV | STARCOND+3~ | 
| NIQ | VSPACE+2~, VSPACE+11*, VSPACE+17*, VSPACE+18, VSPACE+19 | 
| NM | RECSUB~, RECSUB+12, STARCOND+3~, STARCOND+14*, STARCOND+25*, STARCOND+26, STARCOND+28 | 
| NM( | RECSUB+6, RECSUB+16, STARCOND+26* | 
| NQP | VSPACE+2~, VSPACE+4*, VSPACE+8*, VSPACE+15, VSPACE+16 | 
| NSP | VSPACE+2~, VSPACE+4*, VSPACE+10*, VSPACE+12, VSPACE+13, VSPACE+18 | 
| NSTAR | COND+1~, COND+5*, COND+7*, COND+12, COND+13, RECSUB~, RECSUB+12, RECSUB+13, RECSUB+16, STARCOND~ , STARCOND+13, STARCOND+28 | 
| NVA | STARCOND+3~, STARCOND+6*, STARCOND+11*, STARCOND+17 | 
| ORV | STARCOND+3~ | 
| >> PXRMEXCH | KICOND+4, SICOND+6, VCOND+3 | 
| QP | VSPACE+2~ | 
| QP( | VSPACE+8*, VSPACE+16 | 
| REF | STARCOND+3~, STARCOND+6*, STARCOND+7*, STARCOND+8 | 
| RP | VSUB+2~, VSUB+5*, VSUB+6, VSUB+11 | 
| RV | MV+2~, MV+7*, MV+10, RECSUB+5~, RECSUB+10*, RECSUB+11 | 
| RVA | MV+2~, MV+7*, MV+9, MV+10, RECSUB+5~, RECSUB+8*, RECSUB+11 | 
| SE | SICOND+7~, SICOND+18*, SICOND+19 | 
| SP | VSPACE+2~ | 
| SP( | VSPACE+10*, VSPACE+13 | 
| SPACE | VSPACE+2~, VSPACE+13*, VSPACE+16 | 
| SS | SICOND+7~, SICOND+16*, SICOND+17*, SICOND+18, SICOND+19, VSUB+2~, VSUB+3*, VSUB+4*, VSUB+5, VSUB+8 , VSUB+11 | 
| SUB | COND+1~, COND+6*, COND+7, MV+2~, MV+5*, MV+6, MV+7, RECSUB+9*, RECSUB+10, SICOND+7~ , SICOND+19*, SICOND+20, SICOND+21, SICOND+22, SICOND+23, STARCOND+3~, STARCOND+8*, STARCOND+9*, STARCOND+10, STARCOND+11 , STARCOND+19*, STARCOND+24, STARCOND+25, VSUB+2~, VSUB+13*, VSUB+15, VSUB+17, VSUB+19 | 
| SUBL | STARCOND+3~, STARCOND+10*, STARCOND+11, STARCOND+16*, STARCOND+18, STARCOND+21, STARCOND+24, VSUB+2~, VSUB+11*, VSUB+12 , VSUB+13 | 
| SUBLIST | SICOND+7~ | 
| SUBLIST( | SICOND+20, SICOND+21* | 
| TCOND | STARCOND+3~ | 
| TEMP | COND+1~, SICOND+7~, SICOND+24*, SICOND+25, STARCOND+3~, STARCOND+22*, STARCOND+23, STARCOND+24, VCOND+19~ | 
| TEXT | VSUB+7~, VSUB+8*, VSUB+9 | 
| U | CASESEN+5, COND+7, RECSUB+9, SCPAR+3, SCPAR+5, SCPAR+7, SICOND+10, STARCOND+11, STARCOND+15, STARCOND+19 , VSPACE+8, VSPACE+16 | 
| UCIFS | SCPAR~, SCPAR+5* | 
| V | COND+1~, COND+8*, COND+9*, COND+11, COND+13, MV~, RECSUB~, RECSUB+12, STARCOND~, STARCOND+28 | 
| VA | COND~, COND+11, COND+13, MV~, RECSUB~, RECSUB+12, STARCOND~, STARCOND+28 | 
| VA("VALUE" | COND+8 | 
| VALID | VCOND+19~, VCOND+21*, VCOND+22*, VCOND+23, VCOND+27*, VCOND+28, VSPACE+2~, VSPACE+3*, VSPACE+21*, VSPACE+22 , VSUB+2~, VSUB+3*, VSUB+4, VSUB+10*, VSUB+19*, VSUB+20, VSUB+21 | 
| VASUB | RECSUB+5~, RECSUB+7*, RECSUB+8, STARCOND+4~ | 
| VASUB( | STARCOND+11*, STARCOND+18, STARCOND+19 | 
| VM | RECSUB~, RECSUB+12, STARCOND+4~, STARCOND+28 | 
| VM( | RECSUB+7, STARCOND+25* | 
| VSLIST | COND~, COND+6, COND+11, MV~, MV+3, MV+5, SCPAR~, SCPAR+9*, SICOND+7~, SICOND+16* , SICOND+22*, SICOND+26, SICOND+27 | 
| VSSUB | STARCOND+4~, STARCOND+15*, STARCOND+22 | 
| VSTAR | COND+1~, COND+13, RECSUB~, RECSUB+12, STARCOND~, STARCOND+28 | 
| VSTAR( | COND+7*, RECSUB+9, STARCOND+15, STARCOND+16 | 
| VSUB | RECSUB+5~ | 
| VWSUB | SICOND+7~, SICOND+23*, SICOND+24, SICOND+25 | 
| X | CASESEN~, KICOND~, SICOND~, SICOND+2, SICOND+13, SICOND+14*, SICOND+15, SICOND+18, SICOND+19, VCOND~ , VCOND+5*, VCOND+6, VCOND+7*, VCOND+10, VCOND+11*, VCOND+14, VCOND+15*, VCOND+20, VCOND+25 | 
| XUP | SICOND+7~, SICOND+13*, SICOND+14, SICOND+17 |