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

Package: Inpatient Medications

Routine: PSGBRJ


Information

PSGBRJ ;BIR/CML3-UD JANITOR (BACKGROUND TASKMAN JOB) ; 6/4/10 9:57am

Source Information

Source file <PSGBRJ.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 (C,NOW)^%DTC  ^DIK  
Inpatient Medications 1 ENKV^PSGSETU  

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

Package Total Caller Graph
Inpatient Medications 1 PSJU BRJ  

Entry Points

Name Comments DBIA/ICR reference
LK ; kill off old labels
AK ; kill off all orders in 53.1 that have gone active (into 55)
DE ; kill off de orders in 53.1 that no longer tie to order in 55
DK ; kill off dc'd orders in 53.1 around longer than life of labels
PLP ; purge pick lists that are filed away and older than auto purge days
GLK ; kill off entries in ^PS(53.42) 20 days or more old
UPARAM ; kill off entries in ^PS(53.45) INPATIENT USER PARAMETERS file if there is no corresponding entry in the NEW PERSON file or they have a TERMINATION DATE before today.
NVK ; *PSJ*5*244 - kill discontinued orders from non-verified X-refs
PADE ; *317 - kill messages older than 90 days
DONE ;
ORPRG ;
LABELDT(PSGP,X1) ; Find patient's ward and get days to keep new labels.
PDE(PSJDA1,PSGP) ;Remove all related pending orders with the "DE" status.

External References

Name Field # of Occurrence
C^%DTC PLP+1, GLK+1, PADE+1, LABELDT+2
NOW^%DTC LK+1, DONE+2
^DIK LK+8, AK+3, DK+5, PLP+2, PLP+3, UPARAM+2, UPARAM+3, PADE+3, PDE+7
ENKV^PSGSETU DONE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(53.1 - [#53.1] Classic Fileman Calls
^PS(53.45 - [#53.45] Classic Fileman Calls
^PS(53.5 - [#53.5] Classic Fileman Calls
^PS(53.55 - [#53.55] Classic Fileman Calls
^PS(58.72 - [#58.72] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" DE+1, DK+2
^DIC(42 - [#42] LABELDT+1
^DPT - [#2] LABELDT+1
^PS(53.1 - [#53.1] AK+2, AK+3, DE+3, DE+6, DE+7, DK+3, DK+4, DK+5, PDE+2, PDE+7
^PS(53.41 - [#53.41] LK+3, LK+4, LK+6, LK+7
^PS(53.42 - [#53.42] LK+1*, GLK+1, DONE+2*
^PS(53.45 - [#53.45] UPARAM+1
^PS(53.5 - [#53.5] PLP+1, PLP+2!, PLP+3
^PS(53.55 - [#53.55] PLP+3
^PS(55 - [#55] DE+4, DE+5, NVK+4, NVK+5, NVK+6!, PDE+3, PDE+4
^PS(58.72 - [#58.72] PADE+2, PADE+3
^PS(59.6 - [#59.6] LABELDT+1
^PS(59.7 - [#59.7] PLP+1
^TMP($J DE+2!, DE+4*, DE+5*, DE+6*, DE+7, DE+8!
^VA(200 - [#200] UPARAM+2, UPARAM+3
^XTMP("ORLK-" AK+3

Label References

Name Line Occurrences
$$LABELDT LK+5, DK+4
ORPRG DK+5, PDE+7
PDE DE+7

Naked Globals

Name Field # of Occurrence
^( PLP+1, GLK+1!
^(2 DK+5
^(63.5 PLP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LK+1, DONE+2
CA DONE+3!
D GLK+1*, PADE+1~*, PADE+2*, PADE+3, DONE+3!
DA LK+8!*, AK+2*, AK+3, DK+4*, DK+5, PLP+2!*, PLP+3!*, UPARAM+1*, UPARAM+2, UPARAM+3
, PADE+3*, DONE+3!, PDE+1~, PDE+7*!
DA(1 LK+8*
DA(2 LK+8*
DA(3 LK+8*
DA(4 LK+8*
DFN NVK+1~, NVK+4*, NVK+5, NVK+6, DONE+3!
DIK LK+8*, AK+2*, DK+5*, PLP+2!*, PLP+3!*, UPARAM+2*!, UPARAM+3*!, PADE+1*, DONE+3!, PDE+1~
, PDE+7*!
DND DONE+3!
DT PLP+1, GLK+1, UPARAM+3, PADE+1
GOTO DONE+3!
ON DE+2~, DE+3*, DE+4, DE+5, DE+6, NVK+1~, NVK+5*, NVK+6
ON100 AK+1~, AK+3*
PDE PDE+1~
PDE( PDE+5*, PDE+6*, PDE+7
PDE(0 PDE+7
PDEFLG PDE+1~*, PDE+3*, PDE+4*, PDE+7
PDI PADE+1~, PADE+3*
PDT PADE+1~*, PADE+2
PSGBRJDT LK+1*, DONE+2, DONE+3!
>> PSGDT LK+1*, LK+5, DK+4
PSGKD LK+5*, LK+8, DK+4*, DK+5, DONE+3!
PSGL1 LK+2*, LK+3, LK+4, LK+6, LK+7, LK+8, DONE+3!
PSGL2 LK+3*, LK+4, LK+6, LK+7, LK+8, DONE+3!
PSGL3 LK+4*, LK+5, LK+6, LK+7, LK+8, DONE+3!
PSGL4 LK+6*, LK+7, LK+8, DONE+3!
>> PSGL5 LK+6*, LK+7, LK+8
PSGOERRF DE+1*, DK+2*, DK+5, DONE+3!, PDE+7
PSGP AK+2*, DE+3*, DE+4, DE+5, DE+6, DK+3*, DK+4, LABELDT~, LABELDT+1, PDE~
, PDE+3, PDE+4
PSGREF NVK+1~
PSGREF( NVK+4, NVK+5, NVK+6
PSGREF(1 NVK+2*
PSGREF(2 NVK+2*
PSGREF(3 NVK+2*
PSGREF(4 NVK+2*
PSGX UPARAM+3*, DONE+3!
PSJ55 PDE+1~*, PDE+2, PDE+3*, PDE+4*, PDE+6
PSJACIVF LK+1*, DONE+3!
PSJDA DE+2~, DE+3*, DE+4, DE+5, DE+6, DE+7*
PSJDA1 PDE~, PDE+2, PDE+5*, PDE+6, PDE+7*
PSJNO AK+1~, AK+2*
PSJNOACT AK+1~*, DK+1~*, PDE+1~*
PSJNUM PDE+1~, PDE+2*, PDE+3, PDE+4, PDE+5
PSJX PLP+1*, PLP+3*, DONE+3!
>> Q PLP+1*
>> QQ PLP+1*
S DK+5*, DONE+3!
ST DK+5*, DONE+3!
U AK+3, DE+3, NVK+6, LABELDT+1, PDE+2
X LK+7*, LK+8, DE+1*, DK+2*, PLP+1, GLK+1, NVK+1~, NVK+3*, NVK+4, NVK+5
, NVK+6, PADE+1, LABELDT+1*, LABELDT+3
X1 PLP+1*, GLK+1*, PADE+1*, DONE+3!, LABELDT~
X2 PLP+1*, GLK+1*, PADE+1*, DONE+3!, LABELDT+1*
>> Y PLP+1*, PLP+2
>> ZTQUEUED DONE+1
>> ZTREQ DONE+1*
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