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

Package: Outpatient Pharmacy

Routine: PSOERXU5


Information

PSOERXU5 ;ALB/BWF - eRx utilities ; 4/9/2018 10:55am

Source Information

Source file <PSOERXU5.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Outpatient Pharmacy 6 REF^PSOERSE1  TXT2ARY^PSOERXD1  POST^PSOERXO1  UPDSTAT^PSOERXU1  ($$GETRESP,$$RESOLV,CANREQ)^PSOERXU2  DIRE^PSOERXX1  
List Manager 2 FULL^VALM1  (CNTRL,SET)^VALM10  
VA FileMan 2 ($$GET1,GETS)^DIQ  ^DIR  
DRG Grouper 1 ICDDESC^ICDXCODE  

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 ACKNOWLEDGE  PSOERCR1  PSOERPT1  PSOERRX0  PSOERRX1  PSOERSE1  PSOERSE2  PSOERSE3  
PSOERSE4  PSOERUT  PSOERUT1  PSOERX  PSOERX1A  PSOERX1C  PSOERX1E  PSOERX1G  
PSOERX1H  PSOERXA1  PSOERXH1  PSOERXI2  PSOERXU1  PSOERXU7  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
CANREQ(ERXIEN,LINE,PMODE) ;
CANRES(ERXIEN,LINE,PMODE) ;
GETPAT(ERXIEN) ;
GETPROV(ERXIEN) ;
GETDRUG(ERXIEN) ;
CANACK(ERXIEN) ;
LASTSTAT(ERXIEN) ;
CSCOMM(ERXIEN) ;
COMMVAL(IEN,FILE,SUB,TYPE,EXTFLG) ; IEN, file number, communication subscript, type of communication,
; extension flag (optional)
EFFDATE(IEN,MIEN) ; if it exists in "other medication date" subfile, return the effective date
DIAG2017(PSOIEN,LINE,GL,MIEN) ;
SETLOC(LINE,TEXT) ;
SETGL(IEN,TEXT) ;

External References

Name Field # of Occurrence
$$GET1^DIQ CANRES+2, CANRES+16, CANRES+32, CANRES+40, CANRES+41, GETPAT+2, GETPAT+3, GETPAT+6, GETPAT+9, GETPAT+11
, GETPROV+2, GETPROV+3, GETPROV+6, GETPROV+9, GETPROV+11, GETDRUG+2, GETDRUG+3, GETDRUG+6, GETDRUG+9, GETDRUG+11
, CANACK+4, CANACK+5, CANACK+6, CANACK+26, CANACK+34, LASTSTAT+3, LASTSTAT+5, LASTSTAT+7, CSCOMM+2, CSCOMM+4
, COMMVAL+5, COMMVAL+7, COMMVAL+9, EFFDATE+5, EFFDATE+7
GETS^DIQ CANRES+9, DIAG2017+6
^DIR CANACK+13, CANACK+24, CANACK+42, CANACK+48
ICDDESC^ICDXCODE DIAG2017+14, DIAG2017+26
REF^PSOERSE1 CANACK+33, CANACK+55
TXT2ARY^PSOERXD1 CANRES+34, DIAG2017+11, DIAG2017+15, DIAG2017+20, DIAG2017+23, DIAG2017+27, DIAG2017+32, DIAG2017+33, DIAG2017+49
POST^PSOERXO1 CANACK+49
UPDSTAT^PSOERXU1 CANACK+15, CANACK+27, CANACK+28, CANACK+29, CANACK+30, CANACK+31, CANACK+51, CANACK+52, CANACK+53
$$GETRESP^PSOERXU2 CANRES+4
$$RESOLV^PSOERXU2 CANRES+3, CANRES+5, CANRES+6, GETPAT+5, GETPAT+8, GETPAT+10, GETPROV+5, GETPROV+8, GETPROV+10, GETDRUG+5
, GETDRUG+8, GETDRUG+10, CANACK+26
CANREQ^PSOERXU2 CANREQ+1
DIRE^PSOERXX1 CANACK+3, CANACK+7, CANACK+9, CANACK+10, CANACK+18, CANACK+20, CANACK+21, CANACK+32, CANACK+50, CANACK+54
FULL^VALM1 CANACK+2
CNTRL^VALM10 CANRES+20, CANRES+21, CANRES+22, CANRES+23, CANRES+24, CANRES+26, CANRES+27, CANRES+28, CANRES+29, CANRES+30
, CANRES+38, CANRES+39, CANRES+42, CANRES+43
SET^VALM10 CANRES+18, CANRES+19, CANRES+20, CANRES+21, CANRES+22, CANRES+23, CANRES+24, CANRES+29, CANRES+30, CANRES+31
, CANRES+37, CANRES+42, CANRES+43, CANRES+44, SETLOC+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,">>> You do not have priviledge to use this option."
  • Line Location: CANACK+3
Function Call: WRITE
  • Prompt: !!,"Record already acknowledged!",!,$C(7)
  • Line Location: CANACK+7
Function Call: WRITE
  • Prompt: !,"For RxChange Response Approved and Approved with changes types (G/T/S/OS/D)",!,"hidden action ACK is not available."
  • Line Location: CANACK+9
Function Call: WRITE
  • Prompt: !,"ACK is not available for RxChange Response - 'Validated' response messages."
  • Line Location: CANACK+10
Function Call: WRITE
  • Prompt: !,"Acknowledge cannot be used on this record status."
  • Line Location: CANACK+21
Function Call: WRITE
  • Prompt: !,"Would you like to send an 'Approved' or 'Denied' response?"
  • Line Location: CANACK+35
Function Call: WRITE
  • Prompt: !,"Would you like to acknowledge this record?"
  • Line Location: CANACK+47
Function Call: WRITE
  • Prompt: !!,PSSRET("errorMessage")
  • Line Location: CANACK+50
Function Call: WRITE
  • Prompt: !,$S(MTYPE="CA":"Cancel request",MTYPE="RE":"RxRenewal response",1:"Inbound error")," acknowledged."
  • Line Location: CANACK+54
Routine Call
  • DIR
  • Line Location:
    • CANACK+13
    • CANACK+24
    • CANACK+42
    • CANACK+48

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.45 - [#52.45] GET1^DIQ
^PS(52.49 - [#52.49] GET1^DIQ,  GETS^DIQ
52.4919 GET1^DIQ
52.493113 GETS^DIQ
52.4931162 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS( COMMVAL+4
^PS(52.49 - [#52.49] LASTSTAT+4, CSCOMM+3, EFFDATE+4, DIAG2017+4, DIAG2017+62
^XUSEC("PSDRPH" CANACK+17, CANACK+19
^XUSEC("PSO ERX ADV TECH" CANACK+17, CANACK+19
^XUSEC("PSO ERX TECH" CANACK+17
^XUSEC("PSO ERX VIEW" CANACK+3

Label References

Name Line Occurrences
SETGL DIAG2017+36, DIAG2017+40, DIAG2017+44, DIAG2017+47, DIAG2017+52, DIAG2017+56, DIAG2017+60, DIAG2017+64
SETLOC DIAG2017+37, DIAG2017+41, DIAG2017+45, DIAG2017+48, DIAG2017+53, DIAG2017+57, DIAG2017+61, DIAG2017+65

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CANSTAT CANRES+1~, CANRES+15*, CANRES+16*, CANRES+22
CHECK COMMVAL+2~
COMM CANRES+1~, CANRES+32*, CANRES+33*, CANRES+34
COMMARY CANRES+1~, CANRES+34
COMMARY( CANRES+35, CANRES+36
COMMBY CANRES+1~, CANRES+40*, CANRES+42
COMMDTTM CANRES+1~, CANRES+41*, CANRES+43
CSTAT LASTSTAT+1~, LASTSTAT+3*, LASTSTAT+6, CSCOMM+2*
>> CTXT CANRES+36*, CANRES+37, CANRES+38
DIACIC DIAG2017+1~, DIAG2017+8*
DIAGDAT DIAG2017+1~, DIAG2017+5!
DIAGDAT( DIAG2017+7, DIAG2017+8, DIAG2017+9, DIAG2017+10, DIAG2017+11, DIAG2017+21, DIAG2017+22, DIAG2017+23
DIAGIEN DIAG2017+1~, DIAG2017+4*, DIAG2017+5, DIAG2017+62
DIAGSEQ DIAG2017+1~, DIAG2017+7*
DIENS DIAG2017+2~, DIAG2017+5*, DIAG2017+6, DIAG2017+7, DIAG2017+8, DIAG2017+9, DIAG2017+10, DIAG2017+11, DIAG2017+21, DIAG2017+22
, DIAG2017+23
DIR CANACK+1~, CANACK+13!, CANACK+24!, CANACK+36!, CANACK+42!, CANACK+48!
DIR("?" CANACK+37*, CANACK+38*, CANACK+39*, CANACK+40*, CANACK+41*
DIR("B" CANACK+13*, CANACK+24*, CANACK+48*
DIR(0 CANACK+13*, CANACK+24*, CANACK+36*, CANACK+48*
DIRUT CANACK+1~, CANACK+13, CANACK+24, CANACK+42, CANACK+48
DONE LASTSTAT+1~, LASTSTAT+2*, LASTSTAT+4, LASTSTAT+7*, CSCOMM+1~
DRES DIAG2017+1~, DIAG2017+13!, DIAG2017+14
DRES( DIAG2017+17, DIAG2017+18
DRES(0 DIAG2017+15, DIAG2017+27
DRESDAT DIAG2017+2~, DIAG2017+18*, DIAG2017+19
DRESL DIAG2017+2~, DIAG2017+17*, DIAG2017+18
DTOUT CANACK+1~, CANACK+13, CANACK+24, CANACK+42, CANACK+48
DUZ CANACK+3, CANACK+17, CANACK+19
EFFCHECK EFFDATE+2~, EFFDATE+5*, EFFDATE+6
EFFDATE EFFDATE+2~, EFFDATE+4, EFFDATE+7*, EFFDATE+8
ERXDAT CANRES+1~
ERXDAT( CANRES+10, CANRES+11, CANRES+12, CANRES+13, CANRES+14, CANRES+15, CANRES+17
ERXDRG GETDRUG+1~, GETDRUG+2*, GETDRUG+4, GETDRUG+6*, GETDRUG+7, GETDRUG+9*, GETDRUG+11*, GETDRUG+12, GETDRUG+13
ERXIEN CANREQ~, CANREQ+1, CANRES~, CANRES+2, CANRES+3, CANRES+4, CANRES+5, GETPAT~, GETPAT+2, GETPAT+3
, GETPAT+5, GETPAT+8, GETPROV~, GETPROV+2, GETPROV+3, GETPROV+5, GETPROV+8, GETDRUG~, GETDRUG+2, GETDRUG+3
, GETDRUG+5, GETDRUG+8, CANACK~, CANACK+4, CANACK+5, CANACK+6, CANACK+15, CANACK+26, CANACK+27, CANACK+28
, CANACK+29, CANACK+30, CANACK+31, CANACK+34, CANACK+49, CANACK+51, CANACK+52, CANACK+53, LASTSTAT~, LASTSTAT+3
, LASTSTAT+4, LASTSTAT+5, CSCOMM~, CSCOMM+2, CSCOMM+3, CSCOMM+4
ERXPAT GETPAT+1~, GETPAT+2*, GETPAT+4, GETPAT+6*, GETPAT+7, GETPAT+9*, GETPAT+11*, GETPAT+12, GETPAT+13
ERXPRV GETPROV+1~, GETPROV+2*, GETPROV+4, GETPROV+6*, GETPROV+7, GETPROV+9*, GETPROV+11*, GETPROV+12, GETPROV+13
ERXSTAT CANACK+1~, CANACK+6*, CANACK+7, CANACK+21, CANACK+22, CANACK+29
EXT COMMVAL+2~, COMMVAL+9*, COMMVAL+10
EXTFLG COMMVAL~, COMMVAL+8
FILE COMMVAL~, COMMVAL+4, COMMVAL+5, COMMVAL+7, COMMVAL+9
GL DIAG2017~, DIAG2017+36, DIAG2017+37, DIAG2017+40, DIAG2017+41, DIAG2017+44, DIAG2017+45, DIAG2017+47, DIAG2017+48, DIAG2017+52
, DIAG2017+53, DIAG2017+56, DIAG2017+57, DIAG2017+60, DIAG2017+61, DIAG2017+64, DIAG2017+65, SETGL+1
HUBID CANRES+1~, CANRES+10*
>> I CANRES+35*, CANRES+36, CANRES+38
IEN COMMVAL~, COMMVAL+4, COMMVAL+5, COMMVAL+7, COMMVAL+9, EFFDATE~, EFFDATE+4, EFFDATE+5, EFFDATE+7, SETGL~
, SETGL+1
IENS CANRES+1~, CANRES+8*, CANRES+10, CANRES+11, CANRES+12, CANRES+13, CANRES+14, CANRES+15, CANRES+17
INST CANACK+1~, CANACK+34*, CANACK+49
>> IOINHI CANRES+20, CANRES+22, CANRES+23, CANRES+24, CANRES+26, CANRES+27, CANRES+28, CANRES+29, CANRES+30, CANRES+38
, CANRES+39, CANRES+42, CANRES+43
>> IOINORM CANRES+20, CANRES+22, CANRES+23, CANRES+24, CANRES+26, CANRES+27, CANRES+28, CANRES+29, CANRES+30, CANRES+38
, CANRES+39, CANRES+42, CANRES+43
>> IORVOFF CANRES+21
>> IORVON CANRES+21
>> IOUOFF CANRES+20
>> IOUON CANRES+20
LINE CANREQ~, CANREQ+1, CANRES~, CANRES+18*, CANRES+19*, CANRES+20, CANRES+21*, CANRES+22*, CANRES+23*, CANRES+24*
, CANRES+26, CANRES+27, CANRES+28, CANRES+29*, CANRES+30*, CANRES+31*, CANRES+37*, CANRES+38, CANRES+39, CANRES+42*
, CANRES+43*, CANRES+44*, DIAG2017~, DIAG2017+35*, DIAG2017+36, DIAG2017+37, DIAG2017+39*, DIAG2017+40, DIAG2017+41, DIAG2017+43*
, DIAG2017+44, DIAG2017+45, DIAG2017+46*, DIAG2017+47, DIAG2017+48, DIAG2017+51*, DIAG2017+52, DIAG2017+53, DIAG2017+55*, DIAG2017+56
, DIAG2017+57, DIAG2017+59*, DIAG2017+60, DIAG2017+61, DIAG2017+63*, DIAG2017+64, DIAG2017+65, SETLOC~, SETLOC+1
LSTAT LASTSTAT+1~, LASTSTAT+5*, LASTSTAT+6, LASTSTAT+7
MESREQ CANACK+1~, CANACK+5*, CANACK+8
MIEN EFFDATE~, EFFDATE+1, EFFDATE+4, EFFDATE+5, EFFDATE+7, DIAG2017~, DIAG2017+3, DIAG2017+4, DIAG2017+5, DIAG2017+62
MTYPE CANRES+1~, CANRES+2*, CANRES+3, CANRES+4, CANRES+5, GETPAT+1~, GETPAT+3*, GETPAT+4, GETPAT+7, GETPROV+1~
, GETPROV+3*, GETPROV+4, GETPROV+7, GETDRUG+1~, GETDRUG+3*, GETDRUG+4, GETDRUG+7, CANACK+1~, CANACK+4*, CANACK+10
, CANACK+11, CANACK+17, CANACK+19, CANACK+27, CANACK+28, CANACK+29, CANACK+30, CANACK+31, CANACK+32, CANACK+45
, CANACK+51, CANACK+52, CANACK+53, CANACK+54
NEWRXIEN GETPAT+1~, GETPAT+5*, GETPAT+6, GETPAT+10*, GETPAT+11, GETPROV+1~, GETPROV+5*, GETPROV+6, GETPROV+10*, GETPROV+11
, GETDRUG+1~, GETDRUG+5*, GETDRUG+6, GETDRUG+10*, GETDRUG+11
OMDIEN EFFDATE+2~, EFFDATE+3*, EFFDATE+4*, EFFDATE+5, EFFDATE+7
PDESC DIAG2017+2~, DIAG2017+11*, DIAG2017+42*, DIAG2017+44, DIAG2017+45
PDESCARY DIAG2017+2~, DIAG2017+11
PDESCARY( DIAG2017+42, DIAG2017+44, DIAG2017+45
PDFRST DIAG2017+2~, DIAG2017+34*, DIAG2017+36, DIAG2017+37, DIAG2017+38
PDIAGARY DIAG2017+2~, DIAG2017+5!, DIAG2017+13!, DIAG2017+15, DIAG2017+20, DIAG2017+33
PDIAGARY( DIAG2017+36, DIAG2017+37, DIAG2017+38, DIAG2017+40, DIAG2017+41
PDIAGARY(0 DIAG2017+34
PDIAGQ DIAG2017+1~, DIAG2017+9*, DIAG2017+12, DIAG2017+14, DIAG2017+15, DIAG2017+16, DIAG2017+33
PDIAGTXT DIAG2017+1~, DIAG2017+16*, DIAG2017+19*, DIAG2017+20
PDIAGV DIAG2017+1~, DIAG2017+10*, DIAG2017+14, DIAG2017+15, DIAG2017+16, DIAG2017+33
PDLOOP DIAG2017+2~, DIAG2017+38*, DIAG2017+40, DIAG2017+41
PMODE CANREQ~, CANREQ+1, CANRES~
PSOIEN DIAG2017~, DIAG2017+4, DIAG2017+5, DIAG2017+62
PSSRET CANACK+1~, CANACK+49
PSSRET("errorMessage" CANACK+50
REQIEN CANRES+1~, CANRES+3*, CANRES+4*, CANRES+6*, GETPAT+1~, GETPAT+8*, GETPAT+9, GETPAT+10, GETPROV+1~, GETPROV+8*
, GETPROV+9, GETPROV+10, GETDRUG+1~, GETDRUG+8*, GETDRUG+9, GETDRUG+10
RESBY CANRES+1~, CANRES+17*, CANRES+29
RESCHECK CANACK+1~, CANACK+8*, CANACK+9, CANACK+11
RESCODE CANRES+1~, CANRES+12*
RESDTTM CANRES+1~, CANRES+14*, CANRES+30
RESID CANACK+1~, CANACK+46*, CANACK+49
RESIEN CANRES+1~, CANRES+3*, CANRES+4*, CANRES+5*, CANRES+6, CANRES+7, CANRES+8, CANRES+9, CANRES+32, CANRES+40
, CANRES+41
RESNOTE CANRES+1~, CANRES+13*, CANRES+24, CANRES+25, CANRES+26, CANRES+27, CANRES+28
RESP CANACK+1~, CANACK+43*, CANACK+44*, CANACK+45*, CANACK+49
>> RESTYPE CANACK+5*, CANACK+8, CANACK+10
RESVAL CANRES+1~, CANRES+11*, CANRES+21, CANRES+23
RSTAT LASTSTAT+1~, LASTSTAT+2*, LASTSTAT+7*, LASTSTAT+8
RTMIEN CANACK+1~, CANACK+26*
RTMTYPE CANACK+1~, CANACK+26*, CANACK+29, CANACK+30
SCOMM CSCOMM+1~, CSCOMM+4*, CSCOMM+5
>> SDERXFLG CANRES+18, CANRES+20, CANRES+31, CANRES+44
SDESC DIAG2017+2~, DIAG2017+23*, DIAG2017+58*, DIAG2017+60, DIAG2017+61
SDESCARY DIAG2017+2~, DIAG2017+23
SDESCARY( DIAG2017+58, DIAG2017+60, DIAG2017+61
SDFRST DIAG2017+2~, DIAG2017+50*, DIAG2017+52, DIAG2017+53, DIAG2017+54
SDIAGARY DIAG2017+2~, DIAG2017+5!, DIAG2017+25!, DIAG2017+27, DIAG2017+32, DIAG2017+49
SDIAGARY( DIAG2017+52, DIAG2017+53, DIAG2017+54, DIAG2017+56, DIAG2017+57
SDIAGARY(0 DIAG2017+50
SDIAGQ DIAG2017+1~, DIAG2017+21*, DIAG2017+24, DIAG2017+26, DIAG2017+27, DIAG2017+28, DIAG2017+49
SDIAGTXT DIAG2017+1~, DIAG2017+28*, DIAG2017+31*, DIAG2017+32
SDIAGV DIAG2017+1~, DIAG2017+22*, DIAG2017+26, DIAG2017+27, DIAG2017+28, DIAG2017+49
SDLOOP DIAG2017+2~, DIAG2017+54*, DIAG2017+56, DIAG2017+57
SDRES DIAG2017+1~, DIAG2017+25!, DIAG2017+26
SDRES( DIAG2017+29, DIAG2017+30
SDRESDAT DIAG2017+2~, DIAG2017+30*, DIAG2017+31
SDRESL DIAG2017+2~, DIAG2017+29*, DIAG2017+30
SFIEN COMMVAL+2~, COMMVAL+3*, COMMVAL+4*, COMMVAL+5, COMMVAL+7, COMMVAL+9
STAT LASTSTAT+1~, LASTSTAT+4*, LASTSTAT+5, CSCOMM+1~, CSCOMM+3*, CSCOMM+4
SUB COMMVAL~, COMMVAL+4, COMMVAL+5, COMMVAL+7, COMMVAL+9
TEXT SETLOC~, SETLOC+1, SETGL~, SETGL+1
TYPE COMMVAL~, COMMVAL+6
TYPEVAL COMMVAL+2~, COMMVAL+5*, COMMVAL+6
VAL COMMVAL+2~, COMMVAL+4, COMMVAL+7*, COMMVAL+10*, COMMVAL+11, COMMVAL+12
>> VALMAR CANACK+33, CANACK+55
>> VALMBCK CANACK+2*
X COMMVAL+2~
Y CANACK+1~, CANACK+13, CANACK+14, CANACK+24, CANACK+25!, CANACK+42, CANACK+43, CANACK+44, CANACK+45, CANACK+46
, CANACK+48
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