TIUP246 ; SLC/JER - Installer Routine for TIU*1*246 ;02/03/09 10:15
Source file <TIUP246.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ; Pre-install - If the Exchange File entry already exists delete it.
|
|
| EXARRAY(ARRAY,LVL) | ; List of exchange entries used by delete and install
|
|
| POST | ; Post-install.
|
|
| FIND(TIUNM,TYPE) | ; Find IEN of TBI/POLYTRAUMA Document Definition
|
|
| ATTACH(TIUDA,TIUPDA) | ; Attach Entry (TIUDA) to desired Parent (TIUPDA)
|
|
| MAP(TIUDA) | ; Map new TBI/POLYTRAUMA Title to Enterprise Standard Title TBI TREATMENT PLAN NOTE
|
| FileNo | Call Tags |
|---|---|
| ^PXD(811.8 - [#811.8] | Classic Fileman Calls, FIND1^DIC, FIND^DIC |
| ^TIU(8925.1 - [#8925.1] | Classic Fileman Calls |