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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSJ0063

Package: Inpatient Medications

Routine: PSJ0063


Information

PSJ0063 ;BIR/LDT - Check for Trailing Zeros on dates and null start dates; 02 MAY-01

Source Information

Source file <PSJ0063.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ^%ZTLOAD  ($$FMADD,$$FMDIFF)^XLFDT  
MailMan 1 ^XMD  
VA Fileman 1 NOW^%DTC  

Entry Points

Name Comments DBIA/ICR reference
DONE ;
CLEAN ;
ENQN ; Check of existing Pharmacy orders.
ENNV ; Begin check of existing orders
SENDMSG ;Send mail message when check is complete.

External References

Name Field # of Occurrence
NOW^%DTC ENQN+2, SENDMSG+1, CLEAN+14
^%ZTLOAD ENNV+2
$$FMADD^XLFDT ENQN+2
$$FMDIFF^XLFDT SENDMSG+3
^XMD SENDMSG+6, CLEAN+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Your DUZ is not defined. It must be defined to run this routine."
  • Line Location: ENNV+1
Function Call: WRITE
  • Prompt: !!,"The check of existing Pharmacy orders is",$S($D(ZTSK):"",1:" NOT")," queued",!
  • Line Location: ENNV+3
Function Call: WRITE
  • Prompt: " (to start NOW).",!!,"YOU WILL RECEIVE A MAILMAN MESSAGE WHEN TASK #"_ZTSK_" HAS COMPLETED. IF"
  • Line Location: ENNV+5
Function Call: WRITE
  • Prompt: !,"ERRORS ARE DETECTED, YOU WILL RECEIVE A SECOND MESSAGE INDICATING CLEANUP"
  • Line Location: ENNV+6
Function Call: WRITE
  • Prompt: !,"HAS COMPLETED."
  • Line Location: ENNV+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SENDMSG+1, CLEAN+14
^PS(55 - [#55] ENQN+4, ENQN+5, ENQN+6, ENQN+7, CLEAN+3, CLEAN+4, CLEAN+5, CLEAN+6*, CLEAN+8, CLEAN+9*
, CLEAN+10*, CLEAN+11!*, CLEAN+12*, CLEAN+13!*
^XTMP("PSJ" ENQN+3!, ENQN+8*, ENQN+9*, ENQN+11, CLEAN+2

Label References

Name Line Occurrences
CLEAN ENQN+11
SENDMSG ENQN+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ENQN+2, SENDMSG+1, SENDMSG+3, CLEAN+14
A CLEAN+1~, CLEAN+8*
CREAT ENQN+1~, ENQN+2*, ENQN+9
DAYS DONE+1!, SENDMSG+3*, SENDMSG+4
DUZ ENNV+1, SENDMSG+1, CLEAN+14
EXPR ENQN+1~, ENQN+2*, ENQN+9
HOURS DONE+1!, SENDMSG+3*, SENDMSG+4
MINS DONE+1!, SENDMSG+3*, SENDMSG+4
OCNT ENQN+1~, ENQN+2*, ENQN+8*, SENDMSG+5
PSG DONE+1!, SENDMSG+1!, CLEAN+14!
PSG(1 SENDMSG+2*, CLEAN+15*
PSG(2 SENDMSG+2*, CLEAN+15*
PSG(3 SENDMSG+4*
PSG(4 SENDMSG+4*
PSG(5 SENDMSG+4*
PSG(6 SENDMSG+5*
PSG(7 SENDMSG+5*
PSJBEG ENQN+1~, ENQN+4*, ENQN+5
PSJLOG ENQN+6*, ENQN+8, CLEAN+1~, CLEAN+4*, CLEAN+6
PSJND ENQN+6*, CLEAN+1~, CLEAN+4*
PSJND2 ENQN+1~, ENQN+7*, CLEAN+1~, CLEAN+5*
PSJORD ENQN+1~, ENQN+5*, ENQN+6, ENQN+7, ENQN+8, CLEAN+1~, CLEAN+2*, CLEAN+3, CLEAN+4, CLEAN+5
, CLEAN+6, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+11, CLEAN+12, CLEAN+13
PSJOSTP CLEAN+1~, CLEAN+9*
PSJPDFN ENQN+1~, ENQN+4*, ENQN+5, ENQN+6, ENQN+7, ENQN+8, CLEAN+1~, CLEAN+2*, CLEAN+3, CLEAN+4
, CLEAN+5, CLEAN+6, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+11, CLEAN+12, CLEAN+13
PSJPREV CLEAN+1~, CLEAN+4*, CLEAN+7, CLEAN+8, CLEAN+9
PSJST CLEAN+1~, CLEAN+4*, CLEAN+13
PSJSTART ENQN+2*, DONE+1!, SENDMSG+3
PSJSTP ENQN+1~, ENQN+7*, ENQN+8, CLEAN+1~, CLEAN+5*, CLEAN+12, CLEAN+13
PSJSTRT ENQN+1~, ENQN+7*, ENQN+8, CLEAN+1~, CLEAN+5*, CLEAN+7, CLEAN+10, CLEAN+11
X DONE+1!, SENDMSG+3*
XMDUZ DONE+1!, SENDMSG+1*, CLEAN+14*
XMSUB DONE+1!, SENDMSG+1*, CLEAN+14*
XMTEXT DONE+1!, SENDMSG+1*, CLEAN+14*
XMY DONE+1!, SENDMSG+1!, CLEAN+14!
XMY( SENDMSG+1*, CLEAN+14*
Y DONE+1!, SENDMSG+1*, SENDMSG+2, CLEAN+1~, CLEAN+14*, CLEAN+15
ZTDESC ENNV+2*, DONE+1!
ZTDTH DONE+1!
ZTIO ENNV+2*, DONE+1!
ZTREQ DONE+1!*
ZTRTN ENNV+2*, DONE+1!
ZTSAVE ENNV+2!, DONE+1!
ZTSK ENNV+2!, ENNV+3, ENNV+4, ENNV+5, DONE+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All