PSJBLDOC ;BIR/MV - API to build ^TMP for prospective and PSJ profile drugs ;03 Aug 98 / 8:42 AM
Source file <PSJBLDOC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IN(DFN,LIST,PDRG,PTYP) | ;
|
|
| PROFILE(DFN,PSJWON,PTYP) | ||
| UD | ;Get the dispense drugs for the Unit Dose orders.
|
|
| PIV | ;Get the dispense drugs for the Pending IV orders.
|
|
| IV | ;Get the dispense drugs for the IV orders.
|
|
| SETIN(PSJFLG,PSJNM,DDRUG,ON,PSJCODE,PSJCLCOD,PSJCLINF) | ;Set ^TMP($J,"PSJPRE,"IN" arrays.
|
|
| IV0(PSJAD,PSIVIEN) | ;Return ad/sol zero node
|
|
| NODD(PSJCODE,PSJOIDF,PSJPON,PSJBASE) | ;Set ^TMP for OI without a dispense drug
|
| FileNo | Call Tags |
|---|---|
| ^PS(53.1 - [#53.1] | GET1^DIQ |
