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

Package: Barcode Medication Administration

Routine: PSBO1


Information

PSBO1 ;BIRMINGHAM/EFC-BCMA OUTPUTS ;2/26/21 12:27

Source Information

Source file <PSBO1.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 6 NOW^%DTC  FILE^DICN  (UPDATE,VAL)^DIE  CLEAN^DILF  $$GET1^DIQ  ^DIR  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Inpatient Medications 2 EN^PSJBCMA  EN^PSJBCMA1  
Barcode Medication Administration 1 DQ^PSBO  

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

Package Total Caller Graph
Barcode Medication Administration 6 PSBMMRB  PSBO  PSBOCE  PSBOCM  PSBODL  PSBOWA  

Entry Points

Name Comments DBIA/ICR reference
NEW(RESULTS,PSBRTYP) ; Create a new report request
; Called interactively and via RPCBroker
PRINT ;
LIST(XLIST) ; Place List Criteria into subfile #53.692 (multiple)
CHECK ;Beginning of PSB*1*10
GETREMOV(DFN) ;Process removal type XREFS and return any RM's found with key info
SETTMP(IEN) ;get and set MRR info for printing

External References

Name Field # of Occurrence
NOW^%DTC NEW+12
^%ZIS PRINT+5, PRINT+8
HOME^%ZIS PRINT+7
^%ZISC PRINT+8
^%ZTLOAD PRINT+16
FILE^DICN NEW+15
UPDATE^DIE LIST+10
VAL^DIE LIST+9
CLEAN^DILF LIST+7
$$GET1^DIQ PRINT+3, PRINT+8, PRINT+10, PRINT+11, PRINT+12, CHECK+4, CHECK+5, CHECK+19, CHECK+23, CHECK+27
, SETTMP+2, SETTMP+3
^DIR CHECK+33
DQ^PSBO PRINT+8
EN^PSJBCMA CHECK+6
EN^PSJBCMA1 SETTMP+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Submitting Your Report Request to TaskMan..."
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+34
Routine Call
  • DIE
  • Line Location:
    • LIST+10
Routine Call
  • DIE
  • Line Location:
    • LIST+9
Routine Call
  • DIR
  • Line Location:
    • CHECK+33
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+5
    • PRINT+8
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PSB(53.69 - [#53.69] Classic Fileman Calls,  GET1^DIQ
53.692 VAL^DIE
^PSB(53.79 - [#53.79] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSB(53.69 - [#53.69] NEW+9, NEW+12, NEW+16, CHECK+3
^PSB(53.79 - [#53.79] GETREMOV+7, GETREMOV+8, GETREMOV+9, GETREMOV+10, GETREMOV+17, GETREMOV+18, GETREMOV+19
^PSDRUG("A526" CHECK+20
^PSDRUG("A527" CHECK+24
^TMP("PSB" GETREMOV+2!, SETTMP+6*, SETTMP+7*, SETTMP+8*, SETTMP+9*, SETTMP+10*, SETTMP+11*, SETTMP+12*, SETTMP+13*, SETTMP+14*
, SETTMP+16*, SETTMP+17*, SETTMP+18*
^TMP("PSBO" PRINT+17*, PRINT+18*
^TMP("PSJ" CHECK+1!, CHECK+8, CHECK+10, CHECK+11
^TMP("PSJ1" SETTMP+4!, SETTMP+5, SETTMP+8, SETTMP+9, SETTMP+10, SETTMP+11, SETTMP+12, SETTMP+13, SETTMP+14, SETTMP+16
, SETTMP+17

Label References

Name Line Occurrences
SETTMP GETREMOV+11, GETREMOV+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % NEW+12
>> %ZIS PRINT+4*
>> CLN LIST+5*
DA PRINT+1~, PRINT+2*, PRINT+3, PRINT+8, PRINT+10, PRINT+11, PRINT+12, PRINT+13, CHECK+3, CHECK+4
, CHECK+5
DD NEW+15!
DFN GETREMOV~, GETREMOV+5, GETREMOV+6, GETREMOV+14, GETREMOV+15, SETTMP+4
>> DIC NEW+13*
>> DIC("DR" NEW+14*
>> DIC(0 NEW+13*
>> DILOCKTM NEW+9
DIR CHECK+30!
DIR("A" CHECK+31*
DIR(0 CHECK+32*
DIRUT CHECK+30!
DO NEW+15!, NEW+20!
DSPDRG GETREMOV+1~, GETREMOV+7*, GETREMOV+8, GETREMOV+9
DUZ NEW+6
DUZ(2 NEW+7
>> I PRINT+14*
IEN SETTMP~
IO PRINT+6, PRINT+8
IO(0 PRINT+6
IOF PRINT+9
IOP PRINT+3*, PRINT+4*, PRINT+7!, PRINT+8*!
ONX SETTMP+1~, SETTMP+3*, SETTMP+4, SETTMP+7, SETTMP+18
>> PSBANS CHECK+34*
PSBBAR CHECK+2~, CHECK+3*, CHECK+16, CHECK+20, CHECK+24
PSBCL CHECK+1!, CHECK+10*, CHECK+18, CHECK+22, CHECK+26
PSBCL( CHECK+18*, CHECK+19*, CHECK+22*, CHECK+23*, CHECK+26*, CHECK+27*
PSBCLN LIST+4~
PSBCLN( LIST+5*, LIST+6
PSBDFN CHECK+2~, CHECK+5*, CHECK+6
PSBDRUG CHECK+2~, CHECK+4*, CHECK+29
PSBFDA LIST+7!
PSBFLAG CHECK+2~, CHECK+3*, CHECK+5*, CHECK+17*, CHECK+21*, CHECK+25*, CHECK+28
PSBGNODE GETREMOV+1~, GETREMOV+5*, GETREMOV+6*, GETREMOV+7, GETREMOV+14*, GETREMOV+15*, GETREMOV+16
PSBIEN GETREMOV+1~, GETREMOV+7*, GETREMOV+8, GETREMOV+9, GETREMOV+10, GETREMOV+16*, GETREMOV+17, GETREMOV+18, GETREMOV+19, SETTMP+2
, SETTMP+3, SETTMP+6, SETTMP+7, SETTMP+8, SETTMP+9, SETTMP+10, SETTMP+11, SETTMP+12, SETTMP+13, SETTMP+14
, SETTMP+16, SETTMP+17, SETTMP+18
>> PSBIENS LIST+8, LIST+9
PSBIENX LIST+7!, LIST+8*
PSBNDX CHECK+2~, CHECK+9!, CHECK+12*, CHECK+13, CHECK+15, CHECK+16, CHECK+20, CHECK+24
PSBORD CHECK+9!, CHECK+11*
PSBORD( CHECK+13, CHECK+15
PSBORD(0 CHECK+19, CHECK+23, CHECK+27
PSBORD(1 CHECK+14
>> PSBORDNM PRINT+15
PSBPNM CHECK+2~, CHECK+9!, CHECK+15*, CHECK+16, CHECK+20, CHECK+24
PSBRET LIST+7!
>> PSBRPT(0 PRINT+2
PSBRTYP NEW~, NEW+5, NEW+12
>> PSBSIO PRINT+3*, PRINT+6*, PRINT+8
>> PSBTYPE LIST+6
PSBX CHECK+2~, CHECK+8*, CHECK+10, CHECK+11
RESULTS NEW~, NEW+2!
RESULTS(0 NEW+5*, NEW+6*, NEW+7*, NEW+10*, NEW+18*, NEW+19*
RMDT SETTMP+1~, SETTMP+2*, SETTMP+6
U LIST+6, CHECK+3, CHECK+10, CHECK+14, CHECK+15, CHECK+19, CHECK+23, CHECK+27, GETREMOV+9, GETREMOV+10
, GETREMOV+18, GETREMOV+19, SETTMP+6, SETTMP+7, SETTMP+8, SETTMP+9, SETTMP+10, SETTMP+11, SETTMP+12, SETTMP+13
, SETTMP+14, SETTMP+16, SETTMP+17
>> X NEW+12*
>> XL1 LIST+1*, LIST+6, LIST+8, LIST+9
XLIST LIST~
XLIST( LIST+6, LIST+9
XLIST("" LIST+1
XLIST("B" LIST+1
Y NEW+18, NEW+19, CHECK+9!, CHECK+13*, CHECK+15, CHECK+34
ZTDESC PRINT+1~, PRINT+12*
ZTDTH PRINT+1~, PRINT+11*
>> ZTIO PRINT+10*
ZTRTN PRINT+1~, PRINT+13*
ZTSAVE PRINT+1~
ZTSAVE( PRINT+14*
ZTSAVE("PSBORDNM" PRINT+15*
ZTSK PRINT+1~, PRINT+17
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