ORQQPX ; SLC/JM - PCE and Reminder routines ;11/16/2004
Source file <ORQQPX.m>
| Package | Total | Call Graph | 
|---|---|---|
| Clinical Reminders | 3 | MAIN^PXRM CATREM^PXRMAPI0 ($$DLG,$$DLGWIPE,APPL)^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 | 
| Package | Total | Caller Graph | 
|---|---|---|
| Order Entry Results Reporting | 1 | ORQQPXRM | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| 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 | |
| IMMLIST(ORY,ORPT) | ;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. | |
| GETDEFOL(ORDEFLOC) | ;Return Default Outside Locations | |
| NEWACTIV(ORY) | ;Return true if Interactive Reminders are active | |
| SAVELVL(ORY,LVL,CLASS,DATA) | ;Save cover sheet reminders at a specified level | |
| HISTLOC(LST) | ;Returns a list of historical locations | |
| INSCURS(ORY) | ; Returns status of ORQQPX REMINDER TEXT AT CURSOR | |
| REMDET(ORY,ORPT,ORIEN) | ;return detail for a pt's clinical reminder ; ORY - return array ; ORPT - patient DFN ; ORIEN - clinical reminder (811.9 ien) | |
| SETFLDRS(ORY,ORFLDRS) | ;Sets Visible Reminder Folders for the current user | |
| ADDREM(ORY,IDX,IEN) | ; Add Reminder to ORY list | |
| LVREMLST(ORY,LVL,CLASS) | ;Returns cover sheet reminders at a specified level | |
| GETFLDRS(ORFLDRS) | ;Return Visible Reminder Folders ; Codes: D=Due, A=Applicable, N=Not Applicable, E=Evaluated, O=Other | |
| NEWCVOK(ORY) | ; Returns status of | |
| EVALCOVR(ORY,ORPT,ORLOC) | ; Evaluate Cover Sheet Reminders | |
| ADDNAME(ORX) | ; Add Reminder or Category Name as 3rd piece | |
| REMLIST(ORY,LOC) | ;Returns a list of all cover sheet reminders | |
| GETLIST(ORY,ORLOC) | ;Returns a list of all cover sheet reminders | |
| ADDCAT(ORY,IDX,IEN) | ; Add Category Reminders to ORY list | 
| Name | Field # of Occurrence | 
|---|---|
| $$GET1^DIQ | NEWACTIV+5, HISTLOC+9, GETFLDRS+4, GETDEFOL+3, INSCURS+3, NEWCVOK+3, REMLIST+3 | 
| ALIST^ORQQPXRM | EVALCOVR+3 | 
| IMMUN^PXRHS03 | IMMLIST+2, IMMLIST+4 | 
| MAIN^PXRM | REMIND+19, REMDET+5 | 
| CATREM^PXRMAPI0 | ADDCAT+2 | 
| $$DLG^PXRMRPCA | REMIND+29, REMIND+31 | 
| $$DLGWIPE^PXRMRPCA | REMIND+29, REMIND+31 | 
| APPL^PXRMRPCA | NEWACTIV+2 | 
| $$ISA^USRLM | REMACCUM+13 | 
| OERR^VADPT | REMIND+8 | 
| $$GET^XPAR | NEWACTIV+6 | 
| DEL^XPAR | SAVELVL+5 | 
| EN^XPAR | SETFLDRS+2, SAVELVL+6, SAVELVL+12 | 
| GETLST^XPAR | GETFLDRS+5, GETDEFOL+4, INSCURS+4, NEWCVOK+4, REMACCUM+8, REMACCUM+21, REMLIST+5 | 
| 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] | REMIND+28, ADDNAME+5, ADDREM+2, ADDREM+3, ADDREM+5, ADDREM+6 | 
| ^PXRMD(811.7 - [#811.7] | ADDNAME+6 | 
| ^TMP("OR" | HISTLOC+2!, HISTLOC+3, HISTLOC+12* | 
| ^TMP("PXI" | IMMLIST+3!, IMMLIST+7, IMMLIST+8, IMMLIST+9, IMMLIST+10, IMMLIST+15! | 
| ^TMP("PXRHM" | REMIND+17!, REMIND+20, REMIND+21, REMIND+32!, REMDET+4!, REMDET+7, REMDET+8, REMDET+9, REMDET+10! | 
| Name | Line Occurrences | 
|---|---|
| $$ADDNAME | REMACCUM+40 | 
| ADDCAT | REMLIST+20 | 
| ADDREM | ADDCAT+7, REMLIST+19 | 
| GETLIST | EVALCOVR+2 | 
| NEWCVOK | REMLIST+4 | 
| REMACCUM | REMLIST+6, REMLIST+7, REMLIST+8, REMLIST+9, REMLIST+10, REMLIST+11, REMLIST+12, 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+17*, REMLIST+19, REMLIST+20 | 
| 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+5, NEWACTIV+6, GETFLDRS+4, SETFLDRS+2, GETDEFOL+3, INSCURS+3, NEWCVOK+3, REMACCUM+13, REMLIST+3 | 
| 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+13*, REMLIST+14*, REMLIST+15, REMLIST+17 , REMLIST+18, 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+7, ADDCAT~, ADDCAT+7, REMLIST+1~, REMLIST+15*, REMLIST+16*, REMLIST+19, REMLIST+20 | 
| 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+5, ADDREM+6, ADDREM+7 , ADDREM+8, ADDCAT~, ADDCAT+2, REMLIST+1~, REMLIST+18*, REMLIST+19, REMLIST+20 | 
| 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+11*, HISTLOC+12 | 
| LOC | REMLIST~, REMLIST+5, REMLIST+10 | 
| 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+9*, HISTLOC+10, HISTLOC+12 | 
| NEWP | REMLIST+1~, REMLIST+4, REMLIST+5 | 
| NREM | ADDCAT+1~ | 
| ORCLS | REMACCUM+6~, REMACCUM+11*, REMACCUM+12, REMACCUM+13, REMACCUM+15 | 
| ORCLSPRM | REMACCUM+6~, REMACCUM+7*, REMACCUM+8, REMACCUM+15 | 
| ORDEFLOC | GETDEFOL~, GETDEFOL+4 | 
| ORDUE | REMIND+18~, REMIND+26*, REMIND+27, REMIND+29, REMIND+30, REMIND+31 | 
| ORDUEDT | REMIND+2~, REMIND+23*, REMIND+29 | 
| ORERR | GETFLDRS+2~, GETFLDRS+5, SETFLDRS+1~, SETFLDRS+2, GETDEFOL+1~, GETDEFOL+4, INSCURS+1~, INSCURS+4, NEWCVOK+1~, NEWCVOK+4 , REMACCUM+3~, REMACCUM+8, REMACCUM+13, REMACCUM+15, REMACCUM+21, REMLIST+5, SAVELVL+1~, SAVELVL+5, SAVELVL+6, SAVELVL+9 , SAVELVL+12 | 
| ORFLDRS | GETFLDRS~, GETFLDRS+6*, GETFLDRS+7*, SETFLDRS~, SETFLDRS+2 | 
| ORI | IMMLIST+5~, IMMLIST+6*, IMMLIST+10*, IMMLIST+11, IMMLIST+12, IMMLIST+13, REMIND+2~, REMIND+15*, REMIND+16 | 
| ORIEN | REMIND+2~, REMIND+16*, REMIND+19, REMIND+20, REMIND+21, REMIND+28, REMIND+29, REMIND+31, REMDET~, REMDET+5 , REMDET+7, REMDET+8, REMDET+9 | 
| ORJ | REMIND+2~, REMIND+3*, REMIND+25*, REMIND+29, REMIND+31 | 
| ORLASTDT | REMIND+2~, REMIND+23*, REMIND+24*, REMIND+29 | 
| ORLOC | REMIND+2~, REMIND+9*, REMIND+12, GETLIST~, GETLIST+2, EVALCOVR~, EVALCOVR+2 | 
| ORLST | REMACCUM+6~, REMACCUM+8, REMLIST+1~, REMLIST+6, REMLIST+7, REMLIST+8, REMLIST+9, REMLIST+10, REMLIST+11, REMLIST+12 | 
| ORLST( | REMACCUM+10, REMACCUM+11, REMLIST+14, REMLIST+15, REMLIST+17, REMLIST+18 | 
| ORPRI | REMIND+18~, REMIND+28*, REMIND+29 | 
| ORPT | IMMLIST~, IMMLIST+4, REMIND~, REMIND+7, REMIND+8, REMIND+19, REMDET~, REMDET+5, EVALCOVR~, EVALCOVR+3 | 
| ORREM | ADDCAT+1~, ADDCAT+2 | 
| ORREM( | ADDCAT+4, ADDCAT+7 | 
| ORSTA | REMIND+18~, REMIND+22*, REMIND+26 | 
| ORTMP | GETFLDRS+2~, GETFLDRS+5, GETFLDRS+6, INSCURS+1~, INSCURS+4, INSCURS+5, NEWCVOK+1~, NEWCVOK+4, NEWCVOK+5, REMACCUM+3~ , REMACCUM+21, EVALCOVR+1~, EVALCOVR+2, EVALCOVR+3 | 
| ORTMP( | REMACCUM+20*, REMACCUM+23, REMACCUM+24, REMACCUM+38 | 
| ORTMP(1 | GETFLDRS+6, INSCURS+5, NEWCVOK+5 | 
| ORTMPLST | REMIND+2~, REMIND+12 | 
| ORTMPLST( | REMIND+15, REMIND+16 | 
| ORTXT | REMIND+2~, REMIND+20*, REMIND+21, REMIND+29, REMIND+31, REMDET+6~, REMDET+7*, REMDET+8, REMDET+9 | 
| ORWP | REMACCUM+6~, REMACCUM+15 | 
| ORWP( | REMACCUM+17, REMACCUM+19, REMACCUM+20 | 
| ORX | REMIND+2~, REMIND+21*, REMIND+22, REMIND+23, ADDNAME~, ADDNAME+2, ADDNAME+3, ADDNAME+5*, ADDNAME+6*, ADDNAME+7 | 
| ORY | IMMLIST~, DETAIL~, REMIND~, REMDET~, NEWACTIV~, NEWACTIV+1*, NEWACTIV+6*, NEWACTIV+7*, NEWACTIV+8*, SETFLDRS~ , SETFLDRS+3*, INSCURS~, INSCURS+3*, INSCURS+5*, NEWCVOK~, NEWCVOK+3*, NEWCVOK+5*, REMACCUM~, REMACCUM+42*, ADDREM~ , ADDCAT~, ADDCAT+7, REMLIST~, REMLIST+5, REMLIST+19, REMLIST+20, LVREMLST~, LVREMLST+1, SAVELVL~, SAVELVL+13* , GETLIST~, GETLIST+2, EVALCOVR~, EVALCOVR+3 | 
| ORY( | IMMLIST+11*, IMMLIST+12*, IMMLIST+13*, REMIND+29*, REMIND+31*, REMDET+9*, REMACCUM+29, REMACCUM+30, REMACCUM+34!, REMACCUM+35* , ADDREM+7*, REMLIST+16, GETLIST+4, GETLIST+5* | 
| ORY("B" | ADDREM+1, ADDREM+8*, REMLIST+21! | 
| 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+9, HISTLOC+12 | 
| SORT | REMACCUM~, REMACCUM+22, REMACCUM+39, REMACCUM+40 | 
| SRV | NEWACTIV+3~, NEWACTIV+5*, NEWACTIV+6, GETFLDRS+2~, GETFLDRS+4*, GETFLDRS+5, GETDEFOL+1~, GETDEFOL+3*, GETDEFOL+4, INSCURS+1~ , INSCURS+3*, INSCURS+4, NEWCVOK+1~, NEWCVOK+3*, NEWCVOK+4, REMLIST+1~, REMLIST+3*, REMLIST+5, REMLIST+9 | 
| TYP | REMACCUM~, REMACCUM+21 | 
| U | IMMLIST+11, IMMLIST+12, IMMLIST+13, REMIND+16, REMIND+22, REMIND+23, REMIND+28, REMIND+29, REMIND+31, HISTLOC+12 , GETFLDRS+6, INSCURS+5, NEWCVOK+5, ADDNAME+2, ADDNAME+3, ADDNAME+5, ADDNAME+6, REMACCUM+11, REMACCUM+20, REMACCUM+24 , REMACCUM+30, REMACCUM+35, REMACCUM+39, ADDREM+3, ADDREM+5, ADDREM+6, ADDREM+7, ADDCAT+7, REMLIST+15, REMLIST+17 , REMLIST+18, SAVELVL+12, GETLIST+5 | 
| 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 |