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

Package: CMOP

Routine: PSXRXQU


Information

PSXRXQU ;BIR/BAB,WPB-CMOP RX QUEUE File Utility ;15-Nov-2013 13:10;DU

Source Information

Source file <PSXRXQU.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 5 NOW^%DTC  ^DIC  FILE^DICN  ^DIE  ^DIK  
CMOP 2 LOGACK^PSXPURG  TSOUT^PSXUTL  
Health Level Seven 1 $$HLPHONE^HLFNC  
Registration 1 (ADD,DEM)^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
CMOP 2 PSXBLD  PSXRSYU  

Entry Points

Name Comments DBIA/ICR reference
LOADMSG ; set RXs HL7 text into PSXMSG 'T', set PSXBAT 1////1
STAT ;Display status of CMOP RX QUEUE
SET ;
STRIP(X) ;EP Strip control characters out and replace with " "
; $A(124) = Pipe Character '|'
ACKN ;Flag message as Acknowledged
PID ; build patients PID HL7 segment
NEWMSG ;Increment & create entry in RX QUEUE file, put pid/demog in 'T' ; return PSXMSG, PSX=3
PURGE ;Purge 550.1 of any entries w/Message Status "IN TRANSITION"
SUSP ; put RXs ien int 550.1 RX multiple
RXMSG ; put RX ien into 550.1 RX multiple , returns PSXRXMDA DA within 'M'essage multiple
MSH ; build patients MSH HL7 segment
QMSG ;Queue message for transmission
PROC ;Flag message as Processed

External References

Name Field # of Occurrence
NOW^%DTC NEWMSG+2
^DIC NEWMSG+5
FILE^DICN SET+3
^DIE QMSG+2
^DIK PURGE+1
$$HLPHONE^HLFNC PID+3
LOGACK^PSXPURG ACKN+2
TSOUT^PSXUTL MSH+2
ADD^VADPT MSH+2
DEM^VADPT MSH+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Next Order Number to Transmit : ",$S(PSX2:PSX2,1:PSX1)
  • Line Location: STAT+3
Function Call: WRITE
  • Prompt: !!,"Last Order Number Generated : ",PSX1
  • Line Location: STAT+4
Routine Call
  • DIE
  • Line Location:
    • QMSG+2
Routine Call
  • DIC
  • Line Location:
    • NEWMSG+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSX(550.1 - [#550.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] PID+1
^PS(55 - [#55] PID+6, PID+8
^PS(59.7 - [#59.7] PID+9
^PSX(550.1 - [#550.1] PURGE+1, MSH+2*, PID+1*, PID+4*, PID+10*, PID+11*, PID+22*, LOADMSG+2*, LOADMSG+4*, LOADMSG+7*
, LOADMSG+8*, QMSG+1, QMSG+2, STAT+1, STAT+2, RXMSG+1*

Label References

Name Line Occurrences
$$STRIP MSH+4
SET SET+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % NEWMSG+4
BEG ACKN+1!
DA PURGE+1*, PURGE+2!, QMSG+1*, QMSG+2!, SET+2*, SET+3!
DA(1 SET+2*
DD NEWMSG+4!, SET+1!
>> DFN PID+6, PID+8
DIC NEWMSG+4*, NEWMSG+5!, SET+1!, SET+2*, SET+3!
DIC("DR" NEWMSG+4*, SET+2*, SET+3!
DIC(0 NEWMSG+4*, SET+2*
DIE QMSG+1*, QMSG+2!
DIK PURGE+1*, PURGE+2!
>> DLAYGO NEWMSG+4*
DO NEWMSG+4!, SET+1!
DR QMSG+1*, QMSG+2!
DTOUT NEWMSG+5!
DUOUT NEWMSG+5!
I MSH+4*, STRIP+2~, STRIP+3*
MSG PURGE+1*, PURGE+2!
>> PSSWSITE PID+9
>> PSX LOADMSG+1*, LOADMSG+2*, LOADMSG+4*, LOADMSG+7*, LOADMSG+8
PSX1 STAT+1~*, STAT+2*, STAT+3, STAT+4
PSX2 STAT+1~, STAT+2*, STAT+3
PSXLANG PID+6*, PID+7*, PID+8*, PID+9*, PID+10!
>> PSXMSG NEWMSG+3*, MSH+2, PID+1, PID+4, PID+10, PID+11, PID+22, LOADMSG+2, LOADMSG+4, LOADMSG+7
, LOADMSG+8, QMSG+1, RXMSG+1, SET+2
>> PSXNM PID+1
PSXORD LOADMSG+6, QMSG+2!
PSXORD( LOADMSG+7
PSXORD("E" LOADMSG+4, LOADMSG+5!
PSXORD("M" LOADMSG+2, LOADMSG+3!
>> PSXRXMDA SET+4*
PSXTS MSH+2!
>> RX SET+2
>> RXF SET+2
TDT PID+19*, PID+20, PID+21*, PID+22, PID+23!
TDT1 PID+21*, PID+23!
TDT2 PID+21*, PID+23!
TDT3 PID+21*, PID+23!
>> VA("PID" PID+11
VADM PID+23!, LOADMSG+9!
VADM(2 MSH+3, PID+1
VAPA PID+23!, LOADMSG+9!
VAPA( MSH+4*, MSH+5*
VAPA(1 PID+1
VAPA(10 PID+19
VAPA(11 PID+1
VAPA(2 PID+1
VAPA(3 PID+20, PID+22
VAPA(4 PID+1
VAPA(5 PID+1
VAPA(8 PID+3
X NEWMSG+3*, LOADMSG+2*, LOADMSG+3!, LOADMSG+4*, LOADMSG+5!, LOADMSG+7*, STAT+1~, SET+2*, SET+3!, STRIP~
, STRIP+3*, STRIP+4
X1 MSH+3*, PID+1, PID+23!, LOADMSG+9!
>> XX PID+3*, PID+4
>> Y SET+3, SET+4
YT MSH+5*, PID+23!
Z STRIP+2~, STRIP+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 |  Local Variables |  All