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 |