PSOERPC1 ;BIRM/MFR - All Patients (Patient Centric) eRx Queue - Supporting APIs 1 ; 12/10/22 10:07am
Source file <PSOERPC1.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 6 | ($$MATCHFLT,$$MATCHLBL)^PSOERPC2 $$EPATFLST^PSOERUT CHKEXP^PSOERX $$L^PSOERX1A $$PRESOLV^PSOERXA1 $$CSFILTER^PSOERXUT |
| Kernel | 2 | ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT $$UP^XLFSTR |
| VA FileMan | 2 | ^DIC $$GET1^DIQ |
| List Manager | 1 | INSTR^VALM1 |
| 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 |
|---|---|---|
| HDR | ; - Displays the Header Line
|
|
| SETSORT | ; - Set Patient List
|
|
| SETPAT(ERXIEN,PATCNT) | ; - Builds a sorted list of Patients
|
|
| PATSTATS(PATIEN) | ; Set the Numbers (Stat Columns data) of eRx by Patient
; Input: PATIEN - eRx Patient IEN (Pointer to #52.46) |
|
| ELIGSTS(VIEW,ERXSTS,MSGTYPE) | ; Checks whether the eRx's status is eligible to be on the list (counted)
; Input: VIEW - View: "PC" - Patient Centric View | "RX" - Rx Medication View ; ERXSTS - eRx Status (External format: e.g.,"N","HDI", "I", etc...) ; [o]MSGTYPE - Message Type ("N","RE","RR","CR", etc...) |
|
| FILTERED(VIEW) | ; Return whether the list is being filtered or not
; Input: VIEW - View: "PC" - Patient Centric View | "RX" - Rx Med View |
|
| HLDSTS() | ; - Prompt User for Hold eRx Status
|
|
| CCRSTS(LST) | ; - Prompt User for CCR eRx Status
|
|
| NEXTPAT(CURPTIEN) | ; Returns the next Patient on the Queue to be worked on
; Input: (o)CURPTIEN - Current eRx Patient IEN (Pointer to #52.46) (If not passed, start with first patient) |
|
| LOADSTS(STSLST) | ; Load Status Filter Array based on the Filter selected
|
|
| STSIEN(STS) | ; Returns the eRx Status IEN
; Input: STS - eRx Status (external format, e.g., 'N', 'I', 'RXN', etc.) |
|
| LOCK(PATIEN) | ; Locks eRx Patient
; Input: PATIEN - eRx Patient IEN (Pointer to #52.46) |
| Name | Field # of Occurrence |
|---|---|
| ^DIC | HLDSTS+5, CCRSTS+10 |
| $$GET1^DIQ | PATSTATS+11, HLDSTS+6, NEXTPAT+7, LOCK+9 |
| $$MATCHFLT^PSOERPC2 | SETPAT+30, NEXTPAT+23 |
| $$MATCHLBL^PSOERPC2 | HDR+19 |
| $$EPATFLST^PSOERUT | HDR+21 |
| CHKEXP^PSOERX | SETPAT+17, SETPAT+19 |
| $$L^PSOERX1A | LOCK+5 |
| $$PRESOLV^PSOERXA1 | CCRSTS+5 |
| $$CSFILTER^PSOERXUT | SETPAT+27 |
| INSTR^VALM1 | HDR+6, HDR+30, HDR+33 |
| $$FMADD^XLFDT | SETSORT+7, SETSORT+16, SETSORT+26, SETSORT+31, SETSORT+39, PATSTATS+12, NEXTPAT+8 |
| $$FMDIFF^XLFDT | PATSTATS+25, PATSTATS+26 |
| $$FMTE^XLFDT | HDR+20, SETPAT+42, LOCK+10 |
| $$UP^XLFSTR | HLDSTS+6 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^PS(52.45 - [#52.45] | GET1^DIQ |
| ^PS(59 - [#59] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.45 - [#52.45] | SETSORT+42, SETPAT+8, PATSTATS+19, LOADSTS+16, STSIEN+4 |
| ^PS(52.46 - [#52.46] | SETSORT+6, SETSORT+14, SETPAT+36 |
| ^PS(52.49 - [#52.49] | SETSORT+8, SETSORT+9, SETSORT+17, SETSORT+18, SETSORT+27, SETSORT+28, SETSORT+32, SETSORT+33, SETSORT+35, SETSORT+40 , SETSORT+41, SETSORT+43, SETSORT+45, SETPAT+6, SETPAT+7, SETPAT+14, PATSTATS+13, PATSTATS+14, PATSTATS+15, PATSTATS+16 , PATSTATS+18, NEXTPAT+9, NEXTPAT+10, NEXTPAT+13, NEXTPAT+15, NEXTPAT+16, NEXTPAT+17, NEXTPAT+18 |
| ^TMP("PSOERPAT" | SETPAT+11, SETPAT+30*, SETPAT+44* |
| ^TMP("PSOERPCS" | SETPAT+42*, SETPAT+43* |
| ^TMP("PSOERSKP" | NEXTPAT+4!, NEXTPAT+19, NEXTPAT+21*, NEXTPAT+23*, NEXTPAT+29! |
| ^XTMP("PSOERXLOCK" | LOCK+8, LOCK+9, LOCK+10 |
| ^XTMP("PSOERXWP" | NEXTPAT+27 |
| ^XUSEC("PSO ERX WORKLOAD TECH" | NEXTPAT+27 |
| Name | Line Occurrences |
|---|---|
| $$ELIGSTS | SETSORT+42, SETPAT+33, PATSTATS+20 |
| $$FILTERED | ELIGSTS+11, ELIGSTS+17, ELIGSTS+18, ELIGSTS+23 |
| $$NEXTPAT | NEXTPAT+30 |
| $$PATSTATS | SETPAT+35 |
| $$STSIEN | LOADSTS+5, LOADSTS+6, LOADSTS+7, LOADSTS+8, LOADSTS+12, LOADSTS+13, LOADSTS+17, LOADSTS+18 |
| LOADSTS | SETSORT+23, NEXTPAT+5 |
| SETPAT | SETSORT+10, SETSORT+19, SETSORT+29, SETSORT+36, SETSORT+46 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CARY | CCRSTS+1~ |
| CARY( | CCRSTS+6* |
| CCRSTS | ELIGSTS+5~, ELIGSTS+27, ELIGSTS+28* |
| CIEN | CCRSTS+1~, CCRSTS+5*, CCRSTS+6 |
| CODE | CCRSTS+1~, CCRSTS+4*, CCRSTS+5 |
| CSERX | SETPAT+4~, SETPAT+14*, SETPAT+25, SETPAT+26, SETPAT+41*, PATSTATS+10~, PATSTATS+15*, PATSTATS+22, PATSTATS+23, PATSTATS+35 , NEXTPAT+3~, NEXTPAT+17*, NEXTPAT+25, NEXTPAT+26 |
| >> CSGROUP | SETPAT+41*, SETPAT+42, SETPAT+43 |
| CURPTIEN | NEXTPAT~, NEXTPAT+8, NEXTPAT+20, NEXTPAT+30 |
| DIC | HLDSTS+1~, HLDSTS+3*, HLDSTS+5!, CCRSTS+1~, CCRSTS+8*, CCRSTS+10! |
| DIC("A" | HLDSTS+2*, CCRSTS+7* |
| DIC("S" | HLDSTS+3*, CCRSTS+8* |
| DIC("W" | HLDSTS+4*, CCRSTS+9* |
| DIC(0 | HLDSTS+3*, CCRSTS+8* |
| DOB | SETPAT+3~, SETPAT+38*, SETPAT+42 |
| >> DOBFLTR | HDR+17, HDR+20, SETSORT+6, SETSORT+13, SETSORT+14, FILTERED+3, FILTERED+4 |
| DONE | CCRSTS+1~, CCRSTS+2*, CCRSTS+3, CCRSTS+4* |
| DRGCSCH | SETPAT+3~ |
| >> DRGFLTR | FILTERED+4 |
| DT | SETSORT+7, SETSORT+16, SETSORT+26, SETSORT+31, SETSORT+39, PATSTATS+12, PATSTATS+25, PATSTATS+26, NEXTPAT+8 |
| >> DUOUT | HLDSTS+5, CCRSTS+10 |
| DUZ | NEXTPAT+27 |
| ED | SETPAT+3~, SETPAT+40* |
| EPATIEN | SETPAT+3~, SETPAT+9*, SETPAT+11, SETPAT+30, SETPAT+35, SETPAT+36, SETPAT+37, SETPAT+38, SETPAT+43, SETPAT+44 , NEXTPAT+3~, NEXTPAT+17*, NEXTPAT+19, NEXTPAT+20, NEXTPAT+21, NEXTPAT+23, NEXTPAT+27, NEXTPAT+28 |
| EPTNODE0 | SETPAT+4~, SETPAT+36*, SETPAT+37 |
| EPTNODE1 | SETPAT+4~, SETPAT+36*, SETPAT+38 |
| EPTNODE2 | SETPAT+4~, SETPAT+36*, SETPAT+39 |
| ERXIEN | SETSORT+1~, SETSORT+9*, SETSORT+10, SETSORT+18*, SETSORT+19, SETSORT+28*, SETSORT+29, SETSORT+35*, SETSORT+36, SETSORT+43* , SETSORT+45, SETSORT+46, SETPAT~, SETPAT+6, SETPAT+7, SETPAT+14, SETPAT+17, SETPAT+19, SETPAT+27, SETPAT+40 , PATSTATS+10~, PATSTATS+14*, PATSTATS+15, PATSTATS+16, PATSTATS+18, NEXTPAT+3~, NEXTPAT+13*, NEXTPAT+15, NEXTPAT+16, NEXTPAT+17 , NEXTPAT+18 |
| ERXINST | SETPAT+3~, SETPAT+4~, SETPAT+14*, SETPAT+22 |
| ERXLOCK | LOCK+4~, LOCK+5*, LOCK+6 |
| ERXNODE0 | SETPAT+3~, SETPAT+6*, SETPAT+9, SETPAT+13, NEXTPAT+3~, NEXTPAT+16*, NEXTPAT+17 |
| >> ERXPAT | SETSORT+5*, SETSORT+6, SETSORT+8, SETSORT+9, SETSORT+14*, SETSORT+15, SETSORT+17, SETSORT+18 |
| ERXSTS | SETSORT+1~, SETSORT+25*, SETSORT+27, SETSORT+28, SETSORT+33*, SETSORT+34, SETSORT+35, SETSORT+41*, SETSORT+42, SETSORT+43 , SETPAT+4~, SETPAT+8*, SETPAT+17, SETPAT+19, SETPAT+33, ELIGSTS~, ELIGSTS+9, ELIGSTS+17, ELIGSTS+20, ELIGSTS+27 , ELIGSTS+29, NEXTPAT+3~, NEXTPAT+10*, NEXTPAT+12, NEXTPAT+13 |
| ESCODE | SETPAT+3~ |
| EXPAT | SETSORT+1~ |
| EXTSTS | PATSTATS+10~, PATSTATS+19*, PATSTATS+20, PATSTATS+28, PATSTATS+29, PATSTATS+30, PATSTATS+31, PATSTATS+32, PATSTATS+34 |
| FILTER | HDR+18~*, HDR+19*, HDR+20*, HDR+21*, HDR+22*, HDR+23*, HDR+24 |
| GRP | SETPAT+4~ |
| HDR | HDR+1~, HDR+27*, HDR+28*, HDR+29*, HDR+30 |
| HLDSTS | HLDSTS+1~, HLDSTS+6*, HLDSTS+7 |
| I | CCRSTS+1~, CCRSTS+3*, CCRSTS+4 |
| INST | SETSORT+1~, NEXTPAT+6* |
| >> IOINHI | HDR+2, HDR+3, HDR+6, HDR+8, HDR+24, HDR+33 |
| >> IOINORM | HDR+2, HDR+5, HDR+6, HDR+15, HDR+24, HDR+30, HDR+33 |
| >> IORVON | HDR+30, HDR+33 |
| LINE1 | HDR+1~, HDR+2*, HDR+3*, HDR+4*, HDR+5*, HDR+25 |
| LINE2 | HDR+1~, HDR+8*, HDR+9*, HDR+10*, HDR+11*, HDR+12*, HDR+13*, HDR+14*, HDR+15*, HDR+24* , HDR+25 |
| >> LINE3 | HDR+16* |
| LKBKDAYS | NEXTPAT+3~, NEXTPAT+7*, NEXTPAT+8 |
| LST | CCRSTS~, CCRSTS+4 |
| >> MATFLTR | HDR+17, HDR+19, SETPAT+30, ELIGSTS+14, FILTERED+3, FILTERED+4, NEXTPAT+23 |
| >> MBMSITE | SETSORT+24, SETSORT+45, SETPAT+22, ELIGSTS+9, NEXTPAT+15 |
| MSGDT | SETSORT+1~, SETSORT+7*, SETSORT+8*, SETSORT+9, SETSORT+16*, SETSORT+17*, SETSORT+18, SETSORT+26*, SETSORT+27*, SETSORT+28 , SETSORT+31*, SETSORT+32*, SETSORT+33, SETSORT+35, SETSORT+39*, SETSORT+40*, SETSORT+41, SETSORT+43, PATSTATS+10~, PATSTATS+12* , PATSTATS+13*, PATSTATS+14, PATSTATS+25, PATSTATS+26, NEXTPAT+3~, NEXTPAT+8*, NEXTPAT+9*, NEXTPAT+10, NEXTPAT+13 |
| MSGTYPE | ELIGSTS~, ELIGSTS+6*, ELIGSTS+17, ELIGSTS+18, ELIGSTS+20 |
| >> MSTPFLTR | ELIGSTS+20, FILTERED+4 |
| MTYPE | SETPAT+3~, SETPAT+13*, SETPAT+17, SETPAT+19, SETPAT+33, PATSTATS+16*, PATSTATS+20, PATSTATS+34 |
| NEXTPAT | NEXTPAT+3~, NEXTPAT+6*, NEXTPAT+9, NEXTPAT+10, NEXTPAT+13, NEXTPAT+28*, NEXTPAT+30*, NEXTPAT+31 |
| PATCNT | SETSORT+2*, SETSORT+5, SETSORT+8, SETSORT+9, SETSORT+10, SETSORT+14, SETSORT+17, SETSORT+18, SETSORT+19, SETSORT+25 , SETSORT+27, SETSORT+28, SETSORT+29, SETSORT+32, SETSORT+33, SETSORT+35, SETSORT+36, SETSORT+40, SETSORT+41, SETSORT+43 , SETSORT+46, SETPAT~, SETPAT+45* |
| >> PATFLTR | HDR+17, HDR+21, SETSORT+4, SETSORT+15, FILTERED+3, FILTERED+4 |
| >> PATFLTR( | SETSORT+5, SETSORT+15 |
| PATIEN | PATSTATS~, PATSTATS+13, PATSTATS+14, LOCK~, LOCK+5, LOCK+8, LOCK+9, LOCK+10 |
| PATNAME | SETPAT+3~, SETPAT+37*, SETPAT+42 |
| PATSTATS | SETPAT+3~, PATSTATS+10~, PATSTATS+12*, PATSTATS+25, PATSTATS+26*, PATSTATS+28*, PATSTATS+29*, PATSTATS+30*, PATSTATS+31*, PATSTATS+33* , PATSTATS+34*, PATSTATS+35*, PATSTATS+36 |
| >> PRVFLTR | FILTERED+4 |
| >> PSNPINST | SETSORT+27, SETSORT+28, SETSORT+45, SETPAT+22, NEXTPAT+15 |
| >> PSOCCRST | HDR+14, ELIGSTS+27, LOADSTS+4*, LOADSTS+10, LOADSTS+13 |
| >> PSOCSERX | HDR+3, HDR+4, SETPAT+25, SETPAT+26, PATSTATS+22, PATSTATS+23, PATSTATS+35, NEXTPAT+25, NEXTPAT+26 |
| >> PSOCSGRP | SETPAT+41 |
| >> PSOCSSCH | HDR+4 |
| >> PSOHDSTS | HDR+13, ELIGSTS+29, LOADSTS+4*, LOADSTS+15, LOADSTS+18 |
| >> PSOLKBKD | HDR+2, SETSORT+7, SETSORT+16, SETSORT+26, SETSORT+31, SETSORT+39, PATSTATS+11*, PATSTATS+12, NEXTPAT+7 |
| >> PSOMAXQS | HDR+6, SETSORT+5, SETSORT+8, SETSORT+9, SETSORT+14, SETSORT+17, SETSORT+18, SETSORT+25, SETSORT+27, SETSORT+28 , SETSORT+32, SETSORT+33, SETSORT+35, SETSORT+40, SETSORT+41, SETSORT+43 |
| >> PSORDER | HDR+31 |
| >> PSOSITE | PATSTATS+11, NEXTPAT+7 |
| >> PSOSRTBY | HDR+32, SETPAT+37, SETPAT+38, SETPAT+40 |
| >> PSOSTFLT | HDR+9, HDR+10, HDR+11, HDR+12, HDR+13, HDR+14, SETSORT+22, ELIGSTS+24, ELIGSTS+25, ELIGSTS+26 , ELIGSTS+27, ELIGSTS+29, NEXTPAT+7, NEXTPAT+27, LOADSTS+4*, LOADSTS+5, LOADSTS+6, LOADSTS+7, LOADSTS+8, LOADSTS+9 , LOADSTS+10, LOADSTS+14, LOADSTS+15 |
| RCVDATE | SETPAT+3~ |
| REACH | NEXTPAT+3~, NEXTPAT+8*, NEXTPAT+20*, NEXTPAT+21 |
| >> REDTFLTR | FILTERED+4 |
| SKIP | ELIGSTS+5~, ELIGSTS+22*, ELIGSTS+23, ELIGSTS+24*, ELIGSTS+25*, ELIGSTS+26*, ELIGSTS+27*, ELIGSTS+29* |
| SORT | SETPAT+3~, SETPAT+35*, SETPAT+37*, SETPAT+38*, SETPAT+40*, SETPAT+42, SETPAT+43 |
| SRT | SETPAT+4~ |
| SRTORD | HDR+1~, HDR+31*, HDR+33 |
| SRTPOS | HDR+1~, HDR+32*, HDR+33 |
| SSN | SETPAT+4~, SETPAT+39*, SETPAT+42 |
| STS | ELIGSTS+5~, ELIGSTS+9*, ELIGSTS+11, ELIGSTS+12, ELIGSTS+14, ELIGSTS+18, ELIGSTS+24, ELIGSTS+25, ELIGSTS+26, ELIGSTS+27 , ELIGSTS+29, NEXTPAT+3~, LOADSTS+2~, LOADSTS+6*, LOADSTS+7*, LOADSTS+8*, LOADSTS+11*, LOADSTS+12, LOADSTS+16*, LOADSTS+17 , STSIEN~, STSIEN+3, STSIEN+4 |
| >> STSFLTR | ELIGSTS+20, FILTERED+4 |
| STSIEN | SETSORT+1~, SETPAT+4~, SETPAT+7*, SETPAT+8, PATSTATS+10~, PATSTATS+18*, PATSTATS+19 |
| STSLST | SETSORT+1~, SETSORT+23, NEXTPAT+3~, NEXTPAT+5, LOADSTS~, LOADSTS+3! |
| STSLST( | SETSORT+25, SETSORT+34, NEXTPAT+12, LOADSTS+5*, LOADSTS+6*, LOADSTS+7*, LOADSTS+8*, LOADSTS+12*, LOADSTS+13*, LOADSTS+17* , LOADSTS+18* |
| U | PATSTATS+28, PATSTATS+29, PATSTATS+30, PATSTATS+31, PATSTATS+33, PATSTATS+34, PATSTATS+35, HLDSTS+5, CCRSTS+4, CCRSTS+10 |
| VALMHDR | HDR+25! |
| VALMHDR(1 | HDR+25* |
| VALMHDR(2 | HDR+25* |
| >> VALMSG | LOCK+7*, LOCK+9*, LOCK+10* |
| >> VDRGFLTR | FILTERED+4 |
| VDRGIEN | SETPAT+4~, NEXTPAT+3~, NEXTPAT+18* |
| VIEW | ELIGSTS~, ELIGSTS+11, ELIGSTS+12, ELIGSTS+17, ELIGSTS+18, ELIGSTS+23, FILTERED~, FILTERED+3, FILTERED+4 |
| >> VPATFLTR | FILTERED+4 |
| VPATIEN | SETPAT+4~, NEXTPAT+3~, NEXTPAT+17* |
| >> VPRVFLTR | FILTERED+4 |
| VPRVIEN | SETPAT+4~, NEXTPAT+3~, NEXTPAT+18* |
| X | HLDSTS+1~, HLDSTS+5, HLDSTS+6, CCRSTS+1~, CCRSTS+10, CCRSTS+11 |
| Y | HLDSTS+1~, HLDSTS+5, CCRSTS+1~, CCRSTS+10 |
| Z | SETPAT+3~, SETPAT+35*, SETPAT+40, SETPAT+41, SETPAT+42 |