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 |