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

Package: Pharmacy Data Management

Routine: PSSDSONF


Information

PSSDSONF ;BIR/RTR-Dosing On/Off Parameter ;07/09/12

Source Information

Source file <PSSDSONF.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 DD^%DT  NOW^%DTC  (FILE,UPDATE)^DIE  $$GET1^DIQ  ^DIR  
Kernel 1 $$PROD^XUPROD  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

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

Package Total Caller Graph
Pharmacy Data Management 2 PSS DOSING ORDER CHECKS  ^PS(59.7  

Entry Points

Name Comments DBIA/ICR reference
EN ;Turn Dosing On and Off
ON ;
TMES ;Write final message
SEND(PSSDONW,PSSDONAB) ;Send mail message
LCK ;Lock node
UNLCK ;Unlock node
END ;
ACLOG ;Set activity log multiple for DOSING ON/OFF switch.

External References

Name Field # of Occurrence
DD^%DT SEND+5
NOW^%DTC SEND+5, ACLOG+4
FILE^DIE EN+12, ON+17
UPDATE^DIE ACLOG+8
$$GET1^DIQ SEND+7
^DIR EN+10, ON+5, ON+9, ON+16, END+1
$$SITE^VASITE SEND+6
^XMD SEND+19
$$PROD^XUPROD EN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,$S(PSSDONA:"Dosing Order Checks are currently ENABLED.",1:"WARNING! Dosing Order Checks are currently DISABLED.")
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"No Dosing Order Checks will be performed during order entry in CPRS or",!,"Pharmacy while Dosing Order Checks are disabled!!!"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!?5,"WARNING! Dosing Order Checks remain DISABLED."
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!?5,"UNABLE to enable Dosing Order Checks! Please contact",!?5,"local support for assistance."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !!?5,"Dosing Order Checks ENABLED.",!
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !
  • Line Location: ON+2
Function Call: WRITE
  • Prompt: !!?5,"Dosing Order Checks remain ENABLED."
  • Line Location: ON+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ON+6
Function Call: WRITE
  • Prompt: !!?5,"Dosing Order Checks remain ENABLED."
  • Line Location: ON+9
Function Call: WRITE
  • Prompt: !!,"NO Dosing Order Checks will be performed during order entry in CPRS"
  • Line Location: ON+10
Function Call: WRITE
  • Prompt: !,"or Pharmacy while Dosing Order Checks are disabled!!!",!!,"Notification of this action will be sent to PBM and local VistA"
  • Line Location: ON+11
Function Call: WRITE
  • Prompt: !,"PSS ORDER CHECKS mail group."
  • Line Location: ON+12
Function Call: WRITE
  • Prompt: !
  • Line Location: ON+13
Function Call: WRITE
  • Prompt: !!?5,"Dosing Order Checks remain ENABLED."
  • Line Location: ON+16
Function Call: WRITE
  • Prompt: !!?5,"UNABLE to disable Dosing Order Checks! Please contact",!?5,"local support for assistance."
  • Line Location: ON+18
Function Call: WRITE
  • Prompt: !!?5,"Dosing Order Checks DISABLED.",!
  • Line Location: ON+19
Function Call: WRITE
  • Prompt: !,"Note: This is a TEST account. This request will NOT be sent forward to PBM",!,"on Outlook mail."
  • Line Location: TMES+1
Function Call: WRITE
  • Prompt: !,"NOTIFICATION OF THIS ACTION has been forwarded to PBM and local",!,"VistA PSS ORDER CHECKS mail group."
  • Line Location: TMES+2
Function Call: WRITE
  • Prompt: !!,"Another person is editing the Dosing On/Off Switch."
  • Line Location: LCK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Routine Call
  • DIE
  • Line Location:
    • EN+12
    • ON+17
Routine Call
  • DIE
  • Line Location:
    • ACLOG+8
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • ON+5
    • ON+9
    • ON+16
    • END+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(59.7 - [#59.7] EN+2, EN+13, ON+18, LCK+1, UNLCK+1
^TMP("DIERR" EN+12!, ON+17!, ACLOG+7!, ACLOG+9!
^TMP($J SEND+8!, SEND+10*, SEND+11*, SEND+13*, SEND+20!

Label References

Name Line Occurrences
END EN+6, EN+10, EN+13, EN+15, ON+1, ON+5, ON+9, ON+16, ON+18, ON+20
LCK EN+6, ON+1
ON EN+4
SEND EN+15, ON+20
TMES EN+14, ON+19
UNLCK EN+10, EN+13, EN+15, ON+5, ON+9, ON+16, ON+18, ON+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SEND+2~, SEND+5, ACLOG+2~, ACLOG+4
%DT SEND+2~, SEND+5*
%H SEND+2~, ACLOG+2~
%I SEND+2~, ACLOG+2~
DA EN+1~, ACLOG+3
DIC EN+1~
DIE EN+1~
DIFROM SEND+2~
>> DILOCKTM LCK+1
DIR EN+1~, EN+7!, EN+10!, ON+2!, ON+5!, ON+6!, ON+13!, ON+16!, END+1!
DIR("?" EN+8*, EN+9*, ON+3*, ON+4*, ON+8*, ON+14*, ON+15*
DIR("A" EN+7*, ON+2*, ON+6*, ON+7*, ON+13*, END+1*
DIR("B" EN+7*, ON+2*, ON+6*, ON+13*
DIR(0 EN+7*, ON+2*, ON+6*, ON+13*, END+1*
DIROUT EN+1~
DIRUT EN+1~
DR EN+1~
DTOUT EN+1~, EN+7!, EN+10, ON+2!, ON+5, ON+6!, ON+9, ON+13!, ON+16
DUOUT EN+1~, EN+7!, EN+10, ON+2!, ON+5, ON+6!, ON+9, ON+13!, ON+16
DUZ SEND+4, SEND+7, SEND+16, ACLOG+5
PSSDHAH ACLOG+2~
PSSDHAH("DA" ACLOG+3*, ACLOG+4, ACLOG+5, ACLOG+6
PSSDHAHX ACLOG+2~
PSSDHAHX( ACLOG+4*, ACLOG+5*, ACLOG+6*
PSSDONA EN+1~, EN+2*, EN+3, EN+4
PSSDONAB SEND~, SEND+1, SEND+9, SEND+12, SEND+15, SEND+18
PSSDONDZ SEND+2~, SEND+7*, SEND+10, SEND+13
PSSDONLC SEND+2~, SEND+6*, SEND+10
PSSDONLK EN+1~, EN+6, ON+1, LCK+1*, LCK+2*
PSSDONR EN+1~, EN+12!, ON+17!
PSSDONR( EN+12*, ON+17*
PSSDONSC SEND+2~, SEND+5*, SEND+11, SEND+13
PSSDONTS EN+1~, EN+2*, TMES+1, SEND+1, SEND+18
PSSDONW SEND~, SEND+3, SEND+11, SEND+13
X EN+1~, SEND+2~, ACLOG+2~
>> X1(1 ACLOG+1
>> X2(1 ACLOG+1, ACLOG+6
XMDUN SEND+2~
XMDUZ SEND+2~, SEND+4*
XMMG SEND+2~
XMROU SEND+2~
XMSTRIP SEND+2~
XMSUB SEND+2~, SEND+3*
XMTEXT SEND+2~, SEND+14*
XMY SEND+2~
XMY( SEND+16*
XMY("G.PSS OR DER CHECKS" , SEND+17*
XMY("MOCHADOSINGDISCONNECTNOTIFY@domain.ext" SEND+18*
XMYBLOB SEND+2~
XMZ SEND+2~
Y EN+1~, EN+10, ON+5, ON+9, ON+16, SEND+2~, SEND+5*
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