TIUBR ; SLC/JER - Browse Action Subroutines ;8/16/06 09:08
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 |
List Manager | 2 | $$SETSTR^VALM1 CLEAN^VALM10 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Entry code for LM templates TIU BROWSE
|
|
HDR | ; Build Header
|
|
BLDTMP(TIUDA) | ; Build ^TMP("TIUVIEW",$J,
; Requires TIUDA = IFN of note selected to be browsed. ; Needs TIUGDATA, set in EN |
|
LOADSUPP(METHOD,TIUDA,TIUL) | ; Execute OnBrowse/Load Supplementary data
|
|
LOADTOP(TIUREC,TIUDA,TIUL,TIUGDATA) | ; Load dictation, transcription data, etc.
; Requires array TIUREC, TIUDA, array TIUL, TIUGDATA |
|
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
|
|
LOADADD(TIUDADD,TIUL) | ; Load addenda
|
|
SETREC(TIUGDATA) | ; Sets docmt header line Patname, SSN, [Location, Visit]
; Requires TIUGDATA |
|
SETRX | ||
CLEAN | ; Die, filthy spawn!!!
|
Name | Field # of Occurrence |
---|---|
$$CHKFILE^TIUADCL | LOADTOP+37, LOADTOP+41 |
LOADREC^TIUBR1 | BLDTMP+15 |
LOADSIG^TIUBR1 | LOADADD+12 |
IDTOP^TIUGBR | LOADTOP+19 |
INQUIRE^TIUGBR | BLDTMP+7 |
LOADID^TIUGBR | LOADKIDS+9 |
$$HASADDEN^TIULC1 | LOADTOP+56, SETREC+10 |
$$ONBROWSE^TIULC1 | BLDTMP+10 |
$$PNAME^TIULC1 | LOADTOP+57 |
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+13, SETREC+14, SETREC+16 |
$$NAME^TIULS | SETREC+3 |
$$IDDATA^TIURECL1 | EN+8, LOADKIDS+4 |
GETIDKID^TIURECL2 | LOADKIDS+5 |
$$SETSTR^VALM1 | LOADTOP+22, LOADTOP+26, LOADTOP+27, LOADTOP+31, LOADTOP+32, LOADTOP+33, LOADTOP+37, LOADTOP+38, LOADTOP+40, LOADTOP+41 , LOADTOP+43, LOADTOP+44, LOADTOP+47, LOADTOP+48, LOADTOP+53, SETREC+3, SETREC+4, SETREC+9, SETREC+10, SETREC+11 , SETREC+13, SETREC+14, SETREC+16 |
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+37, LOADTOP+41, LOADTOP+51, LOADTOP+53, LOADTOP+57, LOADKIDS+4, ISCOMP+2 , LOADADD+4, LOADADD+9, LOADADD+11 |
^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* |
>> | 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+29 |
TIU | HDR+3, CLEAN+1! |
TIU("DOCTYP" | HDR+4 |
TIU("EDT" | SETREC+13, SETREC+16 |
TIU("LDT" | SETREC+14 |
TIU("LOC" | SETREC+11 |
TIU("PNM" | SETREC+3 |
TIU("SSN" | SETREC+4 |
TIU("WARD" | SETREC+12, SETREC+15 |
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+30, LOADTOP+31, LOADTOP+32, LOADTOP+33, LOADTOP+36, LOADTOP+37 , LOADTOP+38, LOADTOP+40, LOADTOP+41, LOADTOP+42, LOADTOP+43, LOADTOP+44, LOADTOP+47, LOADTOP+48, LOADTOP+51, LOADTOP+53 , LOADTOP+56, LOADTOP+57, LOADKIDS~, LOADKIDS+3, LOADKIDS+4, LOADKIDS+5, LOADKIDS+7, LOADKIDS+8, SETREC+10 |
TIUDADD | BLDTMP+3~*, LOADADD~, LOADADD+2, LOADADD+4, LOADADD+5, LOADADD+9, LOADADD+11, LOADADD+12 |
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+8, SETREC+9, SETREC+10, 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+11 |
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+34, LOADTOP+35*, LOADTOP+45, LOADTOP+46*, LOADTOP+49, LOADTOP+50* , LOADTOP+51, LOADTOP+54, LOADTOP+55*, LOADTOP+58*, LOADTOP+59*, LOADKIDS~, LOADKIDS+9, LOADADD~, LOADADD+3*, LOADADD+5* , LOADADD+7*, LOADADD+8, LOADADD+10*, LOADADD+11, LOADADD+12 |
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+30, LOADTOP+31, LOADTOP+32, LOADTOP+33, LOADTOP+36 , LOADTOP+37, LOADTOP+38, LOADTOP+40, LOADTOP+41, LOADTOP+42, LOADTOP+43, LOADTOP+44, LOADTOP+47, LOADTOP+48 |
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+31*, LOADTOP+32*, LOADTOP+33*, LOADTOP+34, LOADTOP+35*, LOADTOP+37* , LOADTOP+38*, LOADTOP+40*, LOADTOP+41*, LOADTOP+43*, LOADTOP+44*, LOADTOP+45, LOADTOP+46*, LOADTOP+47*, LOADTOP+48*, LOADTOP+49 , LOADTOP+50*, LOADTOP+51, LOADTOP+53*, LOADTOP+54, LOADTOP+55*, LOADTOP+57*, LOADTOP+58, 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+8, SETREC+9, SETREC+10, SETREC+11 |
>> VALMAR | LOADSUPP+4, LOADSUPP+5, LOADTOP+23, LOADTOP+28, LOADTOP+34, LOADTOP+45, LOADTOP+49, LOADTOP+51, LOADTOP+54, LOADTOP+55 , LOADTOP+58, LOADTOP+59, LOADADD+3, LOADADD+5, LOADADD+8, LOADADD+11 |
>> VALMCNT | BLDTMP+18* |
VALMHDR | CLEAN+1! |
VALMHDR(1 | HDR+4* |
VALMHDR(2 | HDR+6* |
>> VALMQUIT | BLDTMP+5* |
Y | SETREC+2~, SETREC+3*, SETREC+4*, SETREC+9*, SETREC+10*, SETREC+11*, SETREC+13*, SETREC+14*, SETREC+16*, SETRX |