PSIVORC2 ;BIR/MLM - PROCESS INCOMPLETE IV ORDER - CONT ; Feb 02, 2022
Source file <PSIVORC2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EDCHK | ;Update or create new order in 55.
|
|
ACTIVE | ;
|
|
CKORD | ;Check if new order is to be created.
|
|
CKPC | ;
|
|
OLDORD | ; Update old order, update order links.
|
|
NEWORD | ; Create new order, update order links.
|
|
GTIVDRG | ; Try to find an IV drug from the Orderable Item.
; If there is only 1 match to OI then stuff in DRG otherwise prompt user to select which ; ad/sol matched to OI |
|
EDIT | ; Edit incomplete order
|
|
FINISH | ; Ask only for missing data in incomplete IV order.
|
|
NONVF() | ; Updated 53.1 status to non-verified after finish.
|
|
NWNONVF | ;Create non-verified due to edit
|
|
VF | ; Display Verify screen
|
|
RESET | ;Reset PSIVOI("DILIST") for additives with quick codes
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|