©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
TIUPNCV2 ;SLC/DJP-SF/JLI ;11/24/97 13:17
Source file <TIUPNCV2.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 1 | ($$BEDSEC,$$DXLS)^TIUPNCV3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COMMENT | ;Appends word-processing contained in Field 8 - COMMENT
|
|
| FREETXT | ;Converts multiple freetext field into word-processing fields
|
|
| ONEDOC | ;Pulls formatted notes together into a single word processing field
|
|
| WHATSIT | ;Determines component type
|
|
| SETHOLD | ;Sets ^TMP("TIUHOLD") which contains the resequenced note
|
|
| SETSPEC | ;Converts non-word-processing fields into word-processing fields
|
|
| RENUM | ;Renumbers WP fields and inserts TITLE of component within field.
|
|
| COUNTS | ;Pieces out line counts for word-processing fields
|
|
| SPECIAL | ;Handles fields other than Word Processing
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(121 | COUNTS+3, COUNTS+4, COUNTS+5, ONEDOC+4, SPECIAL+2, SPECIAL+4, SPECIAL+6, FREETXT+2, FREETXT+4 |
| ^TMP("TIUHOLD" | RENUM+5*, SETHOLD+4*, SETHOLD+7* |
| ^TMP("TIUMERGE" | ONEDOC+3*, ONEDOC+4*, ONEDOC+6*, COMMENT+3*, RENUM+2, RENUM+3!, SETHOLD+1, SETHOLD+2, SETHOLD+6!, SETHOLD+7 , SETSPEC+1*, SETSPEC+2*, FREETXT+1*, FREETXT+4* |
| Name | Line Occurrences |
|---|---|
| COUNTS | WHATSIT+4, WHATSIT+5, WHATSIT+8, WHATSIT+11, WHATSIT+12, WHATSIT+13, COMMENT+2 |
| FREETXT | SPECIAL+6 |
| ONEDOC | COUNTS+6 |
| SETHOLD | RENUM+4 |
| SETSPEC | SPECIAL+2, SPECIAL+4 |
| SPECIAL | COUNTS+2 |
| Name | Field # of Occurrence |
|---|---|
| ^(30 | SPECIAL+2, SPECIAL+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> A | WHATSIT+1*, WHATSIT+4, WHATSIT+5, WHATSIT+8, WHATSIT+11, WHATSIT+12, WHATSIT+13, COUNTS+2, COMMENT+1* |
| >> CNT1 | ONEDOC+2*, ONEDOC+3 |
| >> CNT2 | ONEDOC+2*, ONEDOC+3 |
| >> CNTA | COUNTS+3*, ONEDOC+2 |
| >> CNTB | COUNTS+4*, ONEDOC+2 |
| F1 | FREETXT+2*, FREETXT+5! |
| F2 | FREETXT+1*, FREETXT+2*, FREETXT+4, FREETXT+5! |
| F3 | FREETXT+1*, FREETXT+3*, FREETXT+4, FREETXT+5! |
| >> FLD | ONEDOC+2*, ONEDOC+4 |
| >> GMRPFLD | WHATSIT+1, COUNTS+3, COUNTS+4, COUNTS+5, ONEDOC+2, ONEDOC+4, ONEDOC+5, ONEDOC+6, COMMENT+1*, SPECIAL+2* , SPECIAL+4*, SPECIAL+6*, SETSPEC+1, SETSPEC+2, FREETXT+1, FREETXT+2, FREETXT+4 |
| >> GMRPIFN | COUNTS+3, COUNTS+4, COUNTS+5, ONEDOC+3, ONEDOC+4, ONEDOC+6, COMMENT+3, RENUM+2, RENUM+3, RENUM+5 , SETHOLD+1, SETHOLD+2, SETHOLD+4, SETHOLD+6, SETHOLD+7, SPECIAL+2, SPECIAL+4, SPECIAL+6, SETSPEC+1, SETSPEC+2 , FREETXT+1, FREETXT+2, FREETXT+4 |
| >> LNHDR | WHATSIT+4*, WHATSIT+5*, WHATSIT+8*, WHATSIT+11*, WHATSIT+12*, WHATSIT+13* |
| PNFLD | RENUM+1*, RENUM+2*, RENUM+3, RENUM+6!, SETHOLD+1, SETHOLD+2, SETHOLD+6, SETHOLD+7 |
| PNHDR | SETHOLD+2*, SETHOLD+4, SETHOLD+5! |
| >> RENUM | ONEDOC+1*, COMMENT+1* |
| >> SPECIAL | SPECIAL+2*, SPECIAL+4*, SETSPEC+2 |
| SUBTIL | COUNTS+1*, ONEDOC+5, ONEDOC+6, ONEDOC+7!, SPECIAL+2*, SPECIAL+4*, SPECIAL+6*, SETSPEC+1, SETSPEC+3!, FREETXT+1 , FREETXT+5! |
| T1 | RENUM+1*, RENUM+6!, SETHOLD+7* |
| T2 | RENUM+1*, RENUM+5, RENUM+6!, SETHOLD+3*, SETHOLD+4, SETHOLD+7* |
| >> TEXTDT | COUNTS+5*, ONEDOC+3, RENUM+5 |
| >> TIUBS | SPECIAL+4* |
| >> TIUDX | SPECIAL+2* |
| TX | WHATSIT+4*, WHATSIT+5*, WHATSIT+8*, WHATSIT+11*, WHATSIT+12!, WHATSIT+13*, COUNTS+1 |
| U | COUNTS+3, COUNTS+4, COUNTS+5, SETHOLD+2, SPECIAL+2, SPECIAL+4, FREETXT+2 |
| >> X | COMMENT+1* |