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 |