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

Package Total Caller Graph
Outpatient Pharmacy 12 PSO ERX ENTER PROGRESS NOTES  PSO ERX JUMP TO OP  PSO ERX STATUS HISTORY  PSOERX1B  PSOERX1F  PSOERXA3  PSOERXA5  PSOERXA6  
PSOERXI2  PSOERXO1  PSOERXU5  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+5, JTQ+6, 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+17
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+8, JTQ+13, JTQ+14, SH+5, SH+22
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+2, 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+4
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+19*, SH+20
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
CANTYPE CANDC+1~, CANPEND+1~, CANPEND+12*, CANPEND+14
CANTYPEA CANPEND+1~, CANPEND+27*, CANPEND+28
CARY SH+1~, SH+16!, SH+17
CARY( SH+19, SH+20
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+18
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+5, JTQ+6, 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+18
F SH+1~, SH+4*, SH+8, SH+10, SH+11, SH+13, SH+14, SH+15
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
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
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
MEDA JTQ+1~
MTYPE JTQ+1~, JTQ+5*, JTQ+7
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+4, 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+6*, JTQ+7
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+15*, SH+17
SDAT SH+1~
SDAT( SH+10, SH+11, SH+13, SH+14, SH+15
SDTTM SH+1~, SH+9*, SH+18
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+18
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+18
UPDRXSTA CANACT+1~, CANACT+17*, CANACT+18, CANACT+19
UPDRXSTAT CANACT+1~
>> VALMBCK JTQ+3*, PN+3*, PN+10*, SH+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+4*, 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
XQY0 JTQ+1~, JTQ+9*
>> 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