ORQQPX ; SLC/JM - PCE and Reminder routines ;10/16/2019
Source file <ORQQPX.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 3 | MAIN^PXRM CATREM^PXRMAPI0 (APPL,AVAL)^PXRMRPCA |
| Authorization Subscription | 1 | $$ISA^USRLM |
| Order Entry Results Reporting | 1 | ALIST^ORQQPXRM |
| PCE Patient Care Encounter | 1 | IMMUN^PXRHS03 |
| Registration | 1 | OERR^VADPT |
| Toolkit | 1 | ($$GET,DEL,EN,GETLST,GETWP,NDEL)^XPAR |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
|---|---|---|
| IMMLIST(ORY,ORPT,ORSORT) | ;return pt's immunization list:
|
|
| DETAIL(ORY,IMM) | ; return detailed information for an immunization
|
|
| REMIND(ORY,ORPT) | ;return pt's currently due PCE clinical reminders
; in the format file 811.9 ien^reminder print name^date due^last occur. |
|
| REMDET(ORY,ORPT,ORIEN) | ;return detail for a pt's clinical reminder
; ORY - return array ; ORPT - patient DFN ; ORIEN - clinical reminder (811.9 ien) |
|
| NEWACTIV(ORY) | ;Return true if Interactive Reminders are active
|
|
| HISTLOC(LST) | ;Returns a list of historical locations
|
|
| GETFLDRS(ORFLDRS) | ;Return Visible Reminder Folders
; Codes: D=Due, A=Applicable, N=Not Applicable, E=Evaluated, O=Other |
|
| SETFLDRS(ORY,ORFLDRS) | ;Sets Visible Reminder Folders for the current user
|
|
| GETDEFOL(ORDEFLOC) | ;Return Default Outside Locations
|
|
| INSCURS(ORY) | ; Returns status of ORQQPX REMINDER TEXT AT CURSOR
|
|
| NEWCVOK(ORY) | ; Returns status of
|
|
| ADDNAME(ORX) | ; Add Reminder or Category Name as 3rd piece
|
|
| REMACCUM(ORY,LVL,TYP,SORT,CLASS) | ; Accumulates ORTMP into ORY
; Format of entries in ORQQPX COVER SHEET REMINDERS: ; L:Lock;R:Remove;N:Normal / C:Category;R:Reminder / Cat or Rem IEN |
|
| ADDREM(ORY,IDX,IEN) | ; Add Reminder to ORY list
|
|
| ADDCAT(ORY,IDX,IEN) | ; Add Category Reminders to ORY list
|
|
| REMLIST(ORY,LOC) | ;Returns a list of all cover sheet reminders
|
|
| LVREMLST(ORY,LVL,CLASS) | ;Returns cover sheet reminders at a specified level
|
|
| SAVELVL(ORY,LVL,CLASS,DATA) | ;Save cover sheet reminders at a specified level
|
|
| GETLIST(ORY,ORLOC) | ;Returns a list of all cover sheet reminders
|
|
| EVALCOVR(ORY,ORPT,ORLOC) | ; Evaluate Cover Sheet Reminders
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | NEWACTIV+4, HISTLOC+8, GETFLDRS+3, GETDEFOL+2, INSCURS+2, NEWCVOK+2, REMLIST+2 |
| ALIST^ORQQPXRM | EVALCOVR+3 |
| IMMUN^PXRHS03 | IMMLIST+2, IMMLIST+4 |
| MAIN^PXRM | REMDET+5 |
| CATREM^PXRMAPI0 | ADDCAT+2 |
| APPL^PXRMRPCA | NEWACTIV+2 |
| AVAL^PXRMRPCA | REMIND+15 |
| $$ISA^USRLM | REMACCUM+13 |
| OERR^VADPT | REMIND+8 |
| $$GET^XPAR | NEWACTIV+5 |
| DEL^XPAR | SAVELVL+5 |
| EN^XPAR | SETFLDRS+2, SAVELVL+6, SAVELVL+12 |
| GETLST^XPAR | GETFLDRS+4, GETDEFOL+3, INSCURS+3, NEWCVOK+3, REMACCUM+8, REMACCUM+21, REMLIST+6 |
| GETWP^XPAR | REMACCUM+15 |
| NDEL^XPAR | SAVELVL+9 |
| RPC Name | Call Tags |
|---|---|
| ORQQPX IMMUN LIST | IMMLIST |
| ORQQPX REMINDERS LIST | REMIND |
| ORQQPX REMINDER DETAIL | REMDET |
| ORQQPX GET HIST LOCATIONS | HISTLOC |
| ORQQPX NEW REMINDERS ACTIVE | NEWACTIV |
| ORQQPX GET FOLDERS | GETFLDRS |
| ORQQPX SET FOLDERS | SETFLDRS |
| ORQQPX GET DEF LOCATIONS | GETDEFOL |
| ORQQPX REM INSERT AT CURSOR | INSCURS |
| ORQQPX NEW COVER SHEET REMS | REMLIST |
| ORQQPX NEW COVER SHEET ACTIVE | NEWCVOK |
| ORQQPX LVREMLST | LVREMLST |
| ORQQPX SAVELVL | SAVELVL |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUTTLOC - [#9999999.06] | HISTLOC+5, HISTLOC+6 |
| ^DIC(42 - [#42] | REMIND+9 |
| ^PXD(811.9 - [#811.9] | ADDNAME+5, ADDREM+2, ADDREM+3, ADDREM+6 |
| ^PXRMD(811.7 - [#811.7] | ADDNAME+6 |
| ^TMP("OR" | HISTLOC+2!, HISTLOC+3, HISTLOC+11* |
| ^TMP("PXI" | IMMLIST+3!, IMMLIST+7, IMMLIST+8, IMMLIST+9, IMMLIST+10, IMMLIST+15! |
| ^TMP("PXRHM" | REMDET+4!, REMDET+7, REMDET+8, REMDET+9, REMDET+10! |
| Name | Line Occurrences |
|---|---|
| $$ADDNAME | REMACCUM+40 |
| ADDCAT | REMLIST+29 |
| ADDREM | ADDCAT+7, REMLIST+12, REMLIST+28 |
| GETLIST | EVALCOVR+2 |
| NEWCVOK | REMLIST+3 |
| REMACCUM | REMLIST+15, REMLIST+16, REMLIST+17, REMLIST+18, REMLIST+19, REMLIST+20, REMLIST+21, LVREMLST+1 |
| REMLIST | REMIND+12, GETLIST+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADD | REMACCUM+4~, REMACCUM+12*, REMACCUM+13*, REMACCUM+14, REMACCUM+22*, REMACCUM+26 |
| CAT | ADDNAME+1~, ADDNAME+2*, ADDNAME+5, ADDNAME+6 |
| CLASS | REMACCUM~, REMACCUM+9*, REMACCUM+12, LVREMLST~, LVREMLST+1, SAVELVL~, SAVELVL+5, SAVELVL+6 |
| CODE | REMACCUM+4~, REMLIST+1~, REMLIST+26*, REMLIST+28, REMLIST+29 |
| CR | REMDET+6~ |
| DATA | SAVELVL~, SAVELVL+6 |
| DATA( | SAVELVL+11, SAVELVL+12 |
| DFN | REMIND+8~* |
| DOADD | REMACCUM+4~, REMACCUM+26*, REMACCUM+28*, REMACCUM+36*, REMACCUM+37 |
| DUZ | NEWACTIV+2, NEWACTIV+4, NEWACTIV+5, GETFLDRS+3, SETFLDRS+2, GETDEFOL+2, INSCURS+2, NEWCVOK+2, REMACCUM+13, REMLIST+2 |
| FFLAG | REMACCUM+4~, REMACCUM+32*, REMACCUM+34, REMACCUM+35 |
| FIEN | REMACCUM+4~, REMACCUM+31*, REMACCUM+32 |
| FLAG | REMACCUM+3~, REMACCUM+25*, REMACCUM+34, REMACCUM+35, REMACCUM+36 |
| FOUND | REMACCUM+3~, REMACCUM+24*, REMACCUM+29, REMACCUM+32*, REMACCUM+33, REMACCUM+34, REMACCUM+35 |
| I | REMDET+6~*, REMDET+9*, REMACCUM+3~, REMACCUM+9*, REMACCUM+10*, REMACCUM+11, REMACCUM+22*, REMACCUM+23*, REMACCUM+24, REMACCUM+38 , ADDCAT+1~, ADDCAT+3*, ADDCAT+4*, ADDCAT+5, ADDCAT+7, REMLIST+1~, REMLIST+7*, REMLIST+8*, REMLIST+9, REMLIST+11 , REMLIST+22*, REMLIST+23*, REMLIST+24, REMLIST+26, REMLIST+27, SAVELVL+1~, SAVELVL+10*, SAVELVL+11*, SAVELVL+12, GETLIST+1~ , GETLIST+3*, GETLIST+4*, GETLIST+5 |
| IDX | HISTLOC+1~, HISTLOC+4*, HISTLOC+5*, HISTLOC+6, REMACCUM+3~, REMACCUM+22*, REMACCUM+38, REMACCUM+39, REMACCUM+40, REMACCUM+41* , ADDREM~, ADDREM+11, ADDCAT~, ADDCAT+7, REMLIST+1~, REMLIST+9*, REMLIST+10*, REMLIST+12, REMLIST+24*, REMLIST+25* , REMLIST+28, REMLIST+29 |
| IDX2 | ADDCAT+1~, ADDCAT+5*, ADDCAT+6*, ADDCAT+7 |
| IEN | IMMLIST+5~, IMMLIST+6*, IMMLIST+9*, IMMLIST+10, IMMLIST+11, ADDNAME+1~, ADDNAME+3*, ADDNAME+4, ADDNAME+5, ADDNAME+6 , REMACCUM+3~, REMACCUM+25*, REMACCUM+32, ADDREM~, ADDREM+1, ADDREM+2, ADDREM+3, ADDREM+6, ADDREM+11, ADDREM+12 , ADDCAT~, ADDCAT+2, REMLIST+1~, REMLIST+11*, REMLIST+12, REMLIST+27*, REMLIST+28, REMLIST+29 |
| IMM | IMMLIST+5~, IMMLIST+6*, IMMLIST+7*, IMMLIST+8, IMMLIST+9, IMMLIST+10, IMMLIST+11, DETAIL~ |
| IVDT | IMMLIST+5~, IMMLIST+6*, IMMLIST+8*, IMMLIST+9, IMMLIST+10, IMMLIST+12, IMMLIST+13 |
| J | REMDET+6~, REMDET+8*, REMDET+9, REMACCUM+3~, REMACCUM+19*, REMACCUM+20, REMACCUM+24*, REMACCUM+29*, REMACCUM+30, REMACCUM+32 , REMLIST+1~ |
| K | REMACCUM+3~, REMACCUM+16*, REMACCUM+17*, REMACCUM+19, REMACCUM+20 |
| LINE | HISTLOC+1~, HISTLOC+4*, HISTLOC+10*, HISTLOC+11 |
| LOC | REMLIST~, REMLIST+6, REMLIST+19 |
| LST | HISTLOC~, HISTLOC+3* |
| LVL | REMACCUM~, REMACCUM+5, REMACCUM+21, LVREMLST~, LVREMLST+1, SAVELVL~, SAVELVL+2, SAVELVL+4*, SAVELVL+5, SAVELVL+6 , SAVELVL+9, SAVELVL+12 |
| M | REMACCUM+3~, REMACCUM+9*, REMACCUM+18*, REMACCUM+20 |
| NAME | HISTLOC+1~, HISTLOC+8*, HISTLOC+9, HISTLOC+11 |
| NEWP | REMLIST+1~, REMLIST+3, REMLIST+4 |
| NREM | ADDCAT+1~ |
| OLDLIST | REMLIST+5~, REMLIST+6 |
| OLDLIST( | REMLIST+8, REMLIST+9, REMLIST+11 |
| ORCLS | REMACCUM+6~, REMACCUM+11*, REMACCUM+12, REMACCUM+13, REMACCUM+15 |
| ORCLSPRM | REMACCUM+6~, REMACCUM+7*, REMACCUM+8, REMACCUM+15 |
| ORDEFLOC | GETDEFOL~, GETDEFOL+3 |
| ORDUEDT | REMIND+2~ |
| ORERR | GETFLDRS+2~, GETFLDRS+4, SETFLDRS+1~, SETFLDRS+2, GETDEFOL+1~, GETDEFOL+3, INSCURS+1~, INSCURS+3, NEWCVOK+1~, NEWCVOK+3 , REMACCUM+3~, REMACCUM+8, REMACCUM+13, REMACCUM+15, REMACCUM+21, REMLIST+6, SAVELVL+1~, SAVELVL+5, SAVELVL+6, SAVELVL+9 , SAVELVL+12 |
| ORFLDRS | GETFLDRS~, GETFLDRS+5*, GETFLDRS+6*, SETFLDRS~, SETFLDRS+2 |
| ORI | IMMLIST+5~, IMMLIST+6*, IMMLIST+10*, IMMLIST+11, IMMLIST+12, IMMLIST+13, REMIND+2~ |
| ORIEN | REMIND+2~, REMDET~, REMDET+5, REMDET+7, REMDET+8, REMDET+9 |
| ORJ | REMIND+2~, REMIND+3* |
| ORLASTDT | REMIND+2~ |
| ORLOC | REMIND+2~, REMIND+9*, REMIND+12, GETLIST~, GETLIST+2, EVALCOVR~, EVALCOVR+2 |
| ORLST | REMACCUM+6~, REMACCUM+8, REMLIST+1~, REMLIST+15, REMLIST+16, REMLIST+17, REMLIST+18, REMLIST+19, REMLIST+20, REMLIST+21 |
| ORLST( | REMACCUM+10, REMACCUM+11, REMLIST+23, REMLIST+24, REMLIST+26, REMLIST+27 |
| ORPT | IMMLIST~, IMMLIST+4, REMIND~, REMIND+7, REMIND+8, REMDET~, REMDET+5, EVALCOVR~, EVALCOVR+3 |
| ORREM | ADDCAT+1~, ADDCAT+2 |
| ORREM( | ADDCAT+4, ADDCAT+7 |
| ORSORT | IMMLIST~, IMMLIST+4 |
| ORTMP | GETFLDRS+2~, GETFLDRS+4, GETFLDRS+5, INSCURS+1~, INSCURS+3, INSCURS+4, NEWCVOK+1~, NEWCVOK+3, NEWCVOK+4, REMACCUM+3~ , REMACCUM+21, EVALCOVR+1~, EVALCOVR+2, EVALCOVR+3 |
| ORTMP( | REMACCUM+20*, REMACCUM+23, REMACCUM+24, REMACCUM+38 |
| ORTMP(1 | GETFLDRS+5, INSCURS+4, NEWCVOK+4 |
| ORTMPLST | REMIND+2~, REMIND+12, REMIND+15 |
| ORTXT | REMIND+2~, REMDET+6~, REMDET+7*, REMDET+8, REMDET+9 |
| ORWP | REMACCUM+6~, REMACCUM+15 |
| ORWP( | REMACCUM+17, REMACCUM+19, REMACCUM+20 |
| ORX | REMIND+2~, ADDNAME~, ADDNAME+2, ADDNAME+3, ADDNAME+5*, ADDNAME+6*, ADDNAME+7 |
| ORY | IMMLIST~, DETAIL~, REMIND~, REMDET~, NEWACTIV~, NEWACTIV+1*, NEWACTIV+5*, NEWACTIV+6*, NEWACTIV+7*, SETFLDRS~ , SETFLDRS+3*, INSCURS~, INSCURS+2*, INSCURS+4*, NEWCVOK~, NEWCVOK+2*, NEWCVOK+4*, REMACCUM~, REMACCUM+42*, ADDREM~ , ADDCAT~, ADDCAT+7, REMLIST~, REMLIST+28, REMLIST+29, LVREMLST~, LVREMLST+1, SAVELVL~, SAVELVL+13*, GETLIST~ , GETLIST+2, EVALCOVR~, EVALCOVR+3 |
| ORY( | IMMLIST+11*, IMMLIST+12*, IMMLIST+13*, REMDET+9*, REMACCUM+29, REMACCUM+30, REMACCUM+34!, REMACCUM+35*, ADDREM+11*, REMLIST+25 , GETLIST+4, GETLIST+5* |
| ORY("B" | ADDREM+1, ADDREM+12*, REMLIST+30! |
| ORY(1 | IMMLIST+2*, IMMLIST+14*, DETAIL+1* |
| ORY(999999 | REMACCUM+22 |
| OUT | REMACCUM+4~, REMACCUM+42 |
| OUT( | REMACCUM+38*, REMACCUM+39*, REMACCUM+40* |
| P2 | REMACCUM+4~, REMACCUM+24*, REMACCUM+25, REMACCUM+30*, REMACCUM+31, REMACCUM+32, REMACCUM+35* |
| PARAM | SAVELVL+1~, SAVELVL+3*, SAVELVL+5, SAVELVL+6, SAVELVL+8*, SAVELVL+9, SAVELVL+12 |
| PTR | HISTLOC+1~, HISTLOC+6*, HISTLOC+7, HISTLOC+8, HISTLOC+11 |
| RESULT | REMLIST+5~, REMLIST+12 |
| RESULT( | REMLIST+10 |
| RESULT("B" | REMLIST+13! |
| SORT | REMACCUM~, REMACCUM+22, REMACCUM+39, REMACCUM+40 |
| SRV | NEWACTIV+3~, NEWACTIV+4*, NEWACTIV+5, GETFLDRS+2~, GETFLDRS+3*, GETFLDRS+4, GETDEFOL+1~, GETDEFOL+2*, GETDEFOL+3, INSCURS+1~ , INSCURS+2*, INSCURS+3, NEWCVOK+1~, NEWCVOK+2*, NEWCVOK+3, REMLIST+1~, REMLIST+2*, REMLIST+6, REMLIST+18 |
| TYP | REMACCUM~, REMACCUM+21 |
| U | IMMLIST+11, IMMLIST+12, IMMLIST+13, HISTLOC+11, GETFLDRS+5, INSCURS+4, NEWCVOK+4, ADDNAME+2, ADDNAME+3, ADDNAME+5 , ADDNAME+6, REMACCUM+11, REMACCUM+20, REMACCUM+24, REMACCUM+30, REMACCUM+35, REMACCUM+39, ADDREM+3, ADDREM+6, ADDREM+11 , ADDCAT+7, REMLIST+9, REMLIST+11, REMLIST+24, REMLIST+26, REMLIST+27, SAVELVL+12, GETLIST+5 |
| USAGE | ADDREM+5~, ADDREM+6*, ADDREM+8, ADDREM+10 |
| VA200 | REMIND+8*, REMIND+10! |
| VAIN | REMIND+10! |
| VAIN(4 | REMIND+9 |
| X | IMMLIST+5~, IMMLIST+10*, IMMLIST+11, IMMLIST+12 |
| Name | Field # of Occurrence |
|---|---|
| $T(APPL^PXRMRPCA | NEWACTIV+2 |
| $T(IMMUN^PXRHS03 | IMMLIST+2 |