PSGOE2 ;BIR/MV-CHECK INACTIVE DRUG ; 23 Sep 98 / 8:38 AM
Source file <PSGOE2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CHKDRG | ;*** Check inactive Orderable Item/disp drug and also if marked for UD
|
|
CHKDD(F) | ;*** Check inactive dispense drug within the order.
|
|
STUFFDD() | ;*** Stuff DD in ^PS(53.1 only if a valid DD is 1 to 1 link to OI.
|
|
CHK | ; check for valid reply and questions
|
|
DDOK(PSJF,OI) | ;Check to be sure all dispense drugs that are active in the
|
|
OIOK(X) | ; Check to be sure orderable item is valid
; input: X - IEN of orderable item ; Output: 0 - invalid ; 1 - valid |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|