PSOERPC0 ;BIRM/MFR - All Patients (Patient Centric) eRx Queue - ListManager ;09/28/22
Source file <PSOERPC0.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 14 | MSG^PSODPT HDR^PSOERPC0 ($$CCRSTS,$$HLDSTS,$$LOCK,$$NEXTPAT,HDR,SETSORT)^PSOERPC1 ($$MATCHLBL,INIT,REVLOCKS,SETLINE)^PSOERPC2 (EN,LOAD)^PSOERPR0 LST^PSOERPT0 EN^PSOERRX0 ($$EPATFLST,$$STATEABB,$$VPATFLST)^PSOERUT $$CHKKEY^PSOERX EN^PSOERX1 UL^PSOERX1A $$ERXIEN^PSOERXUT ^PSOLSET INST^PSOORFI2 |
VA FileMan | 4 | ^%DT (,FIND)^DIC $$GET1^DIQ ^DIR |
Kernel | 2 | $$FMTE^XLFDT DISP^XQORM1 |
List Manager | 2 | (EN,SHOW)^VALM FULL^VALM1 |
Registration | 1 | ^DPTLK |
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 |
---|---|---|
STS | ; Status Selection Prompt
|
|
EN | ; - Entry point for the PC Action in the RX View
; Loading User's preferences |
|
LMHDR | ; ListMan Header Code
|
|
HDR | ||
INIT | ; - Populates the Body section for ListMan
|
|
HELP | ; -- help code
|
|
LBD | ; - Change Look Back Days Parameter Action
|
|
SQ | ; - Search Queue Entry Point
|
|
REP | ; - Repeat Prompt for additional filters
|
|
VPATFLTR | ; - VistA Patient Filter
|
|
REP1 | ; - Repeat VistA Patient Prompt
|
|
EPATFLTR | ; - eRx Patient Filter
|
|
REP2 | ; - Repeat eRx Patient Prompt
|
|
PATLHDR(PATTYP) | ; - Prints the Patient List Header
|
|
DOBFLTR | ; - DOB Filter
|
|
MATFLTR | ; - Match Status Filter
|
|
ERXFLTR() | ; - eRx ID Filter
|
|
RXFLTR() | ; - Rx # Filter
|
|
RF | ; - Remove All Filters
|
|
CS | ; - Group/Un-group Controlled Substances
|
|
CV | ; - Change View
|
|
SORT(FIELD) | ; - Sort entries by FIELD
|
|
SEL | ; - Process selection of one entry
|
|
NEXTPAT | ; Automatically Selects the Next Patient
|
|
RX | ; - Switch to Rx View
|
|
REF | ; - Screen Refresh
|
|
EXIT | ; - exit code
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
^PS(52.46 - [#52.46] | FIND^DIC |
^PS(52.49 - [#52.49] | GET1^DIQ |
^PS(59 - [#59] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ORD(101 - [#101] | LMHDR+3 |
^PS(52.49 - [#52.49] | REP1+5, REP2+18 |
^TMP("PSOERPAT" | INIT+2!, EXIT+1! |
^TMP("PSOERPC0" | INIT+2!, SEL+4, EXIT+1! |
^TMP("PSOERPCS" | INIT+2!, EXIT+1! |
^TMP($J | REP2+1!, REP2+4, REP2+5, REP2+7!, REP2+12, REP2+13, REP2+14, REP2+15, REP2+16, REP2+17 , REP2+18, REP2+21, REP2+25, REP2+26, REP2+33, REP2+34, REP2+35! |
^XTMP("PSOERXLOCK" | INIT+3, ERXFLTR+14, RXFLTR+14 |
^XTMP("PSOERXWP" | NEXTPAT+5! |
^XUSEC("PSO ERX WORKLOAD TECH" | STS+2, STS+4, STS+7 |
Name | Line Occurrences |
---|---|
DOBFLTR | REP+21 |
EPATFLTR | REP+20 |
ERXFLTR | REP+22 |
EXIT | PSOERPC0+12, PSOERPC0+17, PSOERPC0+25, PSOERPC0+28, PSOERPC0+29, PSOERPC0+31, STS+16, EN+8 |
HDR | REF+1 |
INIT | REF+1 |
MATFLTR | STS+18, REP+37 |
NEXTPAT | EN+5 |
PATLHDR | REP2+10, REP2+23 |
REF | LBD+5, REP+18, REP+38, RF+1, CS+1, CV+1, SORT+3, SEL+13 |
REP | REP+15, REP+20, REP+21, REP+22, REP+29, REP+36, REP+37 |
REP1 | REP1+7 |
REP2 | REP2+5, REP2+7, REP2+26 |
RXFLTR | REP+29 |
STS | STS+18, STS+31 |
VPATFLTR | REP+36 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CHANGE | SQ+2~, SQ+3*, REP+17*, REP+18, REP+20*, REP+21*, REP+22, REP+28*, REP+29, REP+35* , REP+36*, REP+37* |
>> CNT | REP2+11*, REP2+20*, REP2+21 |
CODE | PSOERPC0+6~ |
COMSEG | EPATFLTR+1~, REP2+31*, REP2+32 |
DA | LBD+2! |
DFN | PSOERPC0+5~ |
DIC | PSOERPC0+5~, PSOERPC0+18!, PSOERPC0+19*, VPATFLTR+1~, REP1+1!*, ERXFLTR+1~, ERXFLTR+3*, RXFLTR+1~, RXFLTR+3* |
DIC("A" | PSOERPC0+20*, REP1+1*, ERXFLTR+3*, RXFLTR+3* |
DIC("B" | PSOERPC0+21* |
DIC("S" | PSOERPC0+19*, REP1+1* |
DIC("W" | REP1+2* |
DIC(0 | PSOERPC0+19*, REP1+1*, ERXFLTR+3*, RXFLTR+3* |
DIR | PSOERPC0+6~, PSOERPC0+26!, PSOERPC0+31!, STS+1!, STS+20!, STS+26!, LBD+2!, SQ+2~, REP+1!, REP1+1! , EPATFLTR+1~, REP2+22!, REP2+25!, DOBFLTR+1~, MATFLTR+1~ |
DIR("?" | STS+5*, STS+8*, STS+9*, STS+10*, STS+11*, STS+12*, STS+13*, STS+14*, STS+15*, STS+21* , STS+27*, REP+1*, REP+2*, REP+3* |
DIR("A" | REP+4*, REP2+2*, REP2+25*, DOBFLTR+3*, MATFLTR+2* |
DIR("B" | STS+4*, STS+20*, STS+26*, LBD+3*, DOBFLTR+2*, MATFLTR+7* |
DIR(0 | PSOERPC0+26*, PSOERPC0+31*, STS+1*, STS+2*, STS+3*, STS+20*, STS+26*, LBD+3*, REP+5*, REP+6* , REP+7*, REP+8*, REP+9*, REP+10*, REP2+2*, REP2+22*, REP2+26*, DOBFLTR+3*, MATFLTR+3*, MATFLTR+4* , MATFLTR+5*, MATFLTR+6*, MATFLTR+7* |
DIROUT | PSOERPC0+6~, STS+16, STS+22, STS+28, LBD+2!, LBD+4, EPATFLTR+1~, REP2+3, REP2+22, REP2+26 , DOBFLTR+4 |
DIRUT | PSOERPC0+6~, STS+16, STS+22, STS+28, LBD+2!, LBD+4, SQ+2~, REP+18, EPATFLTR+1~, REP2+3 , REP2+11!, REP2+22, REP2+26, DOBFLTR+4, MATFLTR+8 |
DOBFLTR | PSOERPC0+5~, REP+6, REP+16!, DOBFLTR+2, DOBFLTR+5*, RF+1! |
DRGFLTR | PSOERPC0+6~ |
DRMTCHLN | PSOERPC0+5~ |
DT | DOBFLTR+3 |
DTOUT | PSOERPC0+6~, PSOERPC0+22, REP2+11!, ERXFLTR+1~, ERXFLTR+6, RXFLTR+1~, RXFLTR+6 |
DUOUT | PSOERPC0+22, SQ+2~, REP+18, MATFLTR+8, ERXFLTR+1~, ERXFLTR+6, RXFLTR+1~, RXFLTR+6 |
DUZ | PSOERPC0+25, STS+2, STS+4, STS+7, NEXTPAT+5 |
EPAT | VPATFLTR+1~, REP1+5*, REP1+6 |
ERXFLTR | REP+22, REP+24, REP+26, REP+29, REP+31, REP+33, ERXFLTR+2!, ERXFLTR+15*, RXFLTR+2!, RXFLTR+15* |
ERXID | ERXFLTR+1~, ERXFLTR+7*, ERXFLTR+8, ERXFLTR+9, ERXFLTR+10, ERXFLTR+11, ERXFLTR+15, RXFLTR+1~, RXFLTR+7*, RXFLTR+8 , RXFLTR+9, RXFLTR+10, RXFLTR+11, RXFLTR+15 |
ERXIEN | SQ+2~ |
ERXPTIEN | SQ+2~, REP+26*, REP+27, REP+33*, REP+34, ERXFLTR+1~, ERXFLTR+11*, ERXFLTR+13, ERXFLTR+14, RXFLTR+1~ , RXFLTR+11*, RXFLTR+13, RXFLTR+14, SEL+1~, SEL+4*, SEL+6, SEL+9, SEL+12, NEXTPAT+1~, NEXTPAT+4* , NEXTPAT+5, NEXTPAT+6, NEXTPAT+9, NEXTPAT+11 |
FIELD | SORT~, SORT+1, SORT+2 |
GRPLN | PSOERPC0+5~ |
HIGHLN | PSOERPC0+5~ |
I | EPATFLTR+1~, REP2+30*, REP2+31 |
IDX | PSOERPC0+7~, STS+6*, STS+8*, STS+9*, STS+10*, STS+11*, STS+12*, STS+13*, STS+14*, STS+15* |
IOF | REP2+23 |
>> IOINHI | SQ+3*, REP+5, REP+6, REP+9, REP+10, REP+11, REP+12, REP+13, REP1+8, REP2+6 , REP2+8 |
>> IOINORM | SQ+3*, REP+5, REP+6, REP+9, REP+10, REP+11, REP+12, REP+13, REP1+8, REP2+6 , REP2+8 |
IOSL | REP2+21 |
J | EPATFLTR+1~, REP2+32*, REP2+33, REP2+34 |
LASTLINE | PSOERPC0+5~ |
LOCKPATS | INIT+1~ |
LOCKPATS( | INIT+3* |
MATFLTR | PSOERPC0+5~, STS+18, REP+10, REP+16!, MATFLTR+9*, RF+1! |
MBMSITE | PSOERPC0+4~, PSOERPC0+17, LMHDR+2, REP1+2, MATFLTR+3, MATFLTR+4, MATFLTR+5, MATFLTR+6, ERXFLTR+9, RXFLTR+9 |
NEXTPAT | NEXTPAT+1~, NEXTPAT+2*, NEXTPAT+4, NEXTPAT+5* |
PAT | INIT+1~, INIT+3*, EPATFLTR+1~, REP2+12*, REP2+13, REP2+14, REP2+15, REP2+16, REP2+17, REP2+18 , REP2+21 |
PATFLTR | PSOERPC0+5~, REP+5, REP+16!, REP1+4!, REP2+29!, RF+1! |
PATFLTR( | REP1+6*, REP2+34* |
PATFLTR(0 | REP1+7 |
PATLST | REP2+4! |
PATTYP | PATLHDR~, PATLHDR+2 |
PRMTCHLN | PSOERPC0+5~ |
PRVFLTR | PSOERPC0+6~ |
>> PSNPINST | PSOERPC0+13*, PSOERPC0+30*, PSOERPC0+31, ERXFLTR+9, RXFLTR+9 |
PSOALLST | SEL+8~, NEXTPAT+8~ |
PSOCCRST | PSOERPC0+4~, STS+29*, STS+30* |
PSOCLNC | PSOERPC0+7~, PSOERPC0+16*, PSOERPC0+21, PSOERPC0+23* |
PSOCSERX | PSOERPC0+4~, PSOERPC0+6~ |
PSOCSGRP | PSOERPC0+4~, CS+1*, SEL+8~, NEXTPAT+8~ |
PSOCSSCH | PSOERPC0+4~, PSOERPC0+6~ |
PSOFPICK | SQ+2~, REP+19*, REP+20, REP+21, REP+22, REP+29, REP+36, REP+37 |
PSOHDSTS | PSOERPC0+4~, STS+23*, STS+24* |
PSOIQUIT | PSOERPC0+29! |
PSOLKBKD | PSOERPC0+4~, LBD+3, LBD+5*, SEL+9, SEL+10* |
PSOMAXQS | PSOERPC0+4~ |
PSONEXTP | PSOERPC0+5~, SEL+2! |
>> PSOPAR | PSOERPC0+12, PSOERPC0+28 |
>> PSOPINST | PSOERPC0+29 |
PSOQUIT | PSOERPC0+6~, PSOERPC0+17, PSOERPC0+22*, STS+17*, STS+22*, STS+23*, STS+28*, STS+29*, STS+31 |
PSORDER | PSOERPC0+4~, SORT+1*, SORT+2*, SEL+8~, NEXTPAT+8~ |
PSORFRSH | PSOERPC0+7~, CV+1, SEL+13, REF+2* |
PSOSEL | SEL+1~, SEL+3*, SEL+4 |
>> PSOSITE | PSOERPC0+12, PSOERPC0+13, PSOERPC0+16, PSOERPC0+30 |
PSOSRTBY | PSOERPC0+4~, SORT+1, SORT+2*, SEL+8~, NEXTPAT+8~ |
PSOSTFLT | PSOERPC0+4~, STS+17*, STS+18, STS+19, STS+25, EN+4, MATFLTR+7, NEXTPAT+5 |
PSOVIEW | PSOERPC0+6~ |
PTMTCHLN | PSOERPC0+5~ |
QUIT | EPATFLTR+1~, REP2+11*, REP2+12, REP2+22*, ERXFLTR+1~, ERXFLTR+4*, ERXFLTR+5, ERXFLTR+6*, ERXFLTR+15*, RXFLTR+1~ , RXFLTR+4*, RXFLTR+5, RXFLTR+6*, RXFLTR+15* |
RANGE | EPATFLTR+1~, REP2+27*, REP2+30, REP2+31 |
RECDAT | EPATFLTR+1~, REP2+18*, REP2+19 |
REDTFLTR | PSOERPC0+6~ |
RESETLBD | PSOERPC0+7~, LBD+5*, SEL+10 |
SAVEX | LBD+2! |
TMPLKBKD | SEL+1~, SEL+9*, SEL+10 |
U | STS+23, STS+29 |
>> VALMBCK | LBD+1*, SQ+1*, CV+2*, SEL+2*, SEL+3*, SEL+4*, NEXTPAT+2*, RX+1*, REF+1* |
>> VALMBG | LBD+5*, REP+18*, REP+38*, RF+1*, CV+1* |
VALMCNT | PSOERPC0+5~, LMHDR+3 |
>> VALMSG | INIT+5*, SEL+3*, SEL+4* |
VPATFLTR | PSOERPC0+5~, REP+9, REP+16!, VPATFLTR+1!, REP1+7!, RF+1! |
VPATFLTR( | REP1+4* |
X | HELP+1*, SQ+2~, REP+15, REP+16, VPATFLTR+1~, REP2+4, REP2+15*, REP2+27, DOBFLTR+1~, MATFLTR+1~ , ERXFLTR+6, RXFLTR+6 |
>> XQORM("#" | LMHDR+3* |
>> XQORM("??" | LMHDR+4* |
>> XQORM("B" | LMHDR+2* |
>> XQORNOD(0 | SEL+3 |
XX | EPATFLTR+1~, PATLHDR+2~, PATLHDR+3* |
Y | PSOERPC0+6~, PSOERPC0+22, PSOERPC0+23, STS+17, STS+23, STS+24, STS+29, STS+30, LBD+5, SQ+2~ , REP+19, VPATFLTR+1~, REP1+3, REP1+4, REP1+5, REP2+15, DOBFLTR+1~, DOBFLTR+5, MATFLTR+1~, MATFLTR+9 , ERXFLTR+1~, ERXFLTR+6, ERXFLTR+7, RXFLTR+1~, RXFLTR+6, RXFLTR+7 |