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

Package: Inpatient Medications

Routine: PSGPL1


Information

PSGPL1 ;BIR/CML3-GATHER PICK LIST DATA ;26 JAN 99 / 9:30 AM

Source Information

Source file <PSGPL1.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Inpatient Medications 7 ENUNM^PSGOU  ^PSGPL0  $$WS^PSGPL1  ^PSGPLR  ($$LOCK,UNLOCK)^PSGPLUTL  ENKV^PSGSETU  ^PSJAC  
VA Fileman 3 (C,NOW)^%DTC  ^DIE  (,EN1)^DIK  
Kernel 1 ^%ZISC  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Inpatient Medications 3 PSGPL  PSGPL1  PSGPLUP0  

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point for PSGPL - get ward info, loop thru patients
PATIENT ; add a patient to Pick List. Can also be called from ^PSGPLUP0.
A1 ; if there are orders, set the order and drug multiples.
; PSJJORD = unit dose subfile order ien
; PSGORD = PL order multiple ien
; DRG = unit dose subfile dispense drug multiple ien
; PSGDRG = PL dispense drug multiple ien
DONE ;
ENASET ; this tag can be called from above or from update (^PSGPLUP0)
; if order not being edited (OE), on hold (HD), non-verified (NV) or self-med (SM) get units (^PSGPL0)
WS(DND,WD,PSGPLC,PSGDT) ;

External References

Name Field # of Occurrence
C^%DTC EN+7
NOW^%DTC EN+7, EN+16
^%ZISC DONE+3
^DIE PATIENT+5
^DIK EN+4
EN1^DIK EN+15
ENUNM^PSGOU EN+9
^PSGPL0 A1+9
$$WS^PSGPL1 A1+12
^PSGPLR DONE+2
$$LOCK^PSGPLUTL EN+3, EN+5
UNLOCK^PSGPLUTL DONE+1
ENKV^PSGSETU DONE+3
^PSJAC EN+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(53.5 - [#53.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] EN+8
^DPT("CN" EN+9
^PS(53.5 - [#53.5] EN+6, EN+14, EN+16*, A1+5, A1+6, A1+7*, A1+10, A1+11, A1+13*, A1+14*
, PATIENT+1, PATIENT+2, PATIENT+4*
^PS(55 - [#55] EN+11, EN+12, ENASET+3!, ENASET+5, A1+7, A1+8, A1+15
^PS(57.5 - [#57.5] EN+4, EN+8
^PS(57.7 - [#57.7] EN+10

Label References

Name Line Occurrences
A1 ENASET+4
DONE EN+6
ENASET EN+12
PATIENT EN+11

Naked Globals

Name Field # of Occurrence
^( A1+8, WS+4
^(0 EN+10, ENASET+5, A1+6*, A1+11*, PATIENT+2*
^(1 A1+5*, A1+10*, PATIENT+1*
^(2 EN+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+7, EN+16
AOU WS+1~, WS+3*, WS+4
DA EN+4!*, EN+14*, PATIENT+5*
DA(1 PATIENT+5*
DDC DONE+3!, A1+8*, A1+13*, A1+14*
DIE PATIENT+5*!
DIK EN+4!*, EN+14*, EN+16!
DIK(1 EN+15*
DND A1+8*, A1+12, A1+13, A1+14, WS~, WS+2, WS+3, WS+4
>> DR PATIENT+5*
DRG DONE+3!, A1+8*, A1+13, A1+14
DRUG WS+1~, WS+4*
>> EST EN+6*, ENASET+2, ENASET+4, A1+13
>> F WS+2*, WS+3, WS+4
IO EN+16
>> NST ENASET+2*, ENASET+4, A1+7, A1+13
>> OG EN+2, EN+3, EN+4
P DONE+3!
PN DONE+3!
PRINT EN+1~*, EN+16*, DONE+2
>> PSGAU PATIENT+5
PSGDRG A1+11*, A1+13, A1+14, A1+16!
PSGDT EN+7*, A1+12, WS~, WS+4
PSGLOCK DONE+3!, ENASET+2*, ENASET+3*, ENASET+5, A1+15
PSGMAR DONE+3!
PSGORD DONE+3!, A1+6*, A1+7, A1+10, A1+11, A1+13, A1+14
PSGP EN+9*, EN+11, EN+12, DONE+3!, ENASET+3, ENASET+5, A1+5, A1+6, A1+7, A1+8
, A1+10, A1+11, A1+13, A1+14, A1+15, PATIENT+2, PATIENT+4, PATIENT+5
PSGPLC DONE+3!, A1+9*, A1+12*, A1+14, WS~, WS+3, WS+4*, WS+5
PSGPLD EN+7*, EN+12, DONE+3!
>> PSGPLDC ENASET+2*, ENASET+5*, A1+7, A1+9, A1+12
>> PSGPLF A1+13
>> PSGPLG EN+5, EN+6, EN+14, EN+16, DONE+1, A1+5, A1+6, A1+7, A1+10, A1+11
, A1+13, A1+14, PATIENT+1, PATIENT+2, PATIENT+4, PATIENT+5
PSGPLO DONE+3!, A1+9*
>> PSGPLS EN+7, EN+11, ENASET+2
PSGPLTND EN+6*, DONE+3!
PSGPLWD EN+8*, EN+10, DONE+3!, A1+12
PSGPLWDN EN+9*, DONE+3!
>> PSGPLWG EN+4, EN+8
PSJACNWP EN+9*, DONE+3!
PSJJORD EN+11*, EN+12*, DONE+3!, ENASET+3, ENASET+5, A1+7, A1+8, A1+9, A1+15
>> PSJPRB EN+10
>> PST EN+12*, ENASET+2
>> RB EN+10*, PATIENT+4
>> RERUN EN+2
SD EN+12*, DONE+3!, ENASET+2
ST DONE+3!
TM EN+10*, DONE+3!, PATIENT+4
U A1+7, WS+4
WD WS~, WS+2, WS+3
>> WDN EN+8*, EN+9, PATIENT+4
WSF EN+6*, EN+9, DONE+3!
>> X EN+7, EN+10*, WS+4*
>> X1 EN+7*
>> X2 EN+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All