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

Package: Barcode Medication Administration

Routine: PSBMLLKU


Information

PSBMLLKU ;BIRMINGHAM/TEJ - BCMA RPC LOOKUP UTLILITIES ;03/06/16 3:06pm

Source Information

Source file <PSBMLLKU.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 4 DD^%DT  NOW^%DTC  FIND^DIC  $$GET1^DIQ  
Barcode Medication Administration 3 $$GETINIT^PSBCSUTX  CLIN^PSBO  $$IVPTAB^PSBVDLU3  
Inpatient Medications 1 EN^PSJBCMA1  
Kernel 1 $$UP^XLFSTR  
Outpatient Pharmacy 1 $$HRCNF^APSPFUNC  
PCE Patient Care Encounter 1 $$HRN^AUPNPAT  
Registration 1 ($$DOB,$$SSN)^DPTLK1  
Uncategorized 1 $$HRCNF^BDGF2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSB MED LOG LOOKUP  

Entry Points

Name Comments DBIA/ICR reference
SELECTAD(RESULTS,PSBREC) ; Select Administration
SELSTTUS(RESULTS) ;
; Provide the SELectable STaTUS
PTLKUP(RESULTS,PSBREC) ; Patient lookup handled separately for security
; input - PSBREC (array) User entered patient lookup data
KILLAADT ;
; Here because there is an errant index entry via version 1.0/2.0
; Cleansing!
PAD(VAL) ; Return VAL with leading zeroes padded to 6 characters
CHKKEY(PSBIENX) ;
ADMLKUP(RESULTS,PSBREC) ;
; Lookup ADMinistrations per DFN and search DATE
; input - PSBREC(1) DFN
; PSBREC(2) Search DATE
PTREC(DFN) ;
; Extrinsic to return a Pt Rec in standard list format
RPC(RESULTS,PSBREC) ; Remote Procedure Call Entry Point.

External References

Name Field # of Occurrence
DD^%DT SELECTAD+27
NOW^%DTC ADMLKUP+10
$$HRCNF^APSPFUNC PTLKUP+15
$$HRN^AUPNPAT PTREC+8
$$HRCNF^BDGF2 PTREC+4
FIND^DIC PTLKUP+49, PTLKUP+52
$$GET1^DIQ ADMLKUP+19, ADMLKUP+20, ADMLKUP+21, ADMLKUP+24, ADMLKUP+25, ADMLKUP+26, ADMLKUP+32, CHKKEY+1, PTLKUP+15, PTLKUP+24
, PTLKUP+26, PTREC+5, PTREC+6, SELECTAD+19, SELECTAD+20, SELECTAD+21, SELECTAD+22, SELECTAD+23, SELECTAD+24, SELECTAD+27
, SELECTAD+29, SELECTAD+31, SELECTAD+32, SELECTAD+36, SELECTAD+63, SELECTAD+74, SELECTAD+79, SELSTTUS+5
$$DOB^DPTLK1 PTREC+7
$$SSN^DPTLK1 PTREC+8
$$GETINIT^PSBCSUTX ADMLKUP+33
CLIN^PSBO PTLKUP+34
$$IVPTAB^PSBVDLU3 SELSTTUS+9
EN^PSJBCMA1 ADMLKUP+28, SELSTTUS+5
$$UP^XLFSTR PTLKUP+24

Used in RPC

RPC Name Call Tags
PSB MED LOG LOOKUP RPC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] FIND^DIC,  GET1^DIQ
^NURSF(211.4 - [#211.4] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ
^PSDRUG - [#50] GET1^DIQ
^PS(52.6 - [#52.6] GET1^DIQ
^PS(52.7 - [#52.7] GET1^DIQ
^PSB(53.79 - [#53.79] GET1^DIQ
^AUTTLOC - [#9999999.06] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PTREC+3
^NURSF(211.4 - [#211.4] PTLKUP+24, PTLKUP+26
^PSB(53.79 - [#53.79] ADMLKUP+13, ADMLKUP+15, ADMLKUP+16, ADMLKUP+17, ADMLKUP+19, ADMLKUP+34, SELECTAD+16, SELECTAD+17, SELECTAD+43, SELECTAD+44
, SELECTAD+50, SELECTAD+51, SELECTAD+58, SELECTAD+61, SELECTAD+63, SELECTAD+64, SELECTAD+69, SELECTAD+70, SELECTAD+72, SELECTAD+74
, SELECTAD+75, SELECTAD+77, SELECTAD+79, SELECTAD+80, SELECTAD+81, KILLAADT+4!
^TMP("DILIST" PTLKUP+10!, PTLKUP+51!, PTLKUP+53, PTLKUP+55*, PTLKUP+56, PTLKUP+58, PTLKUP+59, PTLKUP+60
^TMP("PSJ1" ADMLKUP+28!, ADMLKUP+29, ADMLKUP+30, ADMLKUP+31!, SELSTTUS+5!, SELSTTUS+6, SELSTTUS+7, SELSTTUS+8, SELSTTUS+14, SELSTTUS+15
, SELSTTUS+16, SELSTTUS+17, SELSTTUS+18, SELSTTUS+19, SELSTTUS+20, SELSTTUS+23!
^XUSEC("PSB MANAGER" CHKKEY+1

Label References

Name Line Occurrences
$$CHKKEY ADMLKUP+15, SELECTAD+15
$$PAD PTLKUP+15
$$PTREC PTLKUP+19, PTLKUP+38, PTLKUP+60
@( RPC+6
KILLAADT ADMLKUP+15
SELSTTUS SELECTAD+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ADMLKUP+10
CNT SELSTTUS+4~, SELSTTUS+19*, SELSTTUS+20
DFN ADMLKUP+10*, ADMLKUP+13, ADMLKUP+15, ADMLKUP+19, ADMLKUP+28, PTREC~, PTREC+3, PTREC+4, PTREC+5, PTREC+6
, PTREC+7, PTREC+8, KILLAADT+4
DFNXX PTLKUP+36~, PTLKUP+37*, PTLKUP+38
DSIT SELECTAD+11~, SELECTAD+32*, SELECTAD+33
DUZ CHKKEY+1
DUZ("AG" PTLKUP+13, PTREC+4, PTREC+8
DUZ(2 PTLKUP+15, PTREC+4, PTREC+8
ISIT SELECTAD+11~, SELECTAD+31*, SELECTAD+33
PSBCHMTY SELSTTUS+4~, SELSTTUS+8*, SELSTTUS+9
PSBCLINORD RPC+3~, RPC+4*, PTLKUP+11, PTLKUP+28, PTLKUP+46
PSBCNT ADMLKUP+11*, ADMLKUP+22*, ADMLKUP+23, ADMLKUP+24, ADMLKUP+25, ADMLKUP+26, ADMLKUP+29, ADMLKUP+30, ADMLKUP+32, ADMLKUP+33
, ADMLKUP+34, ADMLKUP+35, PTLKUP+36*, PTLKUP+38*, SELECTAD+12~*, SELECTAD+17*, SELECTAD+62*, SELECTAD+63, SELECTAD+64, SELECTAD+65
, SELECTAD+66, SELECTAD+69, SELECTAD+70, SELECTAD+73*, SELECTAD+74, SELECTAD+75, SELECTAD+78*, SELECTAD+79, SELECTAD+80, SELECTAD+82
PSBDATA PTLKUP+8!, PTLKUP+12*, PTLKUP+13, PTLKUP+15, PTLKUP+17, PTLKUP+20, PTLKUP+21*, PTLKUP+22*, PTLKUP+24, PTLKUP+25!*
, PTLKUP+34*, PTLKUP+35, PTLKUP+48, PTLKUP+49
PSBDATA( PTLKUP+26*, PTLKUP+37, PTLKUP+51, PTLKUP+52
PSBDATA("" PTLKUP+49, PTLKUP+50
>> PSBDATA1 PTLKUP+20*, PTLKUP+57, PTLKUP+61
>> PSBDT ADMLKUP+11*, ADMLKUP+13
PSBIEN ADMLKUP+14*, ADMLKUP+15*, ADMLKUP+16, ADMLKUP+17, ADMLKUP+19, ADMLKUP+20, ADMLKUP+21, ADMLKUP+22, ADMLKUP+24, ADMLKUP+25
, ADMLKUP+26, ADMLKUP+32, ADMLKUP+33, ADMLKUP+34, SELECTAD+12~*, SELECTAD+15, SELECTAD+16, SELECTAD+17, SELECTAD+18, SELECTAD+19
, SELECTAD+20, SELECTAD+22, SELECTAD+23, SELECTAD+24, SELECTAD+27, SELECTAD+29, SELECTAD+31, SELECTAD+32, SELECTAD+36, SELECTAD+43
, SELECTAD+50, SELECTAD+58, SELECTAD+61, SELECTAD+63, SELECTAD+64, SELECTAD+69, SELECTAD+70, SELECTAD+72, SELECTAD+74, SELECTAD+75
, SELECTAD+77, SELECTAD+79, SELECTAD+80, SELECTAD+81, SELSTTUS+5, KILLAADT+4
PSBIENX CHKKEY~, CHKKEY+1
PSBINDX PTLKUP+7~, PTLKUP+10*, PTLKUP+21*, PTLKUP+22*, PTLKUP+45*, PTLKUP+48*, PTLKUP+49, PTLKUP+52
PSBINTSY SELSTTUS+4~, SELSTTUS+8*, SELSTTUS+9
PSBIVPSH SELSTTUS+4~, SELSTTUS+8*, SELSTTUS+9
PSBIVTYP SELSTTUS+4~, SELSTTUS+7*, SELSTTUS+9
PSBMRRX SELECTAD+11~, SELECTAD+40, SELSTTUS+20*
PSBNRSWD PTLKUP+7~, PTLKUP+24*
PSBORTYP SELSTTUS+4~, SELSTTUS+7*, SELSTTUS+9, SELSTTUS+11, SELSTTUS+12
PSBPT PTLKUP+9!, PTLKUP+23!, PTLKUP+54!, PTLKUP+55
PSBPT( PTLKUP+53*
PSBPT(0 PTLKUP+9*, PTLKUP+23*, PTLKUP+51, PTLKUP+53*, PTLKUP+54
PSBPTCHX SELECTAD+10!, SELECTAD+47, SELSTTUS+18*
PSBREC RPC~, ADMLKUP~, PTLKUP~, SELECTAD~
PSBREC( PTLKUP+31, PTLKUP+32, PTLKUP+33
PSBREC(0 RPC+4*, RPC+6
PSBREC(1 ADMLKUP+10, PTLKUP+12, SELECTAD+12
PSBREC(2 ADMLKUP+10
PSBRPT PTLKUP+7~, PTLKUP+34
PSBRPT(2 PTLKUP+32*, PTLKUP+33*
>> PSBSRCH ADMLKUP+10*, ADMLKUP+11*, ADMLKUP+13*, ADMLKUP+15, ADMLKUP+19, ADMLKUP+20, ADMLKUP+23, KILLAADT+4
PSBX PTLKUP+26*, PTLKUP+51*, PTLKUP+52, SELECTAD+12~, SELECTAD+41*, SELECTAD+42*, SELECTAD+43, SELECTAD+48*, SELECTAD+49*, SELECTAD+50
, SELECTAD+55*, SELECTAD+56*, SELECTAD+57, SELECTAD+58, SELECTAD+61*, SELECTAD+63, SELECTAD+64, SELECTAD+69, SELECTAD+70, SELECTAD+72*
, SELECTAD+74, SELECTAD+75, SELECTAD+77*, SELECTAD+79, SELECTAD+80
PSBXIV SELECTAD+10!, SELECTAD+54, SELSTTUS+21*
>> PSBXORDN ADMLKUP+19*, ADMLKUP+28
PSBXTAB SELSTTUS+4~, SELSTTUS+9*, SELSTTUS+10, SELSTTUS+11*, SELSTTUS+12*, SELSTTUS+18, SELSTTUS+21, SELSTTUS+22
PSBXX PTLKUP+59*, PTLKUP+60, PTREC+2~, PTREC+3*, PTREC+4*, PTREC+5*, PTREC+6*, PTREC+7*, PTREC+8*, PTREC+9
, SELECTAD+43*, SELECTAD+44, SELECTAD+50*, SELECTAD+51, SELECTAD+58*
>> PSBXXX SELECTAD+43*, SELECTAD+44, SELECTAD+50*, SELECTAD+51
>> PSBY PTLKUP+24*, PTLKUP+26, PTLKUP+51*, PTLKUP+53*
>> PSBZ PTLKUP+24*, PTLKUP+53*
>> QQ PTLKUP+31*, PTLKUP+32, PTLKUP+33
RESULTS RPC~, RPC+6*, ADMLKUP~, ADMLKUP+9!, PTLKUP~, PTLKUP+8!, PTLKUP+40, PTLKUP+61, SELECTAD~, SELECTAD+10!
, SELECTAD+26, SELSTTUS~
RESULTS( ADMLKUP+22*, ADMLKUP+23*, ADMLKUP+24*, ADMLKUP+25*, ADMLKUP+26*, ADMLKUP+29*, ADMLKUP+30*, ADMLKUP+32*, ADMLKUP+33*, ADMLKUP+34*
, PTLKUP+38*, PTLKUP+60*, SELECTAD+63*, SELECTAD+64*, SELECTAD+65*, SELECTAD+66*, SELECTAD+69*, SELECTAD+70*, SELECTAD+74*, SELECTAD+75*
, SELECTAD+79*, SELECTAD+80*
RESULTS("" PTLKUP+44, PTLKUP+62
RESULTS(0 ADMLKUP+12*, ADMLKUP+35*, PTLKUP+17*, PTLKUP+18*, PTLKUP+41*, PTLKUP+44*, PTLKUP+57*, PTLKUP+61*, PTLKUP+62*, SELECTAD+14*
, SELECTAD+82*
RESULTS(1 ADMLKUP+12*, ADMLKUP+35, PTLKUP+17*, PTLKUP+19*, PTLKUP+42*, PTLKUP+46, PTLKUP+57*, PTLKUP+61*, SELECTAD+17*, SELECTAD+18*
, SELECTAD+19*, SELECTAD+20*, SELECTAD+21*, SELECTAD+22*, SELECTAD+23*, SELECTAD+24*, SELECTAD+26, SELECTAD+28*, SELECTAD+29*, SELECTAD+33*
, SELECTAD+35*, SELECTAD+41, SELECTAD+42, SELECTAD+44*, SELECTAD+47, SELECTAD+48, SELECTAD+49, SELECTAD+51*, SELECTAD+54, SELECTAD+55
, SELECTAD+56, SELECTAD+57, SELECTAD+58*, SELSTTUS+15*, SELSTTUS+16*, SELSTTUS+17*, SELSTTUS+22*
RESULTS(2 SELECTAD+36*
U RPC+4, ADMLKUP+23, ADMLKUP+24, ADMLKUP+25, ADMLKUP+26, ADMLKUP+29, ADMLKUP+30, ADMLKUP+32, ADMLKUP+33, ADMLKUP+34
, ADMLKUP+35, PTLKUP+26, PTLKUP+51, PTLKUP+53, PTLKUP+56, PTREC+4, PTREC+5, PTREC+6, PTREC+7, PTREC+8
, SELECTAD+17, SELECTAD+18, SELECTAD+19, SELECTAD+20, SELECTAD+21, SELECTAD+22, SELECTAD+23, SELECTAD+24, SELECTAD+26, SELECTAD+28
, SELECTAD+29, SELECTAD+33, SELECTAD+35, SELECTAD+36, SELECTAD+41, SELECTAD+42, SELECTAD+43, SELECTAD+44, SELECTAD+47, SELECTAD+48
, SELECTAD+49, SELECTAD+50, SELECTAD+51, SELECTAD+54, SELECTAD+55, SELECTAD+56, SELECTAD+57, SELECTAD+58, SELECTAD+63, SELECTAD+64
, SELECTAD+65, SELECTAD+66, SELECTAD+69, SELECTAD+70, SELECTAD+74, SELECTAD+75, SELECTAD+79, SELECTAD+80, SELSTTUS+7, SELSTTUS+8
, SELSTTUS+15, SELSTTUS+16, SELSTTUS+17, SELSTTUS+18, SELSTTUS+20, SELSTTUS+22
VAL PAD~, PAD+1
X PTLKUP+14~, PTLKUP+15*, PTLKUP+16, PTLKUP+19
>> Y SELECTAD+27*, SELECTAD+28
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All