Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSOERPT0

Package: Outpatient Pharmacy

Routine: PSOERPT0


Information

PSOERPT0 ;BIRM/MFR - eRx Single Patient Queue - ListManager ; 12/10/22 9:53am

Source Information

Source file <PSOERPT0.m>

Call Graph

Call Graph

Call Graph Total: 25

Package Total Call Graph
Outpatient Pharmacy 17 ^PSOBUILD  ($$LOCK,$$NEXTPAT,$$PATSTATS)^PSOERPC1  (EN,LOAD)^PSOERPR2  HDR^PSOERPT0  ($$OPACCESS,ERXLST,LSTERXS,SETHDR,SETSORT,VIDEO)^PSOERPT1  ($$HASACTRX,$$HOLDELIG,$$UNHDELIG,$$UNHDSTAT)^PSOERPT2  $$SSN^PSOERUT  RESET^PSOERUT0  
EN^PSOERX1  UL^PSOERX1A  $$HDIR^PSOERXH1  UPDSTAT^PSOERXU1  $$ERXSIG^PSOERXUT  ^PSOLSET  K3^PSOORNE6  BLD^PSOORUT1  
RV^PSOPMP1  
VA FileMan 4 ^DIC  $$GET1^DIQ  ^DIR  ^DIWP  
List Manager 3 (EN,SHOW)^VALM  (FULL,INSTR,PAUSE)^VALM1  SAVE^VALM10  
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 25

Package Total Caller Graph
Outpatient Pharmacy 24 PSO ERX JUMP TO ERX PATIENT  PSO ERX SINGLE PATIENT BATCH HOLD  PSO ERX SINGLE PATIENT BATCH UNHOLD  PSO ERX SINGLE PATIENT CHANGE LOOK BACK DAYS  PSO ERX SINGLE PATIENT CHANGE VIEW  PSO ERX SINGLE PATIENT GROUP BY CS  PSO ERX SINGLE PATIENT INCLUDE ALL STATUSES  PSO ERX SINGLE PATIENT NEXT PATIENT  
PSO ERX SINGLE PATIENT QUEUE  PSO ERX SINGLE PATIENT QUEUE MENU  PSO ERX SINGLE PATIENT SELECT  PSO ERX SINGLE PATIENT SHOW/HIDE DETAILS  PSO ERX SINGLE PATIENT SORT BY ALL MATCHES  PSO ERX SINGLE PATIENT SORT BY DRUG MATCH  PSO ERX SINGLE PATIENT SORT BY DRUG NAME  PSO ERX SINGLE PATIENT SORT BY ERX ID  
PSO ERX SINGLE PATIENT SORT BY PATIENT MATCH  PSO ERX SINGLE PATIENT SORT BY PROVIDER MATCH  PSO ERX SINGLE PATIENT SORT BY PROVIDER NAME  PSO ERX SINGLE PATIENT SORT BY RECEIVED DATE  PSO ERX SINGLE PATIENT SORT BY STATUS  PSOERPC0  PSOERPT0  PSOERRX0  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ;Menu option entry point
LST(EPATIEN) ; ListMan Action Entry point
LMHDR ; ListMan Header Code
HDR
INIT ;Populates the Body section for ListMan
SETLINE ;Sets the line to be displayed in ListMan
SETDET(ERXIEN,LINE,NMPSC) ; Set the Details lines
ID ;Sort by eRx ID
DR ;Sort by Drug Name
PR ;Sort by Provider Name
RE ;Sort by Received Date
STA ;Sort by Status
PAM ;Sort by Patient Match
PRM ;Sort by Provider Match
DRM ;Sort by Drug Match
ALL ;Sort by All Matches
GS ;Group by Status
DET ;Display/Remove DET
IAS ;Include All Status Switch
CS ;Group/Un-group Controlled Substances
CV ;Change View
SORT(FIELD) ;Sort entries by FIELD
LBD ;Change Look Back Days Parameter Action
REF ;Screen Refresh
BH ; Batch Hold Hidden action
BU ; Batch Un-Hold Hidden action
SEL ;Process selection of one entry
NP ; Automatically Selects the Next Patient
EXIT ; - Exit point
; - Unlocking Current eRx Patient
HELP
J2EP(DFN) ; Jump to eRx Patient (From Backdoor)

External References

Name Field # of Occurrence
^DIC EN+10
$$GET1^DIQ EN+6, HDR+2, HDR+3, HDR+4, HDR+7, SETLINE+23, SETLINE+24, BH+36, NP+5, J2EP+2
, J2EP+3
^DIR LBD+4, BH+6, BH+27, BH+31, BU+6, BU+23, BU+28
^DIWP SETDET+10
^PSOBUILD J2EP+12
$$LOCK^PSOERPC1 NP+11
$$NEXTPAT^PSOERPC1 NP+9
$$PATSTATS^PSOERPC1 J2EP+6
EN^PSOERPR2 CV+1
LOAD^PSOERPR2 LST+3
HDR^PSOERPT0 LMHDR+1
$$OPACCESS^PSOERPT1 BH+18, BU+18
ERXLST^PSOERPT1 BH+7, BU+7
LSTERXS^PSOERPT1 BH+13, BH+16, BU+13, BU+16
SETHDR^PSOERPT1 HDR+16
SETSORT^PSOERPT1 INIT+2
VIDEO^PSOERPT1 SETLINE+40
$$HASACTRX^PSOERPT2 NP+4
$$HOLDELIG^PSOERPT2 BH+11
$$UNHDELIG^PSOERPT2 BU+11
$$UNHDSTAT^PSOERPT2 BU+33
$$SSN^PSOERUT HDR+7
RESET^PSOERUT0 SETLINE+10, J2EP+11
EN^PSOERX1 SEL+8
UL^PSOERX1A NP+15, EXIT+2
$$HDIR^PSOERXH1 BH+23
UPDSTAT^PSOERXU1 BH+36, BU+34
$$ERXSIG^PSOERXUT SETDET+10
^PSOLSET EN+5
K3^PSOORNE6 J2EP+12
BLD^PSOORUT1 J2EP+12
RV^PSOPMP1 SETLINE+41
EN^VALM LST+5
SHOW^VALM LMHDR+1
FULL^VALM1 EN+5, LBD+1, BH+2, BU+2
INSTR^VALM1 HDR+4, HDR+7, HDR+8, HDR+12
PAUSE^VALM1 BH+14, BH+21, BU+14, BU+20
SAVE^VALM10 SETLINE+38
$$FMDIFF^XLFDT HDR+4
$$FMTE^XLFDT HDR+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !,"Please wait..."
  • Line Location: LST+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: GS+1
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: IAS+1
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: CS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LBD+2
Function Call: WRITE
  • Prompt: ?65,"Please wait..."
  • Line Location: REF+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BH+5
Function Call: WRITE
  • Prompt: !!,"Invalid Range. Please select a range of entries between 1 and "_$G(VALMCNT)_".",$C(7)
  • Line Location: BH+9
Function Call: WRITE
  • Prompt: !!,"UNABLE TO BATCH HOLD: At least one eRx entry cannot be put on HOLD.",$C(7)
  • Line Location: BH+12
Function Call: WRITE
  • Prompt: !
  • Line Location: BH+14
Function Call: WRITE
  • Prompt: !!,"UNABLE TO BATCH HOLD: Either you do not have the appropriate security keys"
  • Line Location: BH+19
Function Call: WRITE
  • Prompt: !?22,"or one or more records cannot be put on HOLD",$C(7)
  • Line Location: BH+20
Function Call: WRITE
  • Prompt: !
  • Line Location: BH+23
Function Call: WRITE
  • Prompt: "Hold Reason required. eRx not placed in a 'Hold' status."
  • Line Location: BH+25
Function Call: WRITE
  • Prompt: !
  • Line Location: BH+27
Function Call: WRITE
  • Prompt: !!,"Updating..."
  • Line Location: BH+33
Function Call: WRITE
  • Prompt: "done"
  • Line Location: BH+37
Function Call: WRITE
  • Prompt: !
  • Line Location: BU+5
Function Call: WRITE
  • Prompt: !!,"Invalid Range. Please select a range of entries between 1 and "_$G(VALMCNT)_".",$C(7)
  • Line Location: BU+9
Function Call: WRITE
  • Prompt: !!,"UNABLE TO BATCH UN-HOLD: At least one eRx entry cannot be removed from HOLD.",$C(7)
  • Line Location: BU+12
Function Call: WRITE
  • Prompt: !
  • Line Location: BU+14
Function Call: WRITE
  • Prompt: !!,"UNABLE TO BATCH UN-HOLD: Either you do not have the appropriate security keys"
  • Line Location: BU+19
Function Call: WRITE
  • Prompt: !?25,"or one or more records cannot be removed from HOLD",$C(7)
  • Line Location: BU+20
Function Call: WRITE
  • Prompt: !
  • Line Location: BU+23
Function Call: WRITE
  • Prompt: !!,"Updating..."
  • Line Location: BU+30
Function Call: WRITE
  • Prompt: "done"
  • Line Location: BU+35
Function Call: WRITE
  • Prompt: ?50,"Loading Next Patient..."
  • Line Location: NP+7
Routine Call
  • DIC
  • Line Location:
    • EN+10
Routine Call
  • DIR
  • Line Location:
    • LBD+4
    • BH+6
    • BH+27
    • BH+31
    • BU+6
    • BU+23
    • BU+28
Routine Call
  • VALM
  • Line Location:
    • LST+5
Routine Call
  • VALM
  • Line Location:
    • LMHDR+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(101 - [#101] LMHDR+3
^PS(52.49 - [#52.49] SETDET+5, J2EP+5, J2EP+7
^TMP( SETDET+9*, SETDET+13*
^TMP("PSOERPT0" INIT+1!, SETLINE+3!, SETLINE+5*, SETLINE+6*, SETLINE+19*, SETLINE+29*, SEL+4, EXIT+3!
^TMP("PSOERPTS" INIT+1!, SETLINE+4, SETLINE+14, SETLINE+20, SETLINE+21, SETLINE+22, SETLINE+30, SETLINE+31, SETLINE+32, SETLINE+33
EXIT+3!
^UTILITY($J SETDET+5!, SETDET+11, SETDET+12
^XUSEC("PSO ERX WORKLOAD TECH" HDR+10, NP+4

Label References

Name Line Occurrences
BH BH+8, BU+8
EXIT EN+5, EN+10, EN+12, LST+7
HDR REF+1, NP+5
INIT REF+1, NP+5
LST EN+11, J2EP+10
REF GS+1, DET+1, IAS+1, CS+1, CV+1, SORT+3, LBD+5, BH+38, BU+36, SEL+9
NP+17
SETDET SETLINE+34
SETLINE INIT+2
SORT ID+1, DR+1, PR+1, RE+1, STA+1, PAM+1, PRM+1, DRM+1, ALL+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA LBD+2!
DFN EN+2~, J2EP~, J2EP+7
DIC EN+2~, EN+9*
DIC("A" EN+9*
DIC(0 EN+9*
DIE BH+1~, BU+1~
DIR LBD+2!, BH+1~, BH+4!, BH+14!, BH+21!, BH+27!, BU+1~, BU+4!, BU+14!, BU+20!
BU+23!
DIR("A" BH+4*, BH+27*, BH+30*, BU+4*, BU+23*, BU+27*
DIR("B" LBD+3*, BH+30*, BU+27*
DIR(0 LBD+3*, BH+5*, BH+27*, BH+30*, BU+5*, BU+23*, BU+27*
DIROUT LBD+2!, LBD+4, BH+6, BH+31, BU+6, BU+28
DIRUT LBD+2!, LBD+4, BH+6, BH+31, BU+6, BU+28
DIWL SETDET+4~, SETDET+10*
DIWR SETDET+4~, SETDET+10*
DR BH+1~, BU+1~
DRMTCHLN SETLINE+2~
DRMTCHLN( SETLINE+33*
DT HDR+4
DUZ HDR+10, BH+18, BU+18, NP+4
EPATIEN EN+10*, EN+11, LST~, HDR+2, HDR+3, HDR+4, HDR+7, SEL+7~, NP+4, NP+8
NP+15, NP+16*, EXIT+2, J2EP+1~, J2EP+4*, J2EP+5*, J2EP+6, J2EP+7*, J2EP+8, J2EP+10
ERXIEN SETLINE+22*, SETLINE+23, SETLINE+24, SETLINE+29, SETLINE+34, SETDET~, SETDET+5, SETDET+10, BH+1~, BH+35*
BH+36, BU+1~, BU+32*, BU+33, BU+34, SEL+1~, SEL+4*, SEL+8!
ERXIEN1 SETLINE+1~
ERXLST BH+1~, BH+7, BH+8, BH+11, BH+13, BH+16, BH+18, BU+1~, BU+7, BU+8
BU+11, BU+13, BU+16, BU+18
ERXLST( BH+34, BH+35, BU+31, BU+32
ERXPTIEN NP+1~, NP+9*, NP+11, NP+13, NP+16
ERXSTAT BH+1~, BU+1~
FIELD SORT~, SORT+1, SORT+2
GROUP SETLINE+1~, SETLINE+13*, SETLINE+14*, SETLINE+15, SETLINE+17, SETLINE+20, SETLINE+21, SETLINE+22, SETLINE+30, SETLINE+31
SETLINE+32, SETLINE+33
GRPLN EN+2~, SETLINE+2~
GRPLN( SETLINE+19*
>> HASACTRX J2EP+4*, J2EP+5, J2EP+6*
HDCODE BH+1~, BH+23*, BH+24, BH+36, BU+1~
HDCOMM BH+1~, BH+28*, BH+36, BU+1~
HIGHLN EN+2~, SETLINE+2~
HIGHLN( SETDET+9*, SETDET+13*
I SETLINE+1~, SETLINE+5*, SETLINE+38*, J2EP+6*
>> IOBOFF HDR+12
>> IOBON HDR+12
>> IOINHI HDR+2, HDR+3, HDR+4, HDR+5, HDR+6, HDR+7
>> IOINORM HDR+2, HDR+3, HDR+4, HDR+5, HDR+6, HDR+7, HDR+8
>> IORVON HDR+8, HDR+12
L SETDET+4~, SETDET+11*, SETDET+12
LASTLINE EN+2~, SETLINE+37, SETLINE+38, SETLINE+39*
LBL SETLINE+1~, SETLINE+16~, SETLINE+17*, SETLINE+18, SETLINE+19
LINE SETLINE+1~, SETLINE+13*, SETLINE+19*, SETLINE+29*, SETLINE+30, SETLINE+31, SETLINE+32, SETLINE+33, SETLINE+34, SETLINE+37
SETLINE+38, SETLINE+39, SETLINE+41, SETDET~, SETDET+9*, SETDET+13*, DET+1*, IAS+1*, BH+1~, BU+1~
LINE1 HDR+1~, HDR+2*, HDR+3*, HDR+15
LINE2 HDR+1~, HDR+5*, HDR+6*, HDR+15
LN SETLINE+1~
>> MBMSITE SETLINE+26, J2EP+2*
MSGTYPE BH+1~, BU+1~
NEXTPAT NP+1~, NP+8*, NP+9, NP+11*
NMPSC SETDET~, SETDET+9, SETDET+13
NPALERT EN+2~, HDR+10, HDR+13*, NP+2*, NP+6*
ORDCNT SETLINE+1~
ORNUM1 SETLINE+1~
PATSTAT J2EP+1~, J2EP+6*
POS HDR+1~, HDR+11~*, HDR+12, SETLINE+2~, SETLINE+16~, SETLINE+18*
PRMTCHLN SETLINE+2~
PRMTCHLN( SETLINE+31*
PRVALLN SETLINE+2~
PRVALLN( SETLINE+32*
PSNPINST EN+1~, EN+6*, J2EP+1~, J2EP+3*
>> PSOALLST HDR+6, IAS+1*, IAS+2
PSOCHNG EN+1~
PSOCSGRP EN+2~, CS+1*
PSODETDP EN+1~, SETLINE+34, DET+1*, DET+2, DET+3
>> PSODFN J2EP+5
PSOJUMP J2EP+1~, J2EP+2*
>> PSOLKBKD HDR+5, LBD+3, LBD+5*, NP+5*
>> PSOPAR EN+5
PSORDCNT EN+1~
PSORDER EN+1~, SETLINE+13, SORT+1*, SORT+2*
PSORDSEQ EN+1~
PSOSEL SEL+1~, SEL+3*, SEL+4
>> PSOSITE EN+5, EN+6, NP+5, J2EP+3
PSOSRTBY EN+1~, INIT+2, SORT+1, SORT+2*
>> PSOSTFLT LMHDR+2, NP+4
PSOSTORD EN+1~
PSOSTSEQ EN+1~
PSOSTSGP EN+1~, GS+1*
PTMTCHLN SETLINE+2~
PTMTCHLN( SETLINE+30*
QTYL SETLINE+1~
>> RESETLBD LBD+5*
SAVEX LBD+2!
SEL BH+1~, BU+1~
SEQ SETLINE+1~, SETLINE+13*, SETLINE+21*, SETLINE+23, SETLINE+29, BH+1~, BH+34*, BH+35, BU+1~, BU+31*
BU+32
SORT SETLINE+1~, SETLINE+13*, SETLINE+20*, SETLINE+21, SETLINE+22, SETLINE+30, SETLINE+31, SETLINE+32, SETLINE+33
>> SORTORD SETLINE+13*, SETLINE+20
STS SETLINE+1~
SUB SETLINE+1~
SUCCESS NP+1~, NP+8*, NP+9, NP+12*, NP+13
TOTAL SETLINE+1~
TYPE SETLINE+1~
UHCOMM BU+1~, BU+25*, BU+34
UNDLN SETLINE+2~
UNHDSTAT BU+1~, BU+33*, BU+34
>> VALM("LINES" HDR+11
>> VALMBCK LBD+1*, REF+1*, BH+2*, BU+2*, SEL+2*, SEL+3*, SEL+4*, NP+2*, NP+6*, J2EP+2*
>> VALMBG DET+2*, DET+3*, DET+4*, IAS+2*, CV+1*, LBD+5*, NP+17*
VALMCNT EN+2~, LMHDR+3, SETLINE+7*, SETLINE+41*, DET+4, BH+4, BH+5, BH+9, BU+4, BU+5
BU+9, J2EP+1~
VALMHDR HDR+15!
VALMHDR(1 HDR+15*
VALMHDR(2 HDR+15*
>> VALMSG INIT+3*, SEL+3*, SEL+4*, J2EP+9*
X SETLINE+1~, SETLINE+2~, SETLINE+16~, SETLINE+18*, SETLINE+19, SETDET+4~, SETDET+6*, SETDET+7*, SETDET+8*, SETDET+9
, SETDET+10*, SETDET+12*, SETDET+13, BH+1~
X1 SETLINE+1~, SETLINE+23*, SETLINE+24*, SETLINE+27*, SETLINE+28*, SETLINE+29
>> XQORM("#" LMHDR+3*
>> XQORM("??" LMHDR+4*
>> XQORM("B" LMHDR+2*
>> XQORNOD(0 SEL+3
XX BH+1~, BU+1~
Y EN+2~, EN+10, LBD+5, BH+1~, BH+7, BH+27, BH+28, BH+31, BU+7, BU+24
BU+25, BU+28
Z SETLINE+1~, SETLINE+21*, SETLINE+24, SETLINE+26*, SETLINE+27, SETLINE+28, SETDET+4~, SETDET+5*, SETDET+6, SETDET+7
, SETDET+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All