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

Package: CMOP

Routine: PSXRTR


Information

PSXRTR ;BIR/BAB,WPB,PWC-Transmit Data to CMOP Host System ;14 Dec 2001

Source Information

Source file <PSXRTR.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 5 NOW^%DTC  ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
CMOP 2 (EN,GRP1)^PSXNOTE  ^PSXRXU  
Kernel 2 SETUP^XQALERT  $$KSP^XUPARAM  
MailMan 2 XMZ^XMA2  ENT1^XMD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
CMOP 1 PSXRSUS  

Entry Points

Name Comments DBIA/ICR reference
RESET ; reset normal CMOP Patient transmissions
XMIT ;Update 550.2 # of ORDs, RXs; rxS IN 52, 52.5: 550.2 to Transmitted
EN ;Entry point for data transmission, load mailman message and send
HDR ;Gather data from header, load NTE1 - NTE5 into mailmessage from PSXORD( array
LOCK ;
EXIT
XMZ
DIVERT ; divert transmissions from CMOP to the user evoking the divert
TXT ;

External References

Name Field # of Occurrence
NOW^%DTC LOCK+1, XMIT+2
^DIC EN+10
^DIE LOCK+8, XMIT+5, XMIT+10
$$GET1^DIQ EN+6, EN+7, HDR+1, LOCK+12, DIVERT+6, RESET+4
^DIR DIVERT+2, DIVERT+7
EN^PSXNOTE LOCK+18
GRP1^PSXNOTE XMIT+3
^PSXRXU XMIT+8
XMZ^XMA2 XMZ
ENT1^XMD LOCK+16
SETUP^XQALERT XMIT+3
$$KSP^XUPARAM EN+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"EN^PSXRTR DIV: ",PSOSITE," ",+$G(PSXBAT)
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"This will divert CMOP Patient transmissions to the user evoking the divert",!,"for one day or until 'D RESET^PSXRTR' is executed.",!
  • Line Location: DIVERT+1
Function Call: WRITE
  • Prompt: !,"CMOP Patient transmissions >>NOT DIVERTED<<",!
  • Line Location: DIVERT+3
Function Call: WRITE
  • Prompt: !!,"CMOP Patient transmissions >>DIVERTED<< to ",$$GET1^DIQ(200,DUZ,.01),!!,"Use 'D RESET^PSXRTR' to restore normal CMOP Patient transmissions.",!
  • Line Location: DIVERT+6
Function Call: WRITE
  • Prompt: !,"CMOP Patient transmissions >>",N,"<< diverted"
  • Line Location: RESET+3
Function Call: WRITE
  • Prompt: " to ",$$GET1^DIQ(200,XX,.01)
  • Line Location: RESET+4
Function Call: WRITE
  • Prompt: ".",!,"CMOP Patient transmissions are set to go to the CMOP.",!
  • Line Location: RESET+5
Routine Call
  • DIE
  • Line Location:
    • LOCK+8
    • XMIT+5
    • XMIT+10
Routine Call
  • DIC
  • Line Location:
    • EN+10
Routine Call
  • DIR
  • Line Location:
    • DIVERT+2
    • DIVERT+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(4.2 - [#4.2] GET1^DIQ
^PSX(550 - [#550] Classic Fileman Calls
^PSX(550.1 - [#550.1] Classic Fileman Calls
^PSX(550.2 - [#550.2] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(59 - [#59] EN+6
^PSX(550 - [#550] LOCK+12, XMIT+9, XMIT+11
^PSX(550.1 - [#550.1] EN+3, EN+5, LOCK+3, LOCK+4, LOCK+5, LOCK+6, LOCK+8
^PSX(550.2 - [#550.2] XMIT+3, XMIT+6
^XMB(3.9 - [#3.9] LOCK+10*, TXT+1*
^XTMP("PSXDIVERTCMOP" LOCK+14, LOCK+15, DIVERT+4*, DIVERT+5*, RESET+1, RESET+4, RESET+6!

Label References

Name Line Occurrences
EXIT EN+3
TXT HDR+1, HDR+2, HDR+8, LOCK+4, LOCK+5, LOCK+9
XMIT LOCK+17
XMZ XMZ+1

Naked Globals

Name Field # of Occurrence
^(0 LOCK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LOCK+1, XMIT+2, EXIT!
BAT LOCK+19!
DA LOCK+6!*, LOCK+8!, LOCK+19!, XMIT+4*, XMIT+5!, XMIT+10*!
DIC EN+10*!
DIC(0 EN+10*
DIE LOCK+6!, LOCK+7*, LOCK+8!, LOCK+19!, XMIT+4*, XMIT+5!, XMIT+10*!
DIR DIVERT+2!, DIVERT+7!
DIR("A" DIVERT+7*
DIR("B" DIVERT+2*
DIR(0 DIVERT+2*, DIVERT+7*
DOMAIN EN+8~, LOCK+12*, LOCK+14, LOCK+19!
DR LOCK+6!, LOCK+7*, LOCK+8!, LOCK+19!, XMIT+4*, XMIT+5!, XMIT+10*!
DT LOCK+10, DIVERT+4
>> DTTM LOCK+1*, LOCK+7
DUZ EN+6, DIVERT+5, DIVERT+6
ERR EN+1!
ERROR EXIT!
IOST EN+2
LCNT EN+8~, EN+9*, LOCK+10, LOCK+19!, TXT+1*
LNTX LOCK+3*, LOCK+4, LOCK+5, LOCK+19!
MSG LOCK+1*, LOCK+3*, LOCK+4, LOCK+5, LOCK+6, LOCK+19!
N EXIT!, RESET+2*, RESET+3
ORD EN+8~, HDR+1*, HDR+2*, HDR+8*, LOCK+4*, LOCK+5*, LOCK+9*!, TXT+1
>> PSOSITE EN+2, EN+6
PSX LOCK+5*, LOCK+19!
PSXBAT EN+2, EN+3, EN+5, EN+7, HDR+1, LOCK+3, LOCK+7, LOCK+9, XMIT+3, XMIT+4
, XMIT+6, XMIT+10, EXIT!
>> PSXCS EN+11
PSXDIV EN+6*, EN+7, LOCK+19!
PSXEND EN+4*, EN+5*, EN+7, XMIT+4, EXIT!
PSXER EXIT!
PSXFAC LOCK+9, EXIT!
>> PSXFLAG LOCK+18*
PSXHDR EN+7*, HDR+1, EXIT!
PSXJOB EN+1*, EXIT!
PSXMFLAG EN+4*, XMIT+7*, EXIT!
PSXMSG EN+4*, EN+5*, EXIT!
PSXMSGCT EN+9*, LOCK+3*, LOCK+9, XMIT+4, EXIT!
PSXORD LOCK+19!
PSXORD( HDR+8
PSXORD("A" HDR+2
PSXORD("B" HDR+5*
PSXORD("C" HDR+6*
PSXORD("D" HDR+7*
>> PSXREF EN+7*
PSXRTRN EN+1*, EXIT!
PSXRXCT EN+9*, LOCK+5*, LOCK+9, XMIT+4, EXIT!
PSXSENDR EN+6*, EN+7, EXIT!
PSXSITE EN+6*, EN+7, EXIT!
>> PSXSTART EN+4*, EN+5*, EN+7, XMIT+4
>> PSXSYS EN+6, EN+7, LOCK+12, XMIT+9, XMIT+10, XMIT+11
PSXTDT EN+7, EXIT!
PSXTRDTM XMIT+2~*, XMIT+4
RECV LOCK+12*, LOCK+19!
SITENUM EN+6*, EN+7, LOCK+19!
SITEX EN+10*, EN+11, XMZ+2!
U EN+6, EN+7, HDR+1, LOCK+3, LOCK+4, LOCK+9, LOCK+10, LOCK+12, DIVERT+4
X EN+10*!
XMDUN LOCK+10*, LOCK+19!
XMDUZ EN+8~, EN+11*, LOCK+11*, LOCK+19!
XMSUB EN+8~, EN+11*, LOCK+19!
XMY LOCK+19!
XMY( LOCK+15*
XMY("S.PSXX C MOP SERVER" , LOCK+14*
XMZ EN+8~, XMZ+1, LOCK+10, LOCK+19!, TXT+1
XQA XMIT+3!
XQAMSG XMIT+3*!
XSITE EN+6*, EN+7, LOCK+19!
>> XX LOCK+15*, RESET+1*, RESET+2, RESET+4*
Y EN+10!, DIVERT+3
Z HDR+8*, LOCK+19!
>> ZCNT LOCK+1*
ZZ HDR+8*, LOCK+19!
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