TIUBR ; SLC/JER - Browse Action Subroutines ;31-Dec-2012 14:33;DU
Source file <TIUBR.m>
| Package | Total | Call Graph | 
|---|---|---|
| Text Integration Utility | 11 | $$CHKFILE^TIUADCL  (LOADREC,LOADSIG)^TIUBR1  (IDTOP,INQUIRE,LOADID)^TIUGBR  ($$HASADDEN,$$ONBROWSE,$$PNAME)^TIULC1  GETTIU^TIULD  SETPARM^TIULE  $$STATUS^TIULF  $$CANDO^TIULP ($$CENTER,$$DATE,$$NAME)^TIULS $$IDDATA^TIURECL1 GETIDKID^TIURECL2 | 
| IHS Mods To Text Integration Utilities | 2 | ($$BLANKS,LT1,LT2,LT3)^BTIUBR $$DEMOG^BTIUPCC | 
| Registration | 2 | $$SETSTR^VALM1 CLEAN^VALM10 | 
| Package | Total | Caller Graph | 
|---|---|---|
| Text Integration Utility | 4 | TIUBR1 TIUGBR TIUGR1 TIUP149 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ; Entry code for LM templates TIU BROWSE | |
| LOADADD(TIUDADD,TIUL) | ; Load addenda | |
| HDR | ; Build Header | |
| SETREC(TIUGDATA) | ; Sets docmt header line Patname, SSN, [Location, Visit] ; Requires TIUGDATA | |
| BLDTMP(TIUDA) | ; Build ^TMP("TIUVIEW",$J, ; Requires TIUDA = IFN of note selected to be browsed. ; Needs TIUGDATA, set in EN | |
| LOADTOP(TIUREC,TIUDA,TIUL,TIUGDATA) | ; Load dictation, transcription data, etc. ; Requires array TIUREC, TIUDA, array TIUL, TIUGDATA | |
| LOADSUPP(METHOD,TIUDA,TIUL) | ; Execute OnBrowse/Load Supplementary data | |
| SETRX | ||
| CLEAN | ; Die, filthy spawn!!! | |
| LOADKIDS(TIUDA,TIUL,TIUGDATA,TIUGWHOL) | ; Load ID kids of TIUDA ; Requires TIUDA, array TIUL, TIUGDATA | |
| ISCOMP(DA) | ; Evaluate whether a given record is a component | 
| Name | Field # of Occurrence | 
|---|---|
| $$BLANKS^BTIUBR | LOADADD+12 | 
| LT1^BTIUBR | LOADTOP+29, LOADTOP+52 | 
| LT2^BTIUBR | LOADTOP+47 | 
| LT3^BTIUBR | LOADTOP+63 | 
| $$DEMOG^BTIUPCC | SETREC+13 | 
| $$CHKFILE^TIUADCL | LOADTOP+38, LOADTOP+42 | 
| LOADREC^TIUBR1 | BLDTMP+15 | 
| LOADSIG^TIUBR1 | LOADADD+13 | 
| IDTOP^TIUGBR | LOADTOP+19 | 
| INQUIRE^TIUGBR | BLDTMP+7 | 
| LOADID^TIUGBR | LOADKIDS+9 | 
| $$HASADDEN^TIULC1 | LOADTOP+59, SETREC+11 | 
| $$ONBROWSE^TIULC1 | BLDTMP+10 | 
| $$PNAME^TIULC1 | LOADTOP+60 | 
| GETTIU^TIULD | HDR+3 | 
| SETPARM^TIULE | HDR+2 | 
| $$STATUS^TIULF | LOADADD+5 | 
| $$CANDO^TIULP | LOADADD+2 | 
| $$CENTER^TIULS | HDR+4 | 
| $$DATE^TIULS | LOADADD+4, SETREC+17, SETREC+18, SETREC+20 | 
| $$NAME^TIULS | SETREC+3 | 
| $$IDDATA^TIURECL1 | EN+8, LOADKIDS+4 | 
| GETIDKID^TIURECL2 | LOADKIDS+5 | 
| $$SETSTR^VALM1 | LOADTOP+22, LOADTOP+26, LOADTOP+27, LOADTOP+32, LOADTOP+33, LOADTOP+34, LOADTOP+38, LOADTOP+39, LOADTOP+41, LOADTOP+42 , LOADTOP+44, LOADTOP+45, LOADTOP+49, LOADTOP+50, LOADTOP+56, SETREC+3, SETREC+5, SETREC+10, SETREC+11, SETREC+13 , SETREC+15, SETREC+17, SETREC+18, SETREC+20 | 
| CLEAN^VALM10 | CLEAN+1 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^TIU(8925 - [#8925] | BLDTMP+5, BLDTMP+10, BLDTMP+17, LOADTOP+38, LOADTOP+42, LOADTOP+54, LOADTOP+56, LOADTOP+60, LOADKIDS+4, ISCOMP+2 , LOADADD+4, LOADADD+9, LOADADD+12 | 
| ^TIU(8925.1 - [#8925.1] | ISCOMP+3 | 
| ^TMP("TIU FOCUS" | BLDTMP+4!, BLDTMP+6*, BLDTMP+16! | 
| ^TMP("TIUIDKID" | LOADKIDS+7, LOADKIDS+8, LOADKIDS+10! | 
| ^TMP("TIUR" | LOADKIDS+3 | 
| ^TMP("TIUVIEW" | BLDTMP+4!, BLDTMP+17*, BLDTMP+18* | 
| Name | Line Occurrences | 
|---|---|
| $$SETREC | HDR+6 | 
| BLDTMP | EN+9 | 
| LOADSUPP | BLDTMP+11 | 
| LOADTOP | BLDTMP+13 | 
| SETRX | SETREC+9, SETREC+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CANSEE | LOADADD+1~, LOADADD+2*, LOADADD+6, LOADADD+8 | 
| CURCHLD | LOADTOP+2~, LOADTOP+9*, LOADTOP+12*, LOADTOP+15*, LOADTOP+16, LOADTOP+17 | 
| CURPRNT | LOADTOP+2~, LOADTOP+9*, LOADTOP+13*, LOADTOP+14*, LOADTOP+19 | 
| DA | ISCOMP~, ISCOMP+2 | 
| DFN | HDR+1~ | 
| KIDDA | LOADKIDS+2~, LOADKIDS+8*, LOADKIDS+9 | 
| METHOD | LOADSUPP~, LOADSUPP+2 | 
| ONBROWSE | BLDTMP+3~, BLDTMP+10*, BLDTMP+11 | 
| PRMSORT | LOADKIDS+2~, LOADKIDS+3*, LOADKIDS+4*, LOADKIDS+5 | 
| SELCHLD | LOADTOP+2~, LOADTOP+9*, LOADTOP+10*, LOADTOP+12, LOADTOP+13, LOADTOP+17, LOADTOP+18 | 
| SELPRNT | LOADTOP+2~, LOADTOP+9*, LOADTOP+11*, LOADTOP+14, LOADTOP+15, LOADTOP+16, LOADTOP+18 | 
| SHORT | LOADTOP+2~, LOADTOP+9*, LOADTOP+16*, LOADTOP+17*, LOADTOP+19, LOADTOP+25, LOADTOP+30 | 
| TIU | HDR+3, CLEAN+1! | 
| TIU("DOCTYP" | HDR+4 | 
| TIU("EDT" | SETREC+17, SETREC+20 | 
| TIU("HRCN" | SETREC+5 | 
| TIU("LDT" | SETREC+18 | 
| TIU("LOC" | SETREC+15 | 
| TIU("PNM" | SETREC+3 | 
| TIU("WARD" | SETREC+16, SETREC+19 | 
| TIUD0 | LOADKIDS+2~, LOADKIDS+4* | 
| TIUD21 | LOADKIDS+2~, LOADKIDS+4* | 
| TIUDA | EN+8, EN+9, HDR+3, BLDTMP~, BLDTMP+5, BLDTMP+6, BLDTMP+7, BLDTMP+8, BLDTMP+10, BLDTMP+11 , BLDTMP+13, BLDTMP+15, BLDTMP+17, LOADSUPP~, LOADTOP~, LOADTOP+12, LOADTOP+13, LOADTOP+14, LOADTOP+15, LOADTOP+19 , LOADTOP+21, LOADTOP+22, LOADTOP+26, LOADTOP+27, LOADTOP+31, LOADTOP+32, LOADTOP+33, LOADTOP+34, LOADTOP+37, LOADTOP+38 , LOADTOP+39, LOADTOP+41, LOADTOP+42, LOADTOP+43, LOADTOP+44, LOADTOP+45, LOADTOP+49, LOADTOP+50, LOADTOP+54, LOADTOP+56 , LOADTOP+59, LOADTOP+60, LOADKIDS~, LOADKIDS+3, LOADKIDS+4, LOADKIDS+5, LOADKIDS+7, LOADKIDS+8, SETREC+11, SETREC+13 | 
| TIUDADD | BLDTMP+3~*, LOADADD~, LOADADD+2, LOADADD+4, LOADADD+5, LOADADD+9, LOADADD+12, LOADADD+13 | 
| TIUDADT | LOADADD+1~, LOADADD+4*, LOADADD+5 | 
| TIUDTYP | HDR+1~ | 
| TIUGDATA | EN+8*, HDR+6, BLDTMP+13, BLDTMP+15, LOADTOP~, LOADTOP+10, LOADTOP+11, LOADTOP+12, LOADTOP+13, LOADTOP+14 , LOADTOP+15, LOADKIDS~, LOADKIDS+9, SETREC~, SETREC+9, SETREC+10, SETREC+11, CLEAN+1! | 
| TIUGWHOL | LOADTOP+17, LOADKIDS~, LOADKIDS+9 | 
| TIUI | BLDTMP+3~*, LOADSUPP+1~*, LOADSUPP+3*, LOADSUPP+4 | 
| TIUJ | LOADADD+1~, LOADADD+3*, LOADADD+9*, LOADADD+12 | 
| TIUK | LOADKIDS+2~, LOADKIDS+6*, LOADKIDS+7*, LOADKIDS+8 | 
| TIUL | BLDTMP+3~, BLDTMP+11, BLDTMP+13, BLDTMP+15, BLDTMP+18, LOADSUPP~, LOADSUPP+4*, LOADSUPP+5*, LOADTOP~, LOADTOP+19 , LOADTOP+20*, LOADTOP+23, LOADTOP+24*, LOADTOP+28, LOADTOP+35, LOADTOP+36*, LOADTOP+46, LOADTOP+48*, LOADTOP+51, LOADTOP+53* , LOADTOP+54, LOADTOP+57, LOADTOP+58*, LOADTOP+61*, LOADTOP+62*, LOADKIDS~, LOADKIDS+9, LOADADD~, LOADADD+3*, LOADADD+5* , LOADADD+7*, LOADADD+8, LOADADD+10*, LOADADD+12, LOADADD+13 | 
| TIUNAME | BLDTMP+4~ | 
| TIUPRM0 | HDR+2, CLEAN+1! | 
| TIUPRM1 | HDR+2, CLEAN+1! | 
| TIUREC | BLDTMP+3~, BLDTMP+7, BLDTMP+8, BLDTMP+13, LOADTOP~ | 
| TIUREC(8925 | BLDTMP+8, LOADTOP+21, LOADTOP+22, LOADTOP+26, LOADTOP+27, LOADTOP+31, LOADTOP+32, LOADTOP+33, LOADTOP+34, LOADTOP+37 , LOADTOP+38, LOADTOP+39, LOADTOP+41, LOADTOP+42, LOADTOP+43, LOADTOP+44, LOADTOP+45, LOADTOP+49, LOADTOP+50 | 
| TIUTYP | ISCOMP+1~, ISCOMP+2*, ISCOMP+3 | 
| TIUY | EN+1~, LOADSUPP+1~, LOADSUPP+2, LOADSUPP+3, LOADSUPP+4, LOADSUPP+6, LOADTOP+2~, LOADTOP+20*, LOADTOP+22*, LOADTOP+23 , LOADTOP+24*, LOADTOP+26*, LOADTOP+27*, LOADTOP+28, LOADTOP+32*, LOADTOP+33*, LOADTOP+34*, LOADTOP+35, LOADTOP+36*, LOADTOP+38* , LOADTOP+39*, LOADTOP+41*, LOADTOP+42*, LOADTOP+44*, LOADTOP+45*, LOADTOP+46, LOADTOP+48*, LOADTOP+49*, LOADTOP+50*, LOADTOP+51 , LOADTOP+53*, LOADTOP+54, LOADTOP+56*, LOADTOP+57, LOADTOP+58*, LOADTOP+60*, LOADTOP+61, ISCOMP+1~, ISCOMP+3*, ISCOMP+4 | 
| U | HDR+4, BLDTMP+18, LOADTOP+10, LOADTOP+11, LOADTOP+12, LOADTOP+13, LOADKIDS+3, LOADKIDS+4, ISCOMP+3, LOADADD+4 , LOADADD+8, SETREC+9, SETREC+10, SETREC+11, SETREC+15 | 
| >> VALMAR | LOADSUPP+4, LOADSUPP+5, LOADTOP+23, LOADTOP+28, LOADTOP+35, LOADTOP+46, LOADTOP+51, LOADTOP+54, LOADTOP+57, LOADTOP+58 , LOADTOP+61, LOADTOP+62, LOADADD+3, LOADADD+5, LOADADD+8, LOADADD+12 | 
| >> VALMCNT | BLDTMP+18* | 
| VALMHDR | CLEAN+1! | 
| VALMHDR(1 | HDR+4* | 
| VALMHDR(2 | HDR+6* | 
| >> VALMQUIT | BLDTMP+5* | 
| Y | SETREC+2~, SETREC+3*, SETREC+5*, SETREC+10*, SETREC+11*, SETREC+13*, SETREC+15*, SETREC+17*, SETREC+18*, SETREC+20* , SETRX |