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

Package Total Call Graph
Outpatient Pharmacy 14 ($$LOCK,$$NEXTPAT)^PSOERPC1  (EN,LOAD)^PSOERPR2  ($$OPACCESS,ERXLST,LSTERXS,SETHDR,SETSORT,VIDEO)^PSOERPT1  ($$HASACTRX,$$HOLDELIG,$$UNHDELIG,$$UNHDSTAT)^PSOERPT2  $$SSN^PSOERUT  RESET^PSOERUT0  EN^PSOERX1  ($$L,UL)^PSOERX1A  
$$HDIR^PSOERXH1  UPDSTAT^PSOERXU1  $$GETPAT^PSOERXU5  ($$ERXDRSCH,$$ERXSIG)^PSOERXUT  ^PSOLSET  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: 23

Package Total Caller Graph
Outpatient Pharmacy 22 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  PSOERRX0  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ;Menu option entry point
LST(EPATIEN) ; ListMan Action Entry point
LMHDR ; Menu Protocol Header Code
HDR ; ListMan Header Code
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
NP ; Automatically Selects the Next Patient
EXIT ; - Exit point
; - Unlocking Current eRx Patient
HELP

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, SETDET+6, BH+36, NP+5
^DIR LBD+4, BH+6, BH+27, BH+31, BU+6, BU+23, BU+28, SEL+10
^DIWP SETDET+12
$$LOCK^PSOERPC1 NP+11
$$NEXTPAT^PSOERPC1 NP+9
EN^PSOERPR2 CV+1
LOAD^PSOERPR2 LST+3
$$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
EN^PSOERX1 SEL+11
$$L^PSOERX1A SEL+9
UL^PSOERX1A NP+15, EXIT+2
$$HDIR^PSOERXH1 BH+23
UPDSTAT^PSOERXU1 BH+36, BU+34
$$GETPAT^PSOERXU5 SEL+8
$$ERXDRSCH^PSOERXUT SETDET+6
$$ERXSIG^PSOERXUT SETDET+12
^PSOLSET EN+5
RV^PSOPMP1 SETLINE+41
EN^VALM LST+5
SHOW^VALM LMHDR+1
FULL^VALM1 EN+5, LBD+1, BH+2, BU+2, SEL+7
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
    • SEL+10
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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(101 - [#101] LMHDR+3
^PS(52.49 - [#52.49] SETDET+5
^TMP( SETDET+7*, SETDET+11*, SETDET+15*
^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+13, SETDET+14
^XTMP("PSOERXLOCK" SEL+13
^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 LMHDR+1, REF+1, NP+5
INIT REF+1, NP+5
LST EN+11
REF GS+1, DET+1, IAS+1, CS+1, CV+1, SORT+3, LBD+5, BH+38, BU+36, SEL+14
, 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~
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!, SEL+8~, SEL+10!
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*, SEL+10*
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+12*
DIWR SETDET+4~, SETDET+12*
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+8~*, SEL+9, SEL+13
, NP+4, NP+8, NP+15, NP+16*, EXIT+2
ERXIEN EN+2~, SETLINE+22*, SETLINE+23, SETLINE+24, SETLINE+29, SETLINE+34, SETDET~, SETDET+5, SETDET+6, SETDET+12
, BH+1~, BH+35*, BH+36, BU+1~, BU+32*, BU+33, BU+34, SEL+1~, SEL+4*, SEL+8
, SEL+11
ERXIEN1 SETLINE+1~
ERXLOCK SEL+8~, SEL+9*, SEL+10
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*
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+7*, SETDET+11*, SETDET+15*
I SETLINE+1~, SETLINE+5*, SETLINE+38*
>> 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+13*, SETDET+14
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+7*, SETDET+11*, SETDET+15*, 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
MSGTYPE BH+1~, BU+1~
NEXTPAT NP+1~, NP+8*, NP+9, NP+11*
NMPSC SETDET~, SETDET+7, SETDET+11, SETDET+15
NPALERT EN+2~, HDR+10, HDR+13*, NP+2*, NP+6*
ORDCNT SETLINE+1~
ORNUM1 SETLINE+1~
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*
>> PSOALLST HDR+6, IAS+1*, IAS+2
PSOCHNG EN+1~
PSOCSGRP EN+2~, CS+1*
PSODETDP EN+1~, SETLINE+24, SETLINE+34, DET+1*, DET+2, DET+3
PSOIEN EN+2~, INIT+1!
>> 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
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+1~, 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+4*, NP+2*, NP+6*
>> 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
VALMHDR HDR+15!
VALMHDR(1 HDR+15*
VALMHDR(2 HDR+15*
>> VALMSG INIT+3*, SEL+3*, SEL+4*
X SETLINE+1~, SETLINE+2~, SETLINE+16~, SETLINE+18*, SETLINE+19, SETDET+4~, SETDET+6*, SETDET+7, SETDET+8*, SETDET+9*
, SETDET+10*, SETDET+11, SETDET+12*, SETDET+14*, SETDET+15, 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+8, SETDET+9
, SETDET+10
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