PSGBRJ ;BIR/CML3-UD JANITOR (BACKGROUND TASKMAN JOB) ; 6/4/10 9:57am
Source file <PSGBRJ.m>
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.
|
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 |