TIURECL1 ; SLC/PKR,JER - Expand/collapse LM views ;5/8/03
Source file <TIURECL1.m>
Package | Total | Call Graph |
---|---|---|
Text Integration Utility | 5 | $$HASIDKID^TIUGBR $$PREFIX^TIULA2 ($$PERSNAME,$$PNAME,$$PTNAME,DOCPRM)^TIULC1 $$POSSPRNT^TIULP ($$DATE,$$NAME)^TIULS |
Kernel | 2 | $$LOW^XLFSTR $$NS^XUAF4 |
List Manager | 2 | $$SETFLD^VALM1 MSG^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 |
---|---|---|
ISSUB(CLASS1,CLASS2,LEVEL) | ;Return true if CLASS2 is sub to CLASS1.
|
|
VEXREQ(VALMY) | ;Check for valid expand/contract requests.
; A list of documents to expand/contract is invalid if any docmt |
|
IDDATA(TIUDA,TIUD0,TIUD21) | ; Return TIUGDATA:
; TIUGDATA = 0 or ; = TIUDA^haskid^IDparent^prmsort, where ; TIUDA = note DA ; haskid = 1 if note has ID kid, else 0 ; IDparent = parent DA if note has ID parent, else 0 ; prmsort = 'TITLE' if entries ordered by title, else 'REFDT' |
|
RESOLVE(DA,TSTART,FIRSTPFX,XIDDATA) | ; Get document data for insertion
; Receives DA, TSTART, FIRSTPFX ; FIRSTPFX = $$INSPFIX of parent of inserted document. ; Returns line TSTART. ; Receives XIDDATA by ref, finds it, and passes it back. |
|
RESOLVEX | ||
GETPT(TIUD0,PREFIX) | ; Get patient column data; put updated prefix data
|
|
GETTL(TIUD0,PREFIX) | ; Get title column data; put updated prefix
|
|
SETTLPT(STRING,DA,PREFIX) | ; Set field TITLE or PATIENT into string,
|
Name | Field # of Occurrence |
---|---|
$$HASIDKID^TIUGBR | IDDATA+13 |
$$PREFIX^TIULA2 | RESOLVE+13 |
$$PERSNAME^TIULC1 | RESOLVE+31, RESOLVE+32 |
$$PNAME^TIULC1 | GETTL+5, GETTL+6 |
$$PTNAME^TIULC1 | GETPT+5 |
DOCPRM^TIULC1 | IDDATA+17 |
$$POSSPRNT^TIULP | IDDATA+14 |
$$DATE^TIULS | RESOLVE+26, RESOLVE+28, RESOLVE+39, RESOLVE+40, RESOLVE+42, RESOLVE+45 |
$$NAME^TIULS | RESOLVE+33, RESOLVE+36, RESOLVE+37, GETPT+5 |
$$SETFLD^VALM1 | RESOLVE+56, RESOLVE+58, SETTLPT+11, SETTLPT+15 |
MSG^VALM10 | VEXREQ+33 |
$$LOW^XLFSTR | RESOLVE+47 |
$$NS^XUAF4 | RESOLVE+51 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | RESOLVE+23 |
^TIU(8925 - [#8925] | VEXREQ+28, VEXREQ+30, IDDATA+10, IDDATA+11, RESOLVE+8, RESOLVE+9, RESOLVE+10, RESOLVE+11, GETTL+6, SETTLPT+7 |
^TIU(8925.6 - [#8925.6] | RESOLVE+47 |
^TMP("TIUR" | RESOLVE+36, RESOLVE+39 |
^TMP("TIURIDX" | VEXREQ+27, VEXREQ+29 |
Name | Line Occurrences |
---|---|
$$GETPT | RESOLVE+19, SETTLPT+9 |
$$GETTL | RESOLVE+14, SETTLPT+13 |
$$IDDATA | RESOLVE+12 |
$$ISSUB | VEXREQ+25 |
RESOLVEX | RESOLVE+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTIND | VEXREQ+8~, VEXREQ+16*, VEXREQ+17 |
ACTION | VEXREQ+8~ |
ACTION( | VEXREQ+18*, VEXREQ+24*, VEXREQ+26, VEXREQ+32 |
ACTJND | VEXREQ+8~, VEXREQ+22*, VEXREQ+23 |
ADT | RESOLVE+5~, RESOLVE+26* |
AMD | RESOLVE+5~, RESOLVE+31*, RESOLVE+33* |
AUT | RESOLVE+5~, RESOLVE+32*, RESOLVE+36*, RESOLVE+37* |
CIND | VEXREQ+8~ |
CIND( | VEXREQ+27*, VEXREQ+28, VEXREQ+29*, VEXREQ+30 |
CLASS1 | ISSUB~, ISSUB+2, ISSUB+5 |
CLASS2 | ISSUB~, ISSUB+2, ISSUB+5 |
CN | VEXREQ+8~ |
CN( | VEXREQ+28*, VEXREQ+30*, VEXREQ+32 |
DA | RESOLVE~, RESOLVE+8, RESOLVE+9, RESOLVE+10, RESOLVE+11, RESOLVE+12, RESOLVE+13, SETTLPT~, SETTLPT+7 |
DDT | RESOLVE+5~, RESOLVE+28* |
DIC | RESOLVE+5~ |
DIQ | RESOLVE+5~ |
DOC | RESOLVE+6~, RESOLVE+16*, SETTLPT+6~, SETTLPT+13*, SETTLPT+14*, SETTLPT+15 |
DR | RESOLVE+5~ |
EDT | RESOLVE+5~, RESOLVE+39*, RESOLVE+40* |
END | VEXREQ+3~, VEXREQ+5*, VEXREQ+6, VEXREQ+10 |
FIRSTPFX | RESOLVE~, RESOLVE+13 |
GETPT | RESOLVE+7~, RESOLVE+19*, RESOLVE+20, RESOLVE+21 |
GETTL | RESOLVE+7~, RESOLVE+14*, RESOLVE+16 |
HASIDKID | IDDATA+9~, IDDATA+13*, IDDATA+14, IDDATA+15, IDDATA+20 |
>> HUSH | VEXREQ+31 |
IND | ISSUB+1~, ISSUB+5*, ISSUB+6, VEXREQ+8~, VEXREQ+10*, VEXREQ+11, VEXREQ+13*, VEXREQ+14*, VEXREQ+15, VEXREQ+16 , VEXREQ+18, VEXREQ+19, VEXREQ+25, VEXREQ+26, VEXREQ+27, VEXREQ+28, VEXREQ+32 |
INSTA | RESOLVE+7~, RESOLVE+49*, RESOLVE+52*, RESOLVE+53* |
ISSUB | ISSUB+1~, ISSUB+4*, ISSUB+7*, ISSUB+8 |
JND | VEXREQ+8~, VEXREQ+19*, VEXREQ+20*, VEXREQ+21, VEXREQ+22, VEXREQ+24, VEXREQ+25, VEXREQ+26, VEXREQ+29, VEXREQ+30 , VEXREQ+32 |
LCT | RESOLVE+5~, RESOLVE+28* |
LEVEL | ISSUB~, VEXREQ+8~, VEXREQ+25 |
LEVEL( | ISSUB+2, ISSUB+6, VEXREQ+11* |
MOM | RESOLVE+5~ |
MSG | VEXREQ+8~, VEXREQ+32*, VEXREQ+33 |
POSSPRNT | IDDATA+9~, IDDATA+12*, IDDATA+14*, IDDATA+15 |
PREFIX | RESOLVE+7~, RESOLVE+13*, RESOLVE+14, RESOLVE+19, GETPT~, GETPT+6, GETTL~, GETTL+7, SETTLPT~, SETTLPT+9 , SETTLPT+13 |
PRMSORT | IDDATA+9~, IDDATA+18*, IDDATA+19*, IDDATA+20 |
PT | RESOLVE+5~, RESOLVE+21*, SETTLPT+6~, SETTLPT+9*, SETTLPT+10*, SETTLPT+11 |
RMD | RESOLVE+5~ |
SDT | RESOLVE+5~, RESOLVE+44*, RESOLVE+45* |
START | VEXREQ+3~, VEXREQ+4*, VEXREQ+6, VEXREQ+10 |
STATX | RESOLVE+6~, RESOLVE+47* |
STRING | SETTLPT~, SETTLPT+11*, SETTLPT+15*, SETTLPT+16 |
TEXT | VEXREQ+8~ |
TEXT( | VEXREQ+15*, VEXREQ+16, VEXREQ+18, VEXREQ+21*, VEXREQ+22, VEXREQ+24 |
TIUD0 | IDDATA~, IDDATA+10*, IDDATA+14, IDDATA+17, RESOLVE+6~, RESOLVE+9*, RESOLVE+12, RESOLVE+14, RESOLVE+19, RESOLVE+23 , RESOLVE+26, RESOLVE+28, RESOLVE+44, RESOLVE+47, GETPT~, GETPT+5, GETTL~, GETTL+5, GETTL+6, SETTLPT+6~ , SETTLPT+7*, SETTLPT+9, SETTLPT+13 |
TIUD12 | RESOLVE+6~, RESOLVE+9*, RESOLVE+31, RESOLVE+32, RESOLVE+50, RESOLVE+51 |
TIUD13 | RESOLVE+6~, RESOLVE+10*, RESOLVE+39, RESOLVE+40, RESOLVE+42 |
TIUD15 | RESOLVE+6~, RESOLVE+10*, RESOLVE+44 |
TIUD21 | IDDATA~, IDDATA+11*, IDDATA+14, IDDATA+15, IDDATA+16, IDDATA+20, RESOLVE+7~, RESOLVE+11*, RESOLVE+12 |
TIUDA | IDDATA~, IDDATA+10, IDDATA+11, IDDATA+13, IDDATA+20 |
TIUDPRM | IDDATA+9~, IDDATA+17 |
TIUDPRM(0 | IDDATA+18 |
TIUFLDS | RESOLVE+6~ |
TIUFLDS( | RESOLVE+57, RESOLVE+58 |
TIUFLDS("ADMI | SSION DATE" , RESOLVE+27* |
TIUFLDS("ATTENDING" | RESOLVE+34* |
TIUFLDS("AUTHOR" | RESOLVE+38* |
TIUFLDS("COSIGNER" | RESOLVE+35* |
TIUFLDS("DICT | DATE" , RESOLVE+43* |
TIUFLDS("DISC | H DATE" , RESOLVE+29* |
TIUFLDS("DIVISION" | RESOLVE+54* |
TIUFLDS("DOCU | MENT TYPE" , RESOLVE+17* |
TIUFLDS("LAST | I/LAST 4" , RESOLVE+25* |
TIUFLDS("LINE | COUNT" , RESOLVE+30* |
TIUFLDS("PATI | ENT NAME" , RESOLVE+22* |
TIUFLDS("REF | DATE" , RESOLVE+41* |
TIUFLDS("SIG | DATE" , RESOLVE+46* |
TIUFLDS("STATUS" | RESOLVE+48* |
TIUFLDS("TITLE" | RESOLVE+18* |
TIUGDATA | IDDATA+9~, IDDATA+12*, IDDATA+20*, IDDATA+21 |
TIUI | RESOLVE+6~, RESOLVE+55*, RESOLVE+57*, RESOLVE+58 |
TIULI | RESOLVE+6~, RESOLVE+20*, RESOLVE+24 |
TIULST4 | RESOLVE+5~, RESOLVE+23*, RESOLVE+24* |
TIUP | RESOLVE+6~ |
TIUR | RESOLVE+5~ |
TIUSTN | RESOLVE+7~, RESOLVE+51*, RESOLVE+52 |
TIUY | RESOLVE+6~, RESOLVE+8*, RESOLVE+55*, RESOLVE+56*, RESOLVE+58*, RESOLVEX, GETPT+4~, GETPT+5*, GETPT+6*, GETPT+7 , GETTL+4~, GETTL+5*, GETTL+6*, GETTL+7*, GETTL+8 |
TSTART | RESOLVE~, RESOLVE+56 |
U | VEXREQ+27, VEXREQ+28, VEXREQ+29, VEXREQ+30, IDDATA+18, IDDATA+20, RESOLVE+16, RESOLVE+21, RESOLVE+23, RESOLVE+26 , RESOLVE+28, RESOLVE+31, RESOLVE+32, RESOLVE+39, RESOLVE+40, RESOLVE+42, RESOLVE+44, RESOLVE+47, RESOLVE+50, RESOLVE+51 , RESOLVE+52, GETPT+5, GETPT+6, GETTL+6, GETTL+7, SETTLPT+10, SETTLPT+14 |
VALID | VEXREQ+8~, VEXREQ+12*, VEXREQ+35*, VEXREQ+36 |
>> VALMAR | VEXREQ+11, VEXREQ+15, VEXREQ+21 |
>> VALMDDF( | RESOLVE+58 |
>> VALMDDF("PATI | ENT NAME" , RESOLVE+16, SETTLPT+8 |
VALMY | VEXREQ~ |
VALMY( | VEXREQ+14, VEXREQ+20 |
VALMY("" | VEXREQ+4, VEXREQ+5 |
XDT | RESOLVE+5~, RESOLVE+42* |
XIDDATA | RESOLVE~, RESOLVE+12* |