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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSOERXU6

Package: Outpatient Pharmacy

Routine: PSOERXU6


Information

PSOERXU6 ;ALB/BWF - eRx utilities ;Feb 10, 2022@11:04

Source Information

Source file <PSOERXU6.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Outpatient Pharmacy 13 $$RXRLDT^PSOBPSUT  OERR^PSOCAN3  TXT2ARY^PSOERXD1  POST^PSOERXO1  ($$CHKERX,$$ERRSEQ,FILERR,UPDSTAT)^PSOERXU1  $$RESOLV^PSOERXU2  DIRE^PSOERXX1  EN^PSOHLSN  
LOCK^PSOORCPY  EX^PSOORFI1  SPAT2^PSOORFIN  PRONTE^PSOORUT3  DEAD^PSOPTPST  
Kernel 2 $$FMTE^XLFDT  $$UP^XLFSTR  
List Manager 1 FULL^VALM1  
Pharmacy Data Management 1 ($$L,UL)^PSSLOCK  
VA FileMan 1 ($$GET1,GETS)^DIQ  

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

Package Total Caller Graph
Outpatient Pharmacy 11 PSO ERX ENTER PROGRESS NOTES  PSO ERX JUMP TO OP  PSO ERX STATUS HISTORY  PSOERX1F  PSOERXA3  PSOERXA5  PSOERXA6  PSOERXI2  
PSOERXO1  PSOERXU2  PSOERXX1  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
CANDC(ERXIEN,INST,PSSRET) ;
CANRELHQ(NERXIEN) ;
CANACT(ERXIEN,RXIEN,INST,PSSRET) ;
CANPEND(ERXIEN,PENDIEN,INST,PSSRET) ;
BLDRESP(RXIEN) ;
FINDNRX(ERXIEN) ;
JTQ(ERXIEN) ;
PN(ERXIEN) ; Enter VistA Patient Progress Notes
VARENEW(OPIEN) ;
SH(ERXIEN) ;
LSIG(SIG) ;

External References

Name Field # of Occurrence
$$GET1^DIQ CANDC+5, CANDC+6, CANDC+7, CANDC+10, CANDC+11, CANDC+12, CANDC+21, CANDC+22, CANDC+25, CANDC+62
, CANDC+65, CANDC+66, CANDC+71, CANDC+72, CANRELHQ+4, CANACT+3, CANACT+10, CANACT+12, CANACT+13, CANACT+17
, CANPEND+6, CANPEND+12, CANPEND+27, BLDRESP+2, BLDRESP+5, FINDNRX+8, JTQ+6, JTQ+7, JTQ+11, JTQ+12
, JTQ+17, PN+4, PN+7, VARENEW+3, VARENEW+4, SH+9, SH+12
GETS^DIQ SH+8
$$RXRLDT^PSOBPSUT BLDRESP+4
OERR^PSOCAN3 CANACT+16
TXT2ARY^PSOERXD1 SH+18
POST^PSOERXO1 CANDC+43, CANDC+101
$$CHKERX^PSOERXU1 CANDC+23, CANDC+67, VARENEW+5
$$ERRSEQ^PSOERXU1 CANACT+6, CANACT+20, CANPEND+15, CANPEND+29
FILERR^PSOERXU1 CANACT+9, CANACT+23, CANPEND+17, CANPEND+31
UPDSTAT^PSOERXU1 CANDC+34, CANDC+37, CANDC+38, CANDC+45, CANDC+47, CANDC+48, CANDC+50, CANDC+51, CANDC+52, CANDC+87
, CANDC+88, CANDC+91, CANDC+92, CANDC+102, CANDC+103, CANDC+106, CANDC+107, CANRELHQ+6
$$RESOLV^PSOERXU2 CANDC+4, CANACT+4, CANPEND+5, FINDNRX+5
DIRE^PSOERXX1 JTQ+9, JTQ+13, JTQ+14, SH+5, SH+23
EN^PSOHLSN CANPEND+26
LOCK^PSOORCPY CANPEND+9
EX^PSOORFI1 JTQ+24
SPAT2^PSOORFIN JTQ+24
PRONTE^PSOORUT3 PN+10
DEAD^PSOPTPST CANPEND+22
$$L^PSSLOCK CANPEND+7
UL^PSSLOCK CANPEND+18, CANPEND+32, CANPEND+34
FULL^VALM1 JTQ+3, SH+2
$$FMTE^XLFDT BLDRESP+4, BLDRESP+5, SH+9
$$UP^XLFSTR LSIG+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: JTQ+5
Function Call: WRITE
  • Prompt: !!,"Jumping can only be done on 'NewRx', 'Renewal Response - Replace' and fillable 'RxChange Response' messages.",!
  • Line Location: JTQ+9
Function Call: WRITE
  • Prompt: !!,"Vista patient has not been matched. Cannot jump to outpatient.",!
  • Line Location: JTQ+13
Function Call: WRITE
  • Prompt: !!,"Vista patient has not been validated. Cannot jump to outpatient.",!
  • Line Location: JTQ+14
Function Call: WRITE
  • Prompt: !,"Patient has no pending prescriptions."
  • Line Location: JTQ+20
Function Call: WRITE
  • Prompt: !,"Patient: "_PTNM,!
  • Line Location: JTQ+21
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: SH+3
Function Call: WRITE
  • Prompt: !,"No Status History Available."
  • Line Location: SH+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PSRX - [#52] GET1^DIQ
^PS(52.41 - [#52.41] GET1^DIQ
^PS(52.45 - [#52.45] GET1^DIQ
^PS(52.49 - [#52.49] GET1^DIQ
52.4919 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(51 - [#51] LSIG+3
^PS(52.41 - [#52.41] CANPEND+4, CANPEND+23!, CANPEND+24*, CANPEND+25*
^PS(52.49 - [#52.49] CANDC+9, CANRELHQ+3, FINDNRX+3, SH+5, SH+6
^PS(59.7 - [#59.7] CANACT+11
^PSRX - [#52] BLDRESP+2
^XUSEC("PSORPH" JTQ+10

Label References

Name Line Occurrences
$$BLDRESP CANACT+24
$$CANACT CANDC+20, CANDC+64, CANDC+68, CANDC+76
$$CANPEND CANDC+26, CANDC+63, CANDC+74, CANDC+75
$$VARENEW CANDC+46
CANRELHQ CANDC+37, CANDC+39, CANDC+45, CANDC+49, CANDC+53, CANDC+89, CANDC+93, CANDC+105, CANDC+108

Naked Globals

Name Field # of Occurrence
^( LSIG+3
^(0 CANPEND+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LSIG+3*
ACOM CANACT+24*, CANACT+25, CANPEND+1~, CANPEND+8, CANPEND+10*, CANPEND+11*, CANPEND+19*, CANPEND+25, CANPEND+35, BLDRESP+1~
, BLDRESP+6*, BLDRESP+7
ACOMACT CANDC+1~, CANDC+20*, CANDC+29, CANDC+31, CANDC+32, CANDC+36, CANDC+37, CANDC+40
ACOMACT( CANDC+64*, CANDC+68*, CANDC+76*, CANDC+79, CANDC+80, CANDC+81, CANDC+82
ACOMPEND CANDC+1~, CANDC+26*, CANDC+30, CANDC+33, CANDC+41
ACOMPEND( CANDC+63*, CANDC+74*, CANDC+75*, CANDC+83, CANDC+84, CANDC+85
ACTFL CANDC+78~, CANDC+79*, CANDC+80*, CANDC+81, CANDC+90
ACTLP CANDC+78~, CANDC+79*, CANDC+80, CANDC+81, CANDC+82
ACTMSG CANDC+78~, CANDC+95
ACTMSG( CANDC+81*, CANDC+97
ACTMSG(99999 CANDC+96
ADAT CANDC+1~, CANDC+16*, CANDC+17, CANDC+57*, CANDC+60
ALOOP CANDC+1~, CANDC+55*, CANDC+56*, CANDC+57, CANDC+63, CANDC+64, CANDC+68, CANDC+74, CANDC+75, CANDC+76
, SH+1~, SH+20*, SH+21
ARESP CANDC+2~, CANDC+32*, CANDC+33*, CANDC+34, CANDC+38, CANDC+40*, CANDC+41*, CANDC+43, CANDC+45, CANDC+50
, CANDC+51, CANDC+52
ARY CANDC+1~
ARY( CANDC+8*, CANDC+13*, CANDC+16, CANDC+56, CANDC+57
BLINKLN JTQ+2~
CANTYPE CANDC+1~, CANPEND+1~, CANPEND+12*, CANPEND+14
CANTYPEA CANPEND+1~, CANPEND+27*, CANPEND+28
CARY SH+1~, SH+17!, SH+18
CARY( SH+20, SH+21
CNT CANDC+1~, CANDC+3*, CANDC+8*, CANDC+13*, CANDC+15, CANDC+16
DELFLG CANDC+2~, CANDC+82*, CANDC+86
DELTXT CANDC+2~, CANDC+82*, CANDC+87, CANDC+88
DFN JTQ+1~, JTQ+11*, JTQ+13, JTQ+17, JTQ+18
DONE CANDC+1~, CANDC+25*, CANDC+28, CANDC+55*, CANDC+56, CANDC+71*, FINDNRX+1~, FINDNRX+2*, FINDNRX+4, FINDNRX+6*
, FINDNRX+8*
DUZ JTQ+10
EBY SH+1~, SH+13*, SH+19
ERRSEQ CANACT+6*, CANACT+9, CANACT+20*, CANACT+23, CANPEND+1~, CANPEND+15*, CANPEND+17, CANPEND+29*, CANPEND+31
ERXIEN CANDC~, CANDC+4, CANDC+20, CANDC+26, CANDC+37, CANDC+38, CANDC+43, CANDC+48, CANDC+51, CANDC+52
, CANDC+63, CANDC+64, CANDC+68, CANDC+74, CANDC+75, CANDC+76, CANDC+88, CANDC+92, CANDC+101, CANDC+106
, CANDC+107, CANACT~, CANACT+2, CANACT+4, CANACT+6, CANACT+20, CANPEND~, CANPEND+2, CANPEND+5, CANPEND+15
, CANPEND+29, FINDNRX~, FINDNRX+3, FINDNRX+5, FINDNRX+7*, JTQ~, JTQ+6, JTQ+7, JTQ+11, JTQ+12
, PN~, PN+4, PN+7, SH~, SH+5, SH+6, SH+7
ERXIENS CANACT+1~, CANACT+2*, CANACT+9, CANACT+23, CANPEND+1~, CANPEND+2*, CANPEND+17, CANPEND+31
ESTAT SH+1~, SH+11*, SH+19
F SH+1~, SH+4*, SH+8, SH+10, SH+11, SH+13, SH+14, SH+15, SH+16
FFILL CANPEND+1~, BLDRESP+1~, BLDRESP+5*, BLDRESP+6
FORORD CANDC+2~, CANDC+21*, CANDC+22, CANDC+23, CANDC+51, CANDC+52, CANDC+65*, CANDC+66, CANDC+67, VARENEW+1~
, VARENEW+3*, VARENEW+4, VARENEW+5
HFFDT SH+1~, SH+15*, SH+19
HIGHLN JTQ+2~
HIGUNDLN JTQ+2~
I BLDRESP+2*, FINDNRX+1~, FINDNRX+4*
IENS SH+1~, SH+7*, SH+8, SH+9, SH+10, SH+11, SH+13, SH+14, SH+15, SH+16
INST CANDC~, CANDC+20, CANDC+26, CANDC+43, CANDC+63, CANDC+64, CANDC+68, CANDC+74, CANDC+75, CANDC+76
, CANDC+101, CANACT~, CANPEND~
ISTAT SH+1~, SH+10*, SH+12
LDDATE CANPEND+1~
LINE SH+1~, SH+3*
LRDATE BLDRESP+1~, BLDRESP+4*, BLDRESP+6
LSTMSG CANDC+2~, CANDC+96*, CANDC+97, CANDC+99*, CANDC+100
>> MBMSITE CANDC+51, CANDC+106
MEDA JTQ+1~
MTYPE JTQ+1~, JTQ+6*, JTQ+8
NERXIEN CANDC+1~, CANDC+4*, CANDC+5, CANDC+6, CANDC+7, CANDC+9, CANDC+34, CANDC+37, CANDC+39, CANDC+45
, CANDC+47, CANDC+49, CANDC+50, CANDC+53, CANDC+87, CANDC+89, CANDC+91, CANDC+93, CANDC+102, CANDC+103
, CANDC+105, CANDC+108, CANRELHQ~, CANRELHQ+3, CANACT+1~, CANACT+4*, CANACT+16, CANPEND+1~, CANPEND+5*
NRXOPIEN CANDC+1~, CANDC+6*, CANDC+8
NRXPNIEN CANDC+1~, CANDC+7*, CANDC+8
NRXVPAT CANDC+1~, CANDC+5*, CANDC+25, CANDC+62, CANDC+71
OPIEN VARENEW~
ORD CANPEND+1~, CANPEND+20*, CANPEND+23, CANPEND+24, CANPEND+25
ORN CANACT+1~, CANACT+14*
ORNUM CANPEND+1~
P LSIG+1~, LSIG+2*, LSIG+3
PAT JTQ+1~, JTQ+18*
PATVAL JTQ+1~, JTQ+12*, JTQ+14
PENDIEN CANDC+2~, CANDC+17*, CANDC+24, CANDC+25, CANDC+26, CANDC+60*, CANDC+62, CANDC+63, CANDC+69, CANDC+71
, CANDC+72, CANDC+74, CANDC+75, CANPEND~, CANPEND+3, CANPEND+4, CANPEND+6, CANPEND+12, CANPEND+20, CANPEND+27
PENFAIL CANDC+2~, CANDC+30*, CANDC+31, CANDC+33
PENFL CANDC+78~, CANDC+83*, CANDC+84*, CANDC+85, CANDC+90
PENLP CANDC+78~, CANDC+83*, CANDC+84, CANDC+85
PENMSG CANDC+78~
PENMSG( CANDC+85*, CANDC+100
PENMSG(99999 CANDC+99
POERR CANPEND+33!, JTQ+1~, JTQ+15*
POERR("COMM" CANPEND+25*, CANPEND+26
POERR("DEAD" CANPEND+25
POERR("PLACER" CANPEND+24*, CANPEND+26
POERR("STAT" CANPEND+24*, CANPEND+26
PON CANDC+2~, CANDC+22*, CANDC+66*, CANDC+67, VARENEW+1~, VARENEW+4*, VARENEW+5
PREVIEN FINDNRX+1~, FINDNRX+2*, FINDNRX+5*, FINDNRX+6, FINDNRX+7, FINDNRX+8, FINDNRX+9
PREVORD CANDC+2~, CANDC+72*, CANDC+73, CANDC+76, CANPEND+1~
PSODFN CANACT+1~, CANACT+12*, CANPEND+1~, CANPEND+6*, CANPEND+7, CANPEND+18, CANPEND+25, CANPEND+32, CANPEND+34, JTQ+1~
, JTQ+18*, PN+3~, PN+4*, PN+5
PSOFIN JTQ+1~, JTQ+15*
PSOFINY JTQ+1~, JTQ+18*
PSOIN LSIG+3~*
PSOJUMP JTQ+5, JTQ+23*, JTQ+26!
PSOLST JTQ+1~
PSOLST(1 CANACT+13*
PSONOOR CANPEND+1~, CANPEND+21*, CANPEND+26
PSOOPT CANACT+1~, CANACT+15*
>> PSOPAR JTQ+10
PSOPLCK CANPEND+1~, CANPEND+7*, CANPEND+8, CANPEND+10, CANPEND+11!
PSOPTPST CANPEND+33!
PSOPTPST(2 CANPEND+25
PSORX JTQ+26!
PSORX("VERIFY" JTQ+10*
PSOSITE CANACT+1~, CANACT+10*
PSOSORT JTQ+1~, JTQ+16*
PSOSYS CANACT+1~, CANACT+11*
PSSRET CANDC~, CANDC+2~, CANDC+20, CANDC+26, CANDC+43, CANDC+63, CANDC+64, CANDC+68, CANDC+74, CANDC+75
, CANDC+76, CANDC+101, CANACT~, CANPEND~
PSSRET("errorMessage" CANDC+45, CANDC+105
PTNM JTQ+1~, JTQ+17*, JTQ+18, JTQ+21
REFL CANPEND+1~, BLDRESP+1~, BLDRESP+2*, BLDRESP+6
RELIEN CANDC+2~, CANDC+60*
RELMIEN CANDC+1~, CANDC+9*, CANDC+10, CANDC+11, CANDC+12, CANDC+13, CANRELHQ+1~, CANRELHQ+3*, CANRELHQ+4, CANRELHQ+6
REOPIEN CANDC+1~, CANDC+11*, CANDC+13
REPNIEN CANDC+1~, CANDC+12*, CANDC+13
RESVAL JTQ+1~, JTQ+7*, JTQ+8
REVLN JTQ+2~
RRRETYPE CANDC+2~, CANRELHQ+1~, CANRELHQ+4*, CANRELHQ+5
RXFAIL CANDC+2~, CANDC+29*, CANDC+31, CANDC+32
RXIEN CANDC+1~, CANDC+2~, CANDC+17*, CANDC+19, CANDC+20, CANDC+21, CANDC+24, CANDC+46, CANDC+60*, CANDC+61
, CANDC+64, CANDC+65, CANDC+68, CANDC+69, CANACT~, CANACT+3, CANACT+10, CANACT+12, CANACT+13, CANACT+17
, CANACT+24, BLDRESP~, BLDRESP+2, BLDRESP+4, BLDRESP+5, VARENEW+3
RXSTAT CANACT+1~, CANACT+3*, CANACT+5, CANACT+7
SCOMM SH+1~, SH+16*, SH+18
SDAT SH+1~
SDAT( SH+10, SH+11, SH+13, SH+14, SH+15, SH+16
SDTTM SH+1~, SH+9*, SH+19
SENDMSG CANDC+2~, CANDC+97*, CANDC+98, CANDC+100*, CANDC+101, CANDC+103
SGY LSIG+1~, LSIG+2*, LSIG+4*, LSIG+5
SIEN SH+1~, SH+6*, SH+7
SIG LSIG~, LSIG+2, LSIG+3
STDESC SH+1~, SH+12*, SH+19
TOTFILL CANPEND+1~, BLDRESP+1~, BLDRESP+2*
U CANDC+8, CANDC+13, CANDC+17, CANDC+29, CANDC+30, CANDC+31, CANDC+32, CANDC+33, CANDC+36, CANDC+37
, CANDC+40, CANDC+41, CANDC+60, CANDC+80, CANDC+81, CANDC+82, CANDC+84, CANDC+85, CANACT+13, CANACT+21
, CANACT+24, CANPEND+11, CANPEND+35, JTQ+18
UNACC SH+1~, SH+14*, SH+19
UNDERLN JTQ+2~
UPDRXSTA CANACT+1~, CANACT+17*, CANACT+18, CANACT+19
UPDRXSTAT CANACT+1~
>> VALMBCK JTQ+4*, PN+3*, PN+10*, SH+2*
VALMCNT JTQ+2~
VALMSG CANACT+1~, CANACT+5, CANACT+7*, CANACT+8*, CANACT+9, CANACT+18, CANACT+19*, CANACT+21*, CANACT+22*, CANACT+23
, CANPEND+1~, CANPEND+14, CANPEND+16*, CANPEND+17, CANPEND+28, CANPEND+30*, CANPEND+31, JTQ+5*, PN+6*, PN+8*
VARENEW CANDC+2~, CANDC+23*, CANDC+43, CANDC+67*, CANDC+101, CANDC+102, CANDC+103, CANDC+106, CANDC+107, VARENEW+1~
, VARENEW+2*, VARENEW+5*, VARENEW+6
>> X LSIG+2*, LSIG+3*, LSIG+4
>> Y LSIG+3*
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 |  Naked Globals |  Local Variables  | All