TIURM1 ; SLC/JER - MIS Document Review ;01-Aug-2011 12:07;MGH
Source file <TIURM1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DADINTYP(TIUDA) | ; Evaluates whether addendum's parent is among ; the selected types | |
| SETLIST(TIUORDER,VALMCNT) | ; Set items from ^TMP("TIUI",$J) into | |
| INTYPES(TIUDA) | ; Evaluates whether a record is among the selected types | |
| PUTLIST(TIUPREF,TIUCLASS,STATUS,DIVIFNS) | ; Expands list elements for LM Template | |
| ININST(TIUDA,TIUDI) | ; Evaluates whether a TIU DOCUMENT record ; is among the selected divisions ; Input -- TIUDA TIU DOCUMENT file (#8925) IEN ; -- TIUDI( i.e. TIUDI(file #40.8 IEN)=Institution file ; pointer for file #40.8 entry ; Output - TIUY 0= record not in selected division ; 1= record in selected division | |
| INTYPX | ||
| INSTATUS(TIUDA,STATIFNS) | ; Evaluates whether a record | |
| GATHER(TIUPREF,CLASS,STATIFNS,EARLY,LATE,DIVIFNS) | ; Find/sort | |
| ADDELMNT(DA,TIUCNT,APPEND) | ; Add each element to the list | 
| Name | Field # of Occurrence | 
|---|---|
| $$PREFIX^TIULA2 | ADDELMNT+12 | 
| $$PERSNAME^TIULC1 | ADDELMNT+21, ADDELMNT+22 | 
| $$PNAME^TIULC1 | ADDELMNT+10, ADDELMNT+11 | 
| $$PTNAME^TIULC1 | ADDELMNT+13 | 
| $$DATE^TIULS | ADDELMNT+19, ADDELMNT+20, ADDELMNT+25, ADDELMNT+27 | 
| $$LOWER^TIULS | ADDELMNT+44 | 
| $$NAME^TIULS | ADDELMNT+13, ADDELMNT+23, ADDELMNT+24 | 
| $$RESOLVE^TIUR1 | GATHER+12 | 
| EXPANDKD^TIUR2 | PUTLIST+24 | 
| REPLACE^TIUR2 | PUTLIST+11 | 
| $$IDDATA^TIURECL1 | ADDELMNT+52 | 
| HDR^TIURMH | PUTLIST+17, ADDELMNT+56, ADDELMNT+61 | 
| PID^VADPT | ADDELMNT+18 | 
| $$SETFLD^VALM1 | ADDELMNT+36, ADDELMNT+37, ADDELMNT+38, ADDELMNT+39, ADDELMNT+40, ADDELMNT+41, ADDELMNT+42, ADDELMNT+43, ADDELMNT+44, ADDELMNT+45 , ADDELMNT+46, ADDELMNT+47 | 
| CNTRL^VALM10 | ADDELMNT+56 | 
| RESTORE^VALM10 | ADDELMNT+55 | 
| $$NS^XUAF4 | ADDELMNT+32 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ORD(101 - [#101] | PUTLIST+6 | 
| ^TIU(8925 - [#8925] | GATHER+5, GATHER+7, INTYPES+2, INSTATUS+3, ININST+8, DADINTYP+3, ADDELMNT+4, ADDELMNT+8, ADDELMNT+9, ADDELMNT+11 | 
| ^TIU(8925.6 - [#8925.6] | ADDELMNT+28 | 
| ^TMP("TIUI" | GATHER+13*, PUTLIST+7, PUTLIST+8, PUTLIST+10, SETLIST+4, SETLIST+6, SETLIST+8 | 
| ^TMP("TIUR" | PUTLIST+13*, PUTLIST+14*, PUTLIST+15*, PUTLIST+16*, PUTLIST+19*, PUTLIST+20*, PUTLIST+21*, PUTLIST+22*, ADDELMNT+5, ADDELMNT+6! , ADDELMNT+48*, ADDELMNT+49*, ADDELMNT+51*, ADDELMNT+53*, ADDELMNT+58*, ADDELMNT+59* | 
| ^TMP("TIURIDX" | ADDELMNT+50* | 
| ^TMP("TIUTYP" | INTYPES+4, INTYPES+5, DADINTYP+4, DADINTYP+5 | 
| Name | Line Occurrences | 
|---|---|
| $$DADINTYP | INTYPES+3 | 
| $$ININST | GATHER+11 | 
| $$INSTATUS | GATHER+10 | 
| $$INTYPES | GATHER+9 | 
| ADDELMNT | SETLIST+9 | 
| INTYPX | INTYPES+3 | 
| SETLIST | PUTLIST+12 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADT | ADDELMNT+1~, ADDELMNT+19*, ADDELMNT+40 | 
| AMD | ADDELMNT+1~, ADDELMNT+21*, ADDELMNT+23*, ADDELMNT+46 | 
| APPEND | ADDELMNT~, ADDELMNT+54 | 
| AUT | ADDELMNT+1~, ADDELMNT+22*, ADDELMNT+24*, ADDELMNT+45 | 
| CLASS | GATHER~ | 
| DA | ADDELMNT~, ADDELMNT+8, ADDELMNT+9, ADDELMNT+50, ADDELMNT+51, ADDELMNT+52, ADDELMNT+53 | 
| DDT | ADDELMNT+1~, ADDELMNT+20*, ADDELMNT+41 | 
| >> DFN | ADDELMNT+18* | 
| DIVIFNS | GATHER~, GATHER+11, PUTLIST~, PUTLIST+16 | 
| DIVIFNS("ENTRIES" | GATHER+11 | 
| DOC | ADDELMNT+2~, ADDELMNT+10*, ADDELMNT+11*, ADDELMNT+39 | 
| EARLY | GATHER~, GATHER+5 | 
| EDT | ADDELMNT+1~, ADDELMNT+25*, ADDELMNT+42 | 
| HRCN | ADDELMNT+18~ | 
| INSTA | ADDELMNT+1~, ADDELMNT+30*, ADDELMNT+33*, ADDELMNT+34*, ADDELMNT+47 | 
| >> IOINHI | ADDELMNT+56 | 
| >> IOINORM | ADDELMNT+56 | 
| LATE | GATHER~, GATHER+5 | 
| LCT | ADDELMNT+1~, ADDELMNT+29*, ADDELMNT+43 | 
| PREFIX | ADDELMNT+3~, ADDELMNT+12*, ADDELMNT+15, ADDELMNT+50 | 
| PT | ADDELMNT+1~, ADDELMNT+13*, ADDELMNT+14, ADDELMNT+15*, ADDELMNT+37 | 
| SDT | ADDELMNT+1~, ADDELMNT+26*, ADDELMNT+27* | 
| SORTVAL | SETLIST+2~, SETLIST+3*, SETLIST+4*, SETLIST+6, SETLIST+8 | 
| STATIFNS | GATHER~, GATHER+10, INSTATUS~, INSTATUS+4 | 
| STATUS | PUTLIST~, PUTLIST+24 | 
| STATUS("WORDS" | PUTLIST+13 | 
| STATX | ADDELMNT+2~, ADDELMNT+28*, ADDELMNT+44 | 
| TIUCLASS | PUTLIST~, PUTLIST+14 | 
| TIUCNT | ADDELMNT~, ADDELMNT+7*, ADDELMNT+35*, ADDELMNT+36, ADDELMNT+48, ADDELMNT+49, ADDELMNT+50, ADDELMNT+51, ADDELMNT+55, ADDELMNT+56 , ADDELMNT+57, ADDELMNT+58, ADDELMNT+59, ADDELMNT+60 | 
| TIUD0 | ADDELMNT+2~, ADDELMNT+8*, ADDELMNT+10, ADDELMNT+11, ADDELMNT+13, ADDELMNT+18, ADDELMNT+19, ADDELMNT+20, ADDELMNT+26, ADDELMNT+28 , ADDELMNT+29, ADDELMNT+52 | 
| TIUD12 | ADDELMNT+2~, ADDELMNT+8*, ADDELMNT+21, ADDELMNT+22, ADDELMNT+31, ADDELMNT+32 | 
| TIUD13 | ADDELMNT+2~, ADDELMNT+9*, ADDELMNT+25 | 
| TIUD15 | ADDELMNT+2~, ADDELMNT+9*, ADDELMNT+26 | 
| TIUDA | GATHER+2~, GATHER+6*, GATHER+7*, GATHER+9, GATHER+10, GATHER+11, GATHER+12, GATHER+13, INTYPES~, INTYPES+2 , INTYPES+3, INSTATUS~, INSTATUS+3, ININST~, ININST+8, DADINTYP~, DADINTYP+3, PUTLIST+1~, PUTLIST+9*, PUTLIST+10* , PUTLIST+11, SETLIST+2~, SETLIST+7*, SETLIST+8*, SETLIST+9, ADDELMNT+4, ADDELMNT+12 | 
| TIUDI | ININST~ | 
| TIUDI( | ININST+9, ININST+10 | 
| TIUDTM | SETLIST+2~, SETLIST+5*, SETLIST+6*, SETLIST+8 | 
| TIUDTYP | DADINTYP+2~, DADINTYP+3*, DADINTYP+5 | 
| TIUEXPKD | PUTLIST+1~, PUTLIST+11, PUTLIST+24 | 
| TIUGDATA | ADDELMNT+3~, ADDELMNT+52*, ADDELMNT+53 | 
| TIUI | GATHER+2~, GATHER+5*, GATHER+7, GATHER+13, INTYPES+1~*, INTYPES+4*, INTYPES+5, ININST+7~, ININST+9*, ININST+10 , DADINTYP+2~*, DADINTYP+4*, DADINTYP+5 | 
| TIUIFP | ININST+7~, ININST+10*, ININST+11 | 
| TIUINST | ININST+7~, ININST+8*, ININST+11 | 
| TIUJ | PUTLIST+1~, PUTLIST+8*, PUTLIST+10, PUTLIST+11 | 
| TIULI | ADDELMNT+2~, ADDELMNT+14* | 
| TIULST4 | ADDELMNT+1~, ADDELMNT+18*, ADDELMNT+38 | 
| TIUORDER | PUTLIST+1~, PUTLIST+5*, PUTLIST+12, SETLIST~, SETLIST+4 | 
| TIUPICK | PUTLIST+1~, PUTLIST+6*, PUTLIST+15 | 
| TIUPREF | GATHER~, GATHER+3, PUTLIST~, PUTLIST+3, PUTLIST+5 | 
| TIUQ | GATHER+2~, GATHER+12*, GATHER+13, PUTLIST+1~, PUTLIST+7*, PUTLIST+8, PUTLIST+10, PUTLIST+11 | 
| >> TIURBLD | PUTLIST+24 | 
| TIUREC | ADDELMNT+2~, ADDELMNT+36*, ADDELMNT+37*, ADDELMNT+38*, ADDELMNT+39*, ADDELMNT+40*, ADDELMNT+41*, ADDELMNT+42*, ADDELMNT+43*, ADDELMNT+44* , ADDELMNT+45*, ADDELMNT+46*, ADDELMNT+47*, ADDELMNT+48 | 
| TIUS | INSTATUS+2~, INSTATUS+4*, INSTATUS+5* | 
| TIUSFLD | GATHER+2~, GATHER+3*, GATHER+4*, GATHER+12, PUTLIST+1~, PUTLIST+3*, PUTLIST+4*, PUTLIST+11 | 
| TIUSTAT | INSTATUS+2~, INSTATUS+4*, INSTATUS+6 | 
| TIUSTATE | INSTATUS+2~, INSTATUS+3*, INSTATUS+6 | 
| TIUSTN | ADDELMNT+1~, ADDELMNT+32*, ADDELMNT+33 | 
| TIUTYP | INTYPES+1~, INTYPES+2*, INTYPES+3, INTYPES+5 | 
| TIUY | INTYPES+1~*, INTYPES+3*, INTYPES+4, INTYPES+5*, INTYPX, INSTATUS+2~*, INSTATUS+4, INSTATUS+6*, INSTATUS+7, ININST+7~* , ININST+9, ININST+11*, ININST+12, DADINTYP+2~*, DADINTYP+4, DADINTYP+5*, DADINTYP+6 | 
| U | GATHER+3, INTYPES+5, INSTATUS+3, ININST+8, DADINTYP+3, DADINTYP+5, PUTLIST+3, PUTLIST+5, PUTLIST+13, ADDELMNT+11 , ADDELMNT+13, ADDELMNT+18, ADDELMNT+19, ADDELMNT+20, ADDELMNT+21, ADDELMNT+22, ADDELMNT+25, ADDELMNT+26, ADDELMNT+28, ADDELMNT+29 , ADDELMNT+31, ADDELMNT+32, ADDELMNT+33, ADDELMNT+50, ADDELMNT+58 | 
| >> VALM("RM" | ADDELMNT+56 | 
| VALMCNT | PUTLIST+2*, PUTLIST+12, PUTLIST+13, PUTLIST+15, PUTLIST+18, PUTLIST+19*, SETLIST~, SETLIST+9, ADDELMNT+60* | 
| >> VALMHDR | PUTLIST+17, ADDELMNT+61 | 
| >> VALMSG | ADDELMNT+57* |