TIUEN182 ; SLC/MAM - Environment Check Rtn for TIU*1*182 ; 6/9/04
Source file <TIUEN182.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAINX | ||
| NAME | ; Names of DDEFS in order from 1 to 13
|
|
| LISTDUPS(TIUDUPS,TMPCNT,OPTFLG) | ; List duplicates by name
; TIUDUPS = array as set in TIUDUPS. Required. ; TMPCNT = Count at which to start message array ^TMP("TIU182MSG",$J,TMPCNT); Received by reference. (Array already has some nodes if called from option.) Optional. ; OPTFLG = 1 if called from option; ; 0 if called from env check. Optional. |
|
| SETBASIC | ; Set up basic data in ^TMP("TIU182",$J,"BASICS")
|
|
| MAIN | ; Check environment. If problems found, warn but do not abort install.
; -- Check if done: |
|
| TIUDUPS(TIUDUPS,OPTFLG) | ; Set array TIUDUPS of potential duplicate DDEFS
|
| Name | Field # of Occurrence |
|---|---|
| $$CLASS^TIUCP | MAIN+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925.1 - [#8925.1] | TIUDUPS+12, TIUDUPS+13 |
| ^TMP("TIU182" | MAINX+1!, SETBASIC+7*, SETBASIC+8*, SETBASIC+9*, TIUDUPS+10, TIUDUPS+11, LISTDUPS+21 |
| ^TMP("TIU182MSG" | MAIN+12!, MAINX!, LISTDUPS+8*, LISTDUPS+9*, LISTDUPS+10*, LISTDUPS+11*, LISTDUPS+12*, LISTDUPS+13*, LISTDUPS+16*, LISTDUPS+17* , LISTDUPS+18*, LISTDUPS+21*, LISTDUPS+25, LISTDUPS+26 |
| ^USR(8930 - [#8930] | MAIN+4 |
| ^XTMP("TIU182" | MAIN+2, TIUDUPS+2, TIUDUPS+6 |
| Name | Line Occurrences |
|---|---|
| LISTDUPS | MAIN+13 |
| MAINX | MAIN+10 |
| SETBASIC | MAIN+6 |
| TIUDUPS | MAIN+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| NAME | TIUDUPS+9~, TIUDUPS+10*, TIUDUPS+12 |
| NUM | TIUDUPS+1~, TIUDUPS+3*, TIUDUPS+6, TIUDUPS+10, TIUDUPS+11, TIUDUPS+13, LISTDUPS+5~, LISTDUPS+19*, LISTDUPS+20*, LISTDUPS+21 |
| NUMBER | SETBASIC+1~, SETBASIC+8*, SETBASIC+9* |
| OPTFLG | TIUDUPS~, TIUDUPS+1*, LISTDUPS~, LISTDUPS+6*, LISTDUPS+15, LISTDUPS+23 |
| TIUDA | TIUDUPS+9~*, TIUDUPS+12*, TIUDUPS+13 |
| TIUDUPS | MAIN+8~, MAIN+9, MAIN+10, MAIN+13, TIUDUPS~, TIUDUPS+1*, TIUDUPS+13*, LISTDUPS~ |
| TIUDUPS( | TIUDUPS+13*, LISTDUPS+20 |
| TIUI | LISTDUPS+24~*, LISTDUPS+25*, LISTDUPS+26 |
| TMPCNT | LISTDUPS~, LISTDUPS+7*, LISTDUPS+8*, LISTDUPS+9*, LISTDUPS+10*, LISTDUPS+11*, LISTDUPS+12*, LISTDUPS+13*, LISTDUPS+14*, LISTDUPS+16 , LISTDUPS+17*, LISTDUPS+18, LISTDUPS+21* |
| TYPE | TIUDUPS+9~, TIUDUPS+11*, TIUDUPS+13 |
| U | TIUDUPS+13 |
| Name | Field # of Occurrence |
|---|---|
| $T(NAME+NUMBER | SETBASIC+9 |