Routine: PSOERRX0

Package	Total	Call Graph
Outpatient Pharmacy	15	(DOBFLTR,EN,EPATFLTR,ERXFLTR,MATFLTR,RXFLTR,VPATFLTR)^PSOERPC0 $$LOCK^PSOERPC1 $$MATCHLBL^PSOERPC2 (EN,LOAD)^PSOERPR1 SETDET^PSOERPT0 VIDEO^PSOERPT1 HDR^PSOERRX0 (HDR,SETSORT,VPRVFLTR)^PSOERRX1 ($$EPATFLST,$$EPRVFLST,$$STATEABB,$$VPATFLST,$$VPRVFLST)^PSOERUT RESET^PSOERUT0 EN^PSOERX1 UL^PSOERX1A $$GETPAT^PSOERXU5 ^PSOLSET RV^PSOPMP1
VA FileMan	4	^%DT (,FIND)^DIC $$GET1^DIQ ^DIR
List Manager	3	(EN,SHOW)^VALM FULL^VALM1 SAVE^VALM10
Kernel	2	$$FMTE^XLFDT DISP^XQORM1

Package	Total	Caller Graph
Outpatient Pharmacy	29	PSO ERX ALL RXS CANCELRX ONLY PSO ERX ALL RXS CANCELRXRESPONSE ONLY PSO ERX ALL RXS CHANGE LOOK BACK DAYS PSO ERX ALL RXS CHANGE VIEW PSO ERX ALL RXS GROUP BY CS PSO ERX ALL RXS INBOUND ERROR ONLY PSO ERX ALL RXS NEWRX ONLY PSO ERX ALL RXS OUTBOUND ERROR ONLY PSO ERX ALL RXS PATIENT CENTRIC VIEW SWITCH PSO ERX ALL RXS QUEUE PSO ERX ALL RXS QUEUE MENU PSO ERX ALL RXS REFRESH LIST PSO ERX ALL RXS REMOVE FILTERS PSO ERX ALL RXS RXCHANGEREQUEST ONLY PSO ERX ALL RXS RXCHANGERESPONSE ONLY PSO ERX ALL RXS RXFILL ONLY PSO ERX ALL RXS RXRENAWLRESPONSE ONLY PSO ERX ALL RXS RXRENEWALREQUEST ONLY PSO ERX ALL RXS SEARCH QUEUE PSO ERX ALL RXS SELECT PSO ERX ALL RXS SHOW/HIDE DETAILS PSO ERX ALL RXS SORT BY DRUG NAME PSO ERX ALL RXS SORT BY PATIENT DOB PSO ERX ALL RXS SORT BY PATIENT NAME PSO ERX ALL RXS SORT BY PROVIDER NAME PSO ERX ALL RXS SORT BY RECEIVED DATE PSO ERX ALL RXS SORT BY STATUS PSOERPC0 PSOERRX0
Kernel	1	^ORD(101

Name	Comments	DBIA/ICR reference
EN	; Entry point for the RX Action in the Patient Centric View
LMHDR	; ListMan Header Code
HDR
INIT	;Populates the Body section for ListMan
SETLINE	;Sets the line to be displayed in ListMan
FLTRMT(MSGTYPE)	; Filter By Message Type Action
CS	;Group/Un-group Controlled Substances
DET	;Display/Remove DET
CV	;Change View
SORT(FIELD)	;Sort entries by FIELD
LBD	;Change Look Back Days Parameter Action
PC	;Patient Centri View Switch
SEL	;Process selection of one entry
SQ	; - Search Queue Entry Point
REP	; Re-Entry Point
REDTFLTR	; - Received Date Range Filter
PRVFLTR	; - eRx Provider Filter
MSTPFLTR	; - Message Type Filter
STSFLTR	; - eRx Status Filter ; prompt for erx status
DRGFLTR	; - eRx Drug Name Filter
RF	; Remove All Filters
REF	;Screen Refresh
HELP	; -- help code
EXIT	;

Name	Field # of Occurrence
^%DT	REDTFLTR+4, REDTFLTR+9
^DIC	STSFLTR+7
FIND^DIC	PRVFLTR+4
$$GET1^DIQ	EN+2, EN+6, REP+9, REP+36, REP+43, STSFLTR+3
^DIR	LBD+4, REP+17, PRVFLTR+3, PRVFLTR+14, PRVFLTR+18, MSTPFLTR+3, DRGFLTR+3
DOBFLTR^PSOERPC0	REP+25
EN^PSOERPC0	PC+1
EPATFLTR^PSOERPC0	REP+24
ERXFLTR^PSOERPC0	REP+32
MATFLTR^PSOERPC0	REP+48
RXFLTR^PSOERPC0	REP+39
VPATFLTR^PSOERPC0	REP+46
$$LOCK^PSOERPC1	SEL+7
$$MATCHLBL^PSOERPC2	REP+16
EN^PSOERPR1	CV+1
LOAD^PSOERPR1	EN+12
SETDET^PSOERPT0	SETLINE+29
VIDEO^PSOERPT1	SETLINE+35
HDR^PSOERRX0	LMHDR+1
HDR^PSOERRX1	HDR+1
SETSORT^PSOERRX1	INIT+4
VPRVFLTR^PSOERRX1	REP+47
$$EPATFLST^PSOERUT	REP+5
$$EPRVFLST^PSOERUT	REP+8
$$STATEABB^PSOERUT	PRVFLTR+11
$$VPATFLST^PSOERUT	REP+14
$$VPRVFLST^PSOERUT	REP+15
RESET^PSOERUT0	SETLINE+10
EN^PSOERX1	SEL+9, REP+34, REP+41
UL^PSOERX1A	SEL+11, REP+37, REP+44
$$GETPAT^PSOERXU5	SEL+5
^PSOLSET	EN+5
RV^PSOPMP1	SETLINE+36
EN^VALM	EN+14
SHOW^VALM	LMHDR+1
FULL^VALM1	LBD+1, SQ+1, EXIT+2
SAVE^VALM10	SETLINE+33
$$FMTE^XLFDT	REP+6, REP+7, REDTFLTR+3, REDTFLTR+8
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",! Line Location: EN+5
Function Call: WRITE	Prompt: !,"Please wait..." Line Location: EN+13
Function Call: WRITE	Prompt: ! Line Location: LBD+2
Function Call: WRITE	Prompt: ! Line Location: REDTFLTR+4
Function Call: WRITE	Prompt: ! Line Location: REDTFLTR+9
Function Call: WRITE	Prompt: ! Line Location: PRVFLTR+3
Function Call: WRITE	Prompt: !,"No eRx Provider found" Line Location: PRVFLTR+5
Function Call: WRITE	Prompt: !!,"#",?4,"ERX PROVIDER NAME",?35,"NPI",?48,"CITY",?68,"STATE" Line Location: PRVFLTR+7
Function Call: WRITE	Prompt: !,XX Line Location: PRVFLTR+8
Function Call: WRITE	Prompt: !,PRV,".",?4,$E(PRVLST("DILIST","ID",PRV,.01),1,30),?35,PRVLST("DILIST","ID",PRV,1.5) Line Location: PRVFLTR+10
Function Call: WRITE	Prompt: ?48,$E(PRVLST("DILIST","ID",PRV,4.3),1,20),?68,$$STATEABB^PSOERUT(52.48,PRVLST("DILIST",2,PRV)) Line Location: PRVFLTR+11
Function Call: WRITE	Prompt: @IOF,!,"#",?4,"ERX PROVIDER NAME",?35,"NPI",?48,"CITY",?68,"STATE",!,XX Line Location: PRVFLTR+15
Function Call: WRITE	Prompt: ! Line Location: PRVFLTR+18
Function Call: WRITE	Prompt: ! Line Location: STSFLTR+7
Function Call: WRITE	Prompt: ! Line Location: DRGFLTR+3
Function Call: WRITE	Prompt: ?52,"Please wait..." Line Location: REF+1
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	DIC Line Location: STSFLTR+7
Routine Call	DIC Line Location: PRVFLTR+4
Routine Call	DIR Line Location: LBD+4 REP+17 PRVFLTR+3 PRVFLTR+14 PRVFLTR+18 MSTPFLTR+3 DRGFLTR+3
Routine Call	VALM Line Location: EN+14
Routine Call	VALM Line Location: LMHDR+1

FileNo	Call Tags
^PS(52.45 - [#52.45]	GET1^DIQ
^PS(52.48 - [#52.48]	FIND^DIC
^PS(52.49 - [#52.49]	GET1^DIQ
^PS(59 - [#59]	GET1^DIQ
^PS(59.7 - [#59.7]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101 - [#101]	LMHDR+3
^PS(52.49 - [#52.49]	SETLINE+23
^TMP("PSOERRX0"	INIT+2!, SETLINE+3!, SETLINE+5, SETLINE+6, SETLINE+19, SETLINE+27, SEL+4, EXIT+1!
^TMP("PSOERRXS"	INIT+2!, SETLINE+4, SETLINE+14, SETLINE+20, SETLINE+21, SETLINE+22, EXIT+1!
^XTMP("PSOERXLOCK"	INIT+3

Name	Line Occurrences
DRGFLTR	REP+30
EXIT	EN+5, EN+16
HDR	REF+1
INIT	REF+1
MSTPFLTR	REP+31
PRVFLTR	REP+27, PRVFLTR+5, PRVFLTR+18
REDTFLTR	REP+26
REF	FLTRMT+2, CS+1, DET+1, CV+1, SORT+3, LBD+5, SEL+12, REP+22, REP+49, RF+2
REP	REP+18, REP+24, REP+25, REP+26, REP+27, REP+28, REP+29, REP+31, REP+32, REP+39 , REP+46, REP+47, REP+48
SETLINE	INIT+4
STSFLTR	REP+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	REDTFLTR+1~, REDTFLTR+2, REDTFLTR+7!
%DT("A"	REDTFLTR+2, REDTFLTR+7
%DT("B"	REDTFLTR+3, REDTFLTR+8
%DT(0	REDTFLTR+2, REDTFLTR+7
CHANGE	SQ+2~, SQ+3, REP+21, REP+22, REP+24, REP+25, REP+26, REP+27, REP+28, REP+29 , REP+31, REP+32, REP+38, REP+39, REP+45, REP+46, REP+47, REP+48
>> CNT	PRVFLTR+8, PRVFLTR+12, PRVFLTR+13
COMSEG	PRVFLTR+1~, PRVFLTR+23*, PRVFLTR+24
DIC	STSFLTR+2~, STSFLTR+4*
DIC("A"	STSFLTR+4*
DIC("B"	STSFLTR+3*
DIC("S"	STSFLTR+4, STSFLTR+6
DIC(0	STSFLTR+4*
DIR	LBD+2!, SQ+2~, REP+1!, PRVFLTR+1~, PRVFLTR+14!, PRVFLTR+17!, MSTPFLTR+1!, DRGFLTR+1~
DIR("?"	REP+1, REP+2, REP+3*
DIR("A"	REP+4, PRVFLTR+2, PRVFLTR+17, DRGFLTR+2
DIR("B"	LBD+3, MSTPFLTR+2
DIR(0	LBD+3, REP+5, REP+6, REP+7, REP+8, REP+9, REP+10, REP+11, REP+12, REP+13 , REP+14, REP+15, REP+16, PRVFLTR+2, PRVFLTR+14, PRVFLTR+18, MSTPFLTR+2, DRGFLTR+2
DIROUT	LBD+2!, LBD+4, REDTFLTR+1~, PRVFLTR+1~, PRVFLTR+3, PRVFLTR+14, PRVFLTR+18, MSTPFLTR+1!, MSTPFLTR+3, DRGFLTR+1~ , DRGFLTR+3
DIRUT	LBD+2!, LBD+4, SQ+2~, REP+22, PRVFLTR+1~, PRVFLTR+3, PRVFLTR+8!, PRVFLTR+14, PRVFLTR+18, MSTPFLTR+1! , MSTPFLTR+3, DRGFLTR+1~, DRGFLTR+3
DOBFLTR	REP+6, REP+19!, RF+1!
DRGFLTR	EN+1~, REP+10, REP+20!, DRGFLTR+4*, RF+1!
DT	REDTFLTR+2
DTOUT	REDTFLTR+1~, REDTFLTR+4, REDTFLTR+9, PRVFLTR+8!, STSFLTR+2~
DUOUT	SQ+2~, REP+22, STSFLTR+2~
>> ERXFLTR	REP+32, REP+34, REP+36, REP+39, REP+41, REP+43
ERXIEN	SETLINE+22, SETLINE+23, SETLINE+27, SETLINE+29, SEL+1~, SEL+4, SEL+5, SEL+9!
ERXIEN1	SETLINE+1~
ERXLOCK	SQ+2~
ERXPTIEN	SEL+1~, SEL+5, SEL+7, SEL+11, SQ+2~, REP+36, REP+37, REP+43*, REP+44
FIELD	SORT~, SORT+1, SORT+2
GROUP	SETLINE+1~, SETLINE+13, SETLINE+14, SETLINE+15, SETLINE+17, SETLINE+20, SETLINE+21, SETLINE+22
GRPLN	SETLINE+10!
GRPLN(	SETLINE+19*
HIGHLN	SETLINE+1~
HIGHLN(	SETLINE+28*
I	SETLINE+1~, SETLINE+5, SETLINE+33, PRVFLTR+1~, PRVFLTR+22*, PRVFLTR+23
IOF	PRVFLTR+15
>> IOINHI	REP+5, REP+6, REP+7, REP+8, REP+9, REP+10, REP+11, REP+14, REP+15, REP+16
>> IOINORM	REP+5, REP+6, REP+7, REP+8, REP+9, REP+10, REP+11, REP+14, REP+15, REP+16
IOSL	PRVFLTR+13
J	PRVFLTR+1~, PRVFLTR+24*, PRVFLTR+25, PRVFLTR+26
>> LASTLINE	SETLINE+32, SETLINE+33, SETLINE+34*
LBL	SETLINE+1~, SETLINE+16~, SETLINE+17*, SETLINE+18, SETLINE+19
LINE	SETLINE+1~, SETLINE+13, SETLINE+19, SETLINE+27, SETLINE+28, SETLINE+29, SETLINE+32, SETLINE+33, SETLINE+34, SETLINE+36 , DET+1
LN	SETLINE+1~
LOCKPATS	INIT+1~
LOCKPATS(	INIT+3*
MATFLTR	EN+1~, REP+16, REP+20!, RF+1!
>> MBMSITE	EN+2*, LMHDR+2, SETLINE+25, STSFLTR+6
MSGTYPE	FLTRMT~, FLTRMT+1
MSTPFLTR	EN+1~, FLTRMT+1, REP+11, REP+20!, MSTPFLTR+2, MSTPFLTR+4, RF+1!
MTARR	EN+1~
MTARR(	REP+11
MTARR("CA"	EN+10*
MTARR("CN"	EN+10*
MTARR("CR"	EN+9*
MTARR("CX"	EN+11*
MTARR("IE"	EN+10*
MTARR("N"	EN+9, EN+11
MTARR("OE"	EN+10*
MTARR("RE"	EN+9*
MTARR("RR"	EN+9*
MTARR("RXF"	EN+10*
ORDCNT	SETLINE+1~
ORNUM1	SETLINE+1~
PAT	INIT+1~, INIT+3*
PATFLTR	REP+5, REP+19!, REP+20!, RF+1!
POS	SETLINE+2~, SETLINE+16~, SETLINE+18*
PRV	PRVFLTR+1~, PRVFLTR+9*, PRVFLTR+10, PRVFLTR+11, PRVFLTR+13
PRVFLTR	EN+1~, REP+8, REP+19!, REP+20!, PRVFLTR+21!, RF+1!
PRVFLTR(	PRVFLTR+26*
PRVLST	PRVFLTR+1~, PRVFLTR+5!
PRVLST("DILIST"	PRVFLTR+5, PRVFLTR+9, PRVFLTR+10, PRVFLTR+11, PRVFLTR+13, PRVFLTR+17, PRVFLTR+18, PRVFLTR+25, PRVFLTR+26
>> PSNPINST	EN+6*
>> PSOCSGRP	CS+1*
PSODETDP	EN+1~, SETLINE+29, DET+1*, DET+2, DET+3
PSOFPICK	SQ+2~, REP+23*, REP+24, REP+25, REP+26, REP+27, REP+28, REP+29, REP+31, REP+32 , REP+39, REP+46, REP+47, REP+48
PSOFROM	REDTFLTR+1~, REDTFLTR+5*, REDTFLTR+7, REDTFLTR+12
>> PSOLKBKD	LBD+3, LBD+5*
>> PSOPAR	EN+5
>> PSORDER	SETLINE+13, SORT+1, SORT+2
>> PSORFRSH	CV+1, SEL+12
PSOSEL	SEL+1~, SEL+3*, SEL+4
>> PSOSITE	EN+5, EN+6
>> PSOSRTBY	INIT+4, SORT+1, SORT+2*
PSOTO	REDTFLTR+1~, REDTFLTR+10*, REDTFLTR+12
QTYL	SETLINE+1~
QUIT	PRVFLTR+1~, PRVFLTR+8, PRVFLTR+9, PRVFLTR+14
RANGE	PRVFLTR+1~, PRVFLTR+19*, PRVFLTR+22, PRVFLTR+23
REDTFLTR	EN+1~, REP+7, REP+19!, REDTFLTR+3, REDTFLTR+8, REDTFLTR+12*, RF+1!
>> RESETLBD	LBD+5*
SAVEX	LBD+2!
SEQ	SETLINE+1~, SETLINE+13, SETLINE+21, SETLINE+23, SETLINE+24, SETLINE+27
SORT	SETLINE+1~, SETLINE+13, SETLINE+20, SETLINE+21, SETLINE+22
>> SORTORD	SETLINE+13*, SETLINE+20
STS	SETLINE+1~
STSFLTR	EN+1~, REP+9, REP+19!, STSFLTR+3, STSFLTR+8*, RF+1!
SUB	SETLINE+1~
TOTAL	SETLINE+1~
TYPE	SETLINE+1~
>> VALMBCK	FLTRMT+2, CV+2, LBD+1, PC+1, SEL+2, SQ+1, REF+1*
>> VALMBG	FLTRMT+2, DET+2, DET+3, DET+4, CV+1, LBD+5, REP+22, REP+49, RF+2*
>> VALMCNT	LMHDR+3, SETLINE+7, SETLINE+36, DET+4
>> VALMSG	INIT+5, SEL+3, SEL+4*
VPATFLTR	REP+14, REP+19!, REP+20!, RF+1!
VPRVFLTR	REP+15, REP+19!, REP+20!, RF+1!
X	SETLINE+1~, SETLINE+2~, SETLINE+16~, SETLINE+18, SETLINE+19, SQ+2~, REP+18, REP+19, REP+20, REP+22 , PRVFLTR+4, PRVFLTR+19, MSTPFLTR+1!, DRGFLTR+1~, HELP+1
X1	SETLINE+1~, SETLINE+23, SETLINE+24, SETLINE+26*, SETLINE+27
>> XQORM("#"	LMHDR+3*
>> XQORM("??"	LMHDR+4*
>> XQORM("B"	LMHDR+2*
>> XQORNOD(0	SEL+3
XX	PRVFLTR+1~, PRVFLTR+8*, PRVFLTR+15
Y	LBD+5, SQ+2~, REP+23, REDTFLTR+1~, REDTFLTR+4, REDTFLTR+5, REDTFLTR+9, REDTFLTR+10, MSTPFLTR+1!, MSTPFLTR+4 , STSFLTR+2~, STSFLTR+7, STSFLTR+8, DRGFLTR+1~, DRGFLTR+4
Z	SETLINE+1~, SETLINE+21, SETLINE+24, SETLINE+25, SETLINE+26
Z1	SETLINE+1~, SETLINE+22*, SETLINE+28

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOERRX0

Information

Source Information

Call Graph

Call Graph Total: 24

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 30

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: