©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
TIULF ; SLC/JER - More computational functions ; 4/2/03
Source file <TIULF.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 1 | $$PNAME^TIULC1 |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EMPTYDOC(DA) | ;Checks to see if text for DCS is blank
; returns a 1 if empty ; returns a 0 if contains data |
|
| STATUS(TIUDA) | ; Returns external status for document TIUDA
|
|
| DOCTYPE(TIUDA) | ; Evaluates Definition of a Document
|
|
| EMPTYX | ; EXIT
|
| FileNo | Call Tags |
|---|---|
| ^TIU(8925 - [#8925] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | EMPTYDOC+5, EMPTYDOC+6, EMPTYDOC+7, EMPTYDOC+17, EMPTYDOC+19, DOCTYPE+1 |
| ^TIU(8925.1 - [#8925.1] | DOCTYPE+2 |
| Name | Line Occurrences |
|---|---|
| $$EMPTYDOC | EMPTYDOC+20 |
| EMPTYX | EMPTYDOC+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EMPTYDOC~, EMPTYDOC+5, EMPTYDOC+6, EMPTYDOC+7, EMPTYDOC+17, EMPTYDOC+19 |
| TIUC | EMPTYDOC+18~*, EMPTYDOC+19*, EMPTYDOC+20 |
| TIUCHAR | EMPTYDOC+3~, EMPTYDOC+11*, EMPTYDOC+13, EMPTYDOC+14 |
| TIUDA | STATUS~, STATUS+1, DOCTYPE~, DOCTYPE+1 |
| TIUDATA | EMPTYDOC+3~, EMPTYDOC+7*, EMPTYDOC+11, EMPTYDOC+15 |
| TIULINE | EMPTYDOC+3~, EMPTYDOC+6*, EMPTYDOC+7 |
| TIUQUIT | EMPTYDOC+3~, EMPTYDOC+7*, EMPTYDOC+8, EMPTYDOC+11 |
| TIUSTART | EMPTYDOC+3~, EMPTYDOC+8*, EMPTYDOC+11*, EMPTYDOC+15, EMPTYDOC+16* |
| TIUX | EMPTYDOC+3~, EMPTYDOC+15*, EMPTYDOC+16 |
| TIUY | EMPTYDOC+3~, EMPTYDOC+4*, EMPTYDOC+6, EMPTYDOC+11, EMPTYDOC+13*, EMPTYDOC+17, EMPTYDOC+19, EMPTYDOC+20*, EMPTYX+1 |
| TYPE | DOCTYPE+1~*, DOCTYPE+2*, DOCTYPE+3 |
| U | DOCTYPE+2 |