PSGSICH ;BIR/JCH-PROVIDER & PHARMACY OVERRIDE UTILITIES ; 08/19/11 1:02pm
Source file <PSGSICH.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
NAME(TMPDUZ,NAME,INIT) | ;
|
|
HLD | ; Prompt user to continue or exit
|
|
ORDEXIST(PSGP,PSGORD) | ; Has order been filed?
|
|
OROICHK(DFN,ORDER,PSJOVRAR) | ; Find the CPRS order number associated with the last Orderable Item edit
|
|
ONEINTER(INTER,PSJORDER,PSJIDTM,OUTARRAY) | ; Accept one intervention IEN and return OUTARRAY with formatted intervention information
; INPUT: INTER = Intervention IEN from ^APSPQA(32.4 ; PSJORDER = Inpatient Order ; PSJIDTM = Order Date/Time ; OUTARRAY = Array containing CPRS overrides and pharmacy interventions |
|
CHKADD(PSJINTER,PSGP,PSJIVORN) | ; Check for existence of Intervention Orderable Item in IV Additives
|
|
SETIVIN2(PSJI1,PSJI2) | ; Store Intervention pointers in the IV Intervention multiple
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^APSPQA(32.4 - [#9009032.4] | Classic Fileman Calls |