PSJ005 ;BIR/RSB-UTILITY ROUTINE FOR PATCH PSJ*5*5 ; 03 Jun 98 / 12:06 PM
Source file <PSJ005.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FIN | ;
; has CPRS main order conversion finished? IF NOT DON'T ASK TIME TO Q |
|
| EN | ; QUEUE UP CONVERSION FOR UD OUTPATIENT CLEANUP
|
|
| START | ;
|
|
| DISC() | ; was the patients last movement a discharge? if not - quit
|
|
| IV() | ; is the Orderable Item marked for IV use? if yes - quit
|
|
| DC | ; change the orders status to DISCONTINUED!
|
|
| GETDT | ; check date/time for job to run
|
|
| CON(X) | ;
|
|
| START1 | ;
|
|
| BADN | ; called from BADNAMES^PSJIPST3, when main CPRS is finished
|
| FileNo | Call Tags |
|---|---|
| ^PS(53.1 - [#53.1] | Classic Fileman Calls |
