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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSJ0078

Package: Inpatient Medications

Routine: PSJ0078


Information

PSJ0078 ;BIR/LDT-Check for Dispense Drug ;02 MAY 02 / 4:29 PM

Source Information

Source file <PSJ0078.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Inpatient Medications 3 $$CHECKDUP^PSGOERI  ENQN^PSJ078A  EN1^PSJHL2  
Kernel 2 ^%ZTLOAD  ($$FMADD,$$FMDIFF)^XLFDT  
VA FileMan 2 NOW^%DTC  ^DIE  
MailMan 1 ^XMD  
Order Entry Results Reporting 1 $$STATUS^ORQOR2  

Entry Points

Name Comments DBIA/ICR reference
ENNV ; Begin check of existing orders
ENQN ; Check of existing Pharmacy orders.
DONE ;
SENDMSG ;Send mail message when check is complete.
CLEAN ;
CHECK() ;
SET
CHECK2
A
D
DE
DR
E
H
I
N
O
P
R
RE
U

External References

Name Field # of Occurrence
NOW^%DTC ENQN+2, SENDMSG+1, CLEAN+6, CLEAN+23, CHECK+1
^%ZTLOAD ENNV+2
^DIE CLEAN+19
$$STATUS^ORQOR2 SET+6
$$CHECKDUP^PSGOERI CLEAN+16, CLEAN+17
ENQN^PSJ078A DONE+3
EN1^PSJHL2 CLEAN+20
$$FMADD^XLFDT ENQN+2
$$FMDIFF^XLFDT SENDMSG+3
^XMD SENDMSG+6, CLEAN+35

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 2 MAILMAN MESSAGES WHEN TASK #"_ZTSK_" HAS COMPLETED."
  • Line Location: ENNV+5
Function Call: WRITE
  • Prompt: !,"IF ERRORS ARE DETECTED, YOU WILL RECEIVE ADDITIONAL MESSAGES INDICATING CLEANUP"
  • Line Location: ENNV+6
Function Call: WRITE
  • Prompt: !,"HAS COMPLETED."
  • Line Location: ENNV+7
Routine Call
  • DIE
  • Line Location:
    • CLEAN+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SENDMSG+1, CLEAN+23
^OR(100 - [#100] SET+3
^PS(55 - [#55] ENQN+4, ENQN+5, ENQN+6, CLEAN+3, CLEAN+5*!
^PSDRUG - [#50] CHECK+3
^PSDRUG("ASP" CHECK+3
^XTMP("PSJ XREF" DONE+4!
^XTMP("PSJ" ENQN+3!, ENQN+6*, ENQN+7*, ENQN+9*, ENQN+11, DONE+2!, DONE+4!, CLEAN+2, CLEAN+4, CLEAN+6
CLEAN+7, CLEAN+20!, CLEAN+21, CLEAN+22!, CLEAN+27, CLEAN+29, SET+4*, SET+5*, SET+6*

Label References

Name Line Occurrences
$$CHECK CLEAN+4
@( CHECK2+4
CHECK2 CLEAN+8
CLEAN ENQN+11
SENDMSG ENQN+10
SET ENQN+8

Naked Globals

Name Field # of Occurrence
^("I" CHECK+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ENQN+2, SENDMSG+1, SENDMSG+3, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+11, CLEAN+12, CLEAN+13, CLEAN+14
CLEAN+15, CLEAN+16, CLEAN+17, CLEAN+23, CHECK+1
CCNT CLEAN+1~*, CLEAN+5*, CLEAN+26
CHK CLEAN+1~, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+11, CLEAN+12, CLEAN+13, CLEAN+14, CLEAN+15, CLEAN+16
CLEAN+17, CLEAN+18, CHECK2+1*, CHECK2+2*, CHECK2+3*, A*, D*, DE*, DR*, E*
, H*, I*, N*, O*, P*, R*, RE*, U*
CHK3 CLEAN+1~
CREAT ENQN+1~, ENQN+2*, ENQN+9
>> DA CLEAN+7*
>> DA(1 CLEAN+7*
DAYS DONE+1!, SENDMSG+3*, SENDMSG+4
>> DIE CLEAN+7*
DR CLEAN+6!, CLEAN+8*, CLEAN+9*, CLEAN+10*, CLEAN+11*, CLEAN+12*, CLEAN+13*, CLEAN+14*, CLEAN+15*, CLEAN+16*
CLEAN+17*, CLEAN+18*, CLEAN+19
DRG CLEAN+1~, CLEAN+4*, CLEAN+5, CHECK+2~, CHECK+3*
DUZ ENNV+1, SENDMSG+1, CLEAN+23
EXPR ENQN+1~, ENQN+2*, ENQN+9
>> F SET+1*, SET+2
HOURS DONE+1!, SENDMSG+3*, SENDMSG+4
LFCNT CLEAN+1~*, CLEAN+21*, CLEAN+22
MINS DONE+1!, SENDMSG+3*, SENDMSG+4
>> MSGCNT CLEAN+27*, CLEAN+30*, CLEAN+31*, CLEAN+32*, CLEAN+33*, CLEAN+34*
>> ND SET+2*, SET+3, SET+5
>> ND2 SET+2*
OCNT ENQN+1~, ENQN+2*, ENQN+6*, SENDMSG+5
>> OERR SET+2*, SET+3, SET+4, SET+5, SET+6
>> ORND SET+3*
>> ORND3 SET+3*
ORSTART CLEAN+1~, CLEAN+7*, SET+3*, SET+6, CHECK2+2
ORSTATUS CLEAN+1~, CLEAN+7*, SET+3*, ADDEDREHI
NOPRRE
ORSTOP CLEAN+1~, CLEAN+7*, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+11, CLEAN+12, CLEAN+13, CLEAN+14, CLEAN+15
SET+3*, SET+6, CHECK2+3
PSG DONE+1!, SENDMSG+1!, CLEAN+23!
PSG( CLEAN+30*, CLEAN+31*, CLEAN+32*, CLEAN+33*, CLEAN+34*
PSG(1 SENDMSG+2*, CLEAN+24*
PSG(2 SENDMSG+2*, CLEAN+24*
PSG(3 SENDMSG+4*, CLEAN+25*
PSG(4 SENDMSG+4*, CLEAN+26*
PSG(5 SENDMSG+4*, CLEAN+27*
PSG(6 SENDMSG+5*, CLEAN+27*
PSG(7 CLEAN+28*
>> PSGDT CHECK+1*, CHECK+3
PSJBEG ENQN+1~, ENQN+4*, ENQN+5
PSJDRG ENQN+6*, ENQN+7, CLEAN+1~, CLEAN+2*, CLEAN+4
>> PSJHLMTN CLEAN+20*
PSJLORD ENQN+1~, ENQN+2*, ENQN+6, ENQN+7*
PSJOI CLEAN+1~, CLEAN+4*, CHECK+3
PSJORD ENQN+1~, ENQN+5*, ENQN+6, ENQN+7, CLEAN+1~, CLEAN+2*, CLEAN+3, CLEAN+4, CLEAN+5, CLEAN+6
CLEAN+7, CLEAN+16, CLEAN+17, CLEAN+20, CLEAN+29*, CLEAN+30, SET+1, SET+4, SET+5, SET+6
PSJPDFN ENQN+1~, ENQN+4*, ENQN+5, ENQN+6, ENQN+7, CLEAN+1~, CLEAN+2*, CLEAN+3, CLEAN+4, CLEAN+5
CLEAN+6, CLEAN+7, CLEAN+16, CLEAN+17, CLEAN+20, CLEAN+21*, CLEAN+29*, CLEAN+30, SET+1, SET+4
SET+5, SET+6
PSJSTART ENQN+2*, DONE+1!, SENDMSG+3
>> PSPTR SET+3*, SET+4, SET+5
PSSTART CLEAN+1~, CLEAN+6*, SET+2*, SET+6, CHECK2+2
PSSTATUS CLEAN+1~, CLEAN+6*, CLEAN+16, CLEAN+17, CLEAN+18, SET+2*, SET+6, CHECK2+4
PSSTOP CLEAN+1~, CLEAN+6*, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+11, CLEAN+12, CLEAN+13, CLEAN+14, CLEAN+15
CLEAN+16, CLEAN+17, SET+2*, SET+6, CHECK2+3
Q CHECK+2~*, CHECK+3*, CHECK+4
QPT CHECK+2~*, CHECK+3*, CHECK+4
>> STPDT CLEAN+8*, CLEAN+9*
U CLEAN+4, CLEAN+5, CHECK+3, SET+4, SET+5, SET+6
X DONE+1!, SENDMSG+3*, CHECK+2~*, CHECK+3*
XMDUZ DONE+1!, SENDMSG+1*, CLEAN+23*
XMSUB DONE+1!, SENDMSG+1*, CLEAN+23*
XMTEXT DONE+1!, SENDMSG+1*, CLEAN+23*
XMY DONE+1!, SENDMSG+1!, CLEAN+23!
XMY( SENDMSG+1*, CLEAN+23*
Y DONE+1!, SENDMSG+1*, SENDMSG+2, CLEAN+23*, CLEAN+24
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 |  Naked Globals |  Local Variables  | All