Routine: PSOERRX0

Information

PSOERRX0 ;BIRM/MFR - All Rxs eRx Queue - ListManager ;08/28/22

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	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