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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSBMD

Package: Barcode Medication Administration

Routine: PSBMD


Information

PSBMD ;BIRMINGHAM/EFC - BCMA MISSING DOSE FUNCTIONS ;6/28/10 1:37pm

Source Information

Source file <PSBMD.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
VA Fileman 10 NOW^%DTC  ^DDS  (MSG,REFRESH)^DDSUTL  ($$GET,PUT)^DDSVAL  FILE^DICN  FIELD^DID  FILE^DIE  ^DIK  
($$GET1,D)^DIQ  ^DIR  
Barcode Medication Administration 2 (HFSCLOSE,HFSOPEN)^PSBUTL  (CLEAN,PSJ1)^PSBVT  
Kernel 1 ^%ZTLOAD  
MailMan 1 ^XMD  
Registration 1 (DEM,IN5)^VADPT  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Barcode Medication Administration 2 PSB MISSING DOSE FOLLOWUP  PSB MISSING DOSE REQUEST  

Entry Points

Name Comments DBIA/ICR reference
FLWUP ; Follow-Up on missing dose
NEW(RESULTS) ; Create a new missing dose request
; Called interactively and via RPCBroker
DQ(PSBMD,PSBMM) ; Dequeue report from Taskman
RPC(RESULTS,PSBDFN,PSBDRUG,PSBDOSE,PSBRSN,PSBADMIN,PSBNEED,PSBUID,PSBON,PSBSCHD) ;
SUBMIT(DA) ; Submit Request to Pharmacy
PAGE(PSBIX) ;
VAL(PSBFLDS) ; Validate that fields in PSBFLDS are filled in
POST ;call from 'Patient' field of screenman form PSB MISSING DOSE REQUEST
;
XQ ; Called via Kernel Menus
OUT ;

External References

Name Field # of Occurrence
NOW^%DTC RPC+11, SUBMIT+21, DQ+9, NEW+10
^%ZTLOAD SUBMIT+26
^DDS XQ+4, PAGE+13
MSG^DDSUTL VAL+9
REFRESH^DDSUTL POST+6
$$GET^DDSVAL VAL+2
PUT^DDSVAL POST+4, POST+5
FILE^DICN NEW+14
FIELD^DID OUT+1, VAL+6
FILE^DIE RPC+25, RPC+38
^DIK XQ+6
$$GET1^DIQ DQ+13, DQ+14, OUT+3, OUT+5, FLWUP+9, FLWUP+10, FLWUP+11, FLWUP+12, FLWUP+15, FLWUP+16
, FLWUP+17
D^DIQ DQ+9
^DIR XQ+3, PAGE+6
HFSCLOSE^PSBUTL SUBMIT+35
HFSOPEN^PSBUTL SUBMIT+33
CLEAN^PSBVT RPC+42
PSJ1^PSBVT RPC+28, RPC+29, RPC+35
DEM^VADPT OUT+5
IN5^VADPT RPC+24, POST+3
^XMD SUBMIT+38
$$GET^XPAR SUBMIT+7, SUBMIT+8, SUBMIT+13, SUBMIT+14, OUT+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Error: ",$P(PSBMD(0),U,2)
  • Line Location: XQ+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: XQ+5
Function Call: WRITE
  • Prompt: !,"Cancelling Request..."
  • Line Location: XQ+6
Function Call: WRITE
  • Prompt: "Cancelled!"
  • Line Location: XQ+6
Function Call: WRITE
  • Prompt: Y
  • Line Location: DQ+9
Function Call: WRITE
  • Prompt: !?3,"ADDITIVE: ",$$GET1^DIQ(52.6,+^PSB(53.68,PSBMD,.6,X,0),.01)
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: !?3,"SOLUTION: ",$$GET1^DIQ(52.7,+^PSB(53.68,PSBMD,.7,X,0),.01)
  • Line Location: DQ+14
Function Call: WRITE
  • Prompt: !?3,PSBRET("LABEL"),":"
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: $$GET1^DIQ(53.68,PSBMD_",",PSBFLD)
  • Line Location: OUT+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: OUT+8
Function Call: WRITE
  • Prompt: "."
  • Line Location: OUT+10
Function Call: WRITE
  • Prompt: !!,"No Unresolved Missing Dose Requests Found."
  • Line Location: FLWUP+5
Function Call: WRITE
  • Prompt: !?5,PSBDRUG
  • Line Location: FLWUP+13
Function Call: WRITE
  • Prompt: !?10,"ADDITIVES: ",$$GET1^DIQ(52.6,+^PSB(53.68,+PSBIEN,.6,X,0),.01)
  • Line Location: FLWUP+16
Function Call: WRITE
  • Prompt: !?10,"SOLUTIONS: ",$$GET1^DIQ(52.7,+^PSB(53.68,+PSBIEN,.7,X,0),.01)
  • Line Location: FLWUP+17
Function Call: WRITE
  • Prompt: @IOF,PSBHDR,!,$TR($J("",IOM)," ","-")
  • Line Location: PAGE+10
Function Call: WRITE
  • Prompt: @IOF,PSBHDR,!,$TR($J("",IOM)," ","-")
  • Line Location: PAGE+15
Routine Call
  • DDS
  • Line Location:
    • XQ+4
    • PAGE+13
Routine Call
  • DIE
  • Line Location:
    • RPC+25
    • RPC+38
Routine Call
  • DIR
  • Line Location:
    • XQ+3
    • PAGE+6

Used in RPC

RPC Name Call Tags
PSB SUBMIT MISSING DOSE RPC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.6 - [#52.6] GET1^DIQ
^PS(52.7 - [#52.7] GET1^DIQ
^PSB(53.68 - [#53.68] Classic Fileman Calls,  FIELD^DID,  GET1^DIQ,  GET^DDSVAL

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] RPC+16, SUBMIT+3
^DPT - [#2] RPC+16
^PSB(53.68 - [#53.68] RPC+26, RPC+31*, RPC+33*, RPC+36*, RPC+37*, RPC+39, SUBMIT+2, SUBMIT+9*, SUBMIT+15*, DQ+2
, DQ+3, DQ+4, DQ+5, DQ+13, DQ+14, OUT+12, NEW+7, NEW+10, NEW+15, FLWUP+4
, FLWUP+16, FLWUP+17, PAGE+14
^TMP("PSB" FLWUP+3!, FLWUP+4*, FLWUP+5, FLWUP+8, PAGE+5, PAGE+11, PAGE+14!*

Label References

Name Line Occurrences
$$PAGE FLWUP+18, FLWUP+19
DQ SUBMIT+34
NEW RPC+8, XQ+2
OUT DQ+11, DQ+12
SUBMIT RPC+40, XQ+7

Naked Globals

Name Field # of Occurrence
^( FLWUP+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % RPC+11, SUBMIT+23, DQ+9, NEW+10
D0 NEW+13!
DA XQ+1~, XQ+4*, XQ+7, SUBMIT~, SUBMIT+2, SUBMIT+9, SUBMIT+15, SUBMIT+25, SUBMIT+34, VAL+2
, FLWUP+1~, PAGE+11*, POST+4, POST+5
>> DDSERROR VAL+10*
DDSFILE XQ+1~, XQ+4*, FLWUP+1~, PAGE+11*
DFN RPC+7~, RPC+24*, OUT+5~*, POST+2~, POST+3*
DIC NEW+2~, NEW+11*
DIC("DR" NEW+12*
DIC(0 NEW+11*
>> DIE POST+4, POST+5
DIK XQ+1~, XQ+6*
>> DILOCKTM RPC+26, DQ+3, NEW+7
DIR FLWUP+1~
DIR("A" PAGE+3*, PAGE+4*
DIR(0 XQ+3*, PAGE+5*
DR XQ+1~, XQ+4*, FLWUP+1~, PAGE+11*
>> DTOUT PAGE+8
DUZ RPC+13, NEW+4
DUZ("AG" OUT+7
DUZ(2 RPC+14, NEW+5
>> I RPC+30*, RPC+31*, RPC+32*, RPC+33*, RPC+36*, RPC+37*
IO SUBMIT+34
IOF XQ+5, FLWUP+7, PAGE+10, PAGE+15
IOM FLWUP+7, PAGE+10, PAGE+15
IOSL FLWUP+18
PSB VAL+1~, VAL+2*, VAL+4*, VAL+6
PSB("LABEL" VAL+7
PSB("TITLE" VAL+7
>> PSBAD RPC+30*
PSBADA RPC+28!, RPC+29!, RPC+31, RPC+36
PSBADA( RPC+30*, RPC+31, RPC+36
PSBADMIN RPC~, RPC+20
>> PSBCFLD DQ+4*, DQ+11, DQ+12
PSBCX PAGE+2~, PAGE+11*, PAGE+14
PSBDFN RPC~, RPC+15, RPC+16, RPC+24, RPC+28, RPC+29, RPC+35
PSBDOSE RPC~, RPC+18
PSBDRUG RPC~, RPC+17, RPC+34, FLWUP+1~, FLWUP+12*, FLWUP+13, FLWUP+14
PSBDX PAGE+2~, PAGE+6*
PSBFDA RPC+7~
PSBFDA( RPC+12*, RPC+13*, RPC+14*, RPC+15*, RPC+16*, RPC+17*, RPC+18*, RPC+19*, RPC+20*, RPC+21*
, RPC+22*, RPC+23*, RPC+24*, RPC+31*, RPC+33*, RPC+36*, RPC+37*
PSBFLD DQ+1~, DQ+11*, DQ+12*, OUT+1, OUT+3, OUT+4, OUT+12, VAL+1~, VAL+2*
PSBFLD( VAL+2*, VAL+3!, VAL+4
PSBFLDS VAL~, VAL+2
PSBHDR FLWUP+1~, FLWUP+6*, FLWUP+7, PAGE+10, PAGE+15
PSBIEN FLWUP+1~, FLWUP+8*, FLWUP+9, FLWUP+10, FLWUP+11, FLWUP+12, FLWUP+15, FLWUP+16, FLWUP+17
PSBIENS RPC+7~, RPC+10*, RPC+12, RPC+13, RPC+14, RPC+15, RPC+16, RPC+17, RPC+18, RPC+19
, RPC+20, RPC+21, RPC+22, RPC+23, RPC+24, RPC+26, RPC+31, RPC+33, RPC+36, RPC+37
, RPC+39, RPC+40, RPC+41
PSBIX PAGE~, PAGE+4, PAGE+5, PAGE+7
PSBMD RPC+7~, RPC+8, XQ+1~, XQ+2, DQ~, DQ+2, DQ+3, DQ+4, DQ+5, DQ+13
, DQ+14, OUT+3, OUT+5, OUT+12
PSBMD(0 RPC+9, RPC+10, XQ+3, XQ+4
PSBMG SUBMIT+1~, SUBMIT+7*, SUBMIT+8*, SUBMIT+9, SUBMIT+31, SUBMIT+32, SUBMIT+36
PSBMM DQ~, DQ+6
PSBMSG RPC+7~, VAL+1~, VAL+5, VAL+8, VAL+9
PSBMSG( VAL+7*
PSBMSG("" VAL+7
PSBMSG(0 VAL+5*
PSBMSG(1 VAL+5*
PSBMSG(2 VAL+5*
PSBNEED RPC~, RPC+21
PSBNOW RPC+7~, RPC+11*, RPC+12
PSBON RPC~, RPC+28, RPC+35
>> PSBPONX RPC+29
PSBPRT SUBMIT+1~, SUBMIT+13*, SUBMIT+14*, SUBMIT+15, SUBMIT+19, SUBMIT+20, SUBMIT+22
PSBRET DQ+1~
PSBRET("LABEL" OUT+2
PSBRSN RPC~, RPC+19
PSBSAVE XQ+1~, XQ+6, XQ+7
PSBSCHD RPC~, RPC+22
>> PSBSOL RPC+32*
PSBSOLA RPC+28!, RPC+29!, RPC+33, RPC+37
PSBSOLA( RPC+32*, RPC+33, RPC+37
PSBUID RPC~, RPC+23, RPC+27, RPC+29, RPC+30, RPC+32, RPC+34
>> PSBUIDA( RPC+29, RPC+30, RPC+32
PSBWRD SUBMIT+1~, SUBMIT+2*, SUBMIT+3*, SUBMIT+7, SUBMIT+13
PSBX FLWUP+1~, FLWUP+8*, FLWUP+9, FLWUP+18, FLWUP+19, PAGE+5, PAGE+15*
RESULTS RPC~, NEW~, NEW+3!
RESULTS(0 RPC+9*, RPC+41*, NEW+4*, NEW+5*, NEW+8*, NEW+17*, NEW+18*
U RPC+24, RPC+30, RPC+32, RPC+36, RPC+37, XQ+3, SUBMIT+2, SUBMIT+9, SUBMIT+15, DQ+4
, OUT+12, POST+4, POST+5
VA OUT+5~
VA("BID" OUT+11
VADM OUT+5~
>> VAIP(5 POST+4
>> VAIP(6 RPC+24, POST+5
X RPC+16*, RPC+31*, RPC+33*, RPC+36*, RPC+37*, DQ+13*, DQ+14*, NEW+10*, VAL+7*, FLWUP+3*
, FLWUP+4*, FLWUP+16*, FLWUP+17*, PAGE+2~, PAGE+14*, POST+3
X1 PAGE+2~, PAGE+14*
XMSUB XQ+1~, SUBMIT+37*
XMTEXT XQ+1~, SUBMIT+36*
XMY XQ+1~
XMY("G." SUBMIT+36*
>> Y DQ+9*, NEW+17, NEW+18, FLWUP+2*, FLWUP+4*, FLWUP+5*, FLWUP+8, FLWUP+18*, FLWUP+19*, PAGE+6
, PAGE+7*, PAGE+8*, PAGE+9, PAGE+10, PAGE+11, PAGE+12
>> ZTDESC SUBMIT+24*
>> ZTDTH SUBMIT+23*
>> ZTIO SUBMIT+22*
>> ZTREQ OUT+13*
>> ZTRTN SUBMIT+25*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All