TIURECL1 ; SLC/PKR,JER - Expand/collapse LM views ;31-Aug-2011 17:38;DU
Source file <TIURECL1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ISSUB(CLASS1,CLASS2,LEVEL) | ;Return true if CLASS2 is sub to CLASS1.
|
|
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. |
|
GETTL(TIUD0,PREFIX) | ; Get title column data; put updated prefix
|
|
SETTLPT(STRING,DA,PREFIX) | ; Set field TITLE or PATIENT into string,
|
|
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' |
|
GETPT(TIUD0,PREFIX) | ; Get patient column data; put updated prefix data
|
|
RESOLVEX |
Name | Field # of Occurrence |
---|---|
$$HASIDKID^TIUGBR | IDDATA+13 |
$$PREFIX^TIULA2 | RESOLVE+13 |
$$PERSNAME^TIULC1 | RESOLVE+38, RESOLVE+39 |
$$PNAME^TIULC1 | GETTL+5, GETTL+6 |
$$PTNAME^TIULC1 | GETPT+5 |
DOCPRM^TIULC1 | IDDATA+17 |
$$POSSPRNT^TIULP | IDDATA+14 |
$$DATE^TIULS | RESOLVE+33, RESOLVE+35, RESOLVE+46, RESOLVE+47, RESOLVE+49, RESOLVE+52 |
$$NAME^TIULS | RESOLVE+40, RESOLVE+43, RESOLVE+44, GETPT+5 |
$$HRCN^TIUR2 | RESOLVE+26 |
$$SETFLD^VALM1 | RESOLVE+63, RESOLVE+65, SETTLPT+11, SETTLPT+15 |
MSG^VALM10 | VEXREQ+33 |
$$LOW^XLFSTR | RESOLVE+54 |
$$NS^XUAF4 | RESOLVE+58 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^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+54 |
^TMP("TIUR" | RESOLVE+43, RESOLVE+46 |
^TMP("TIURIDX" | VEXREQ+27, VEXREQ+29 |
^XUSEC("TIU VIEWALL" | RESOLVE+28, RESOLVE+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+33* |
AMD | RESOLVE+5~, RESOLVE+38*, RESOLVE+40* |
AUT | RESOLVE+5~, RESOLVE+39*, RESOLVE+43*, RESOLVE+44* |
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+35* |
>> DFN | RESOLVE+26* |
DIC | RESOLVE+5~ |
DIQ | RESOLVE+5~ |
DOC | RESOLVE+6~, RESOLVE+16*, SETTLPT+6~, SETTLPT+13*, SETTLPT+14*, SETTLPT+15 |
DR | RESOLVE+5~ |
DUZ | RESOLVE+28, RESOLVE+29 |
DUZ(2 | RESOLVE+26 |
EDT | RESOLVE+5~, RESOLVE+46*, RESOLVE+47* |
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 |
HRCN | RESOLVE+26~*, RESOLVE+27, RESOLVE+28, RESOLVE+29 |
>> 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+56*, RESOLVE+59*, RESOLVE+60* |
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+35* |
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+51*, RESOLVE+52* |
START | VEXREQ+3~, VEXREQ+4*, VEXREQ+6, VEXREQ+10 |
STATX | RESOLVE+6~, RESOLVE+54* |
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+26 , RESOLVE+33, RESOLVE+35, RESOLVE+51, RESOLVE+54, GETPT~, GETPT+5, GETTL~, GETTL+5, GETTL+6, SETTLPT+6~ , SETTLPT+7*, SETTLPT+9, SETTLPT+13 |
TIUD12 | RESOLVE+6~, RESOLVE+9*, RESOLVE+38, RESOLVE+39, RESOLVE+57, RESOLVE+58 |
TIUD13 | RESOLVE+6~, RESOLVE+10*, RESOLVE+46, RESOLVE+47, RESOLVE+49 |
TIUD15 | RESOLVE+6~, RESOLVE+10*, RESOLVE+51 |
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+64, RESOLVE+65 |
TIUFLDS("ADMI | SSION DATE" , RESOLVE+34* |
TIUFLDS("ATTENDING" | RESOLVE+41* |
TIUFLDS("AUTHOR" | RESOLVE+45* |
TIUFLDS("COSIGNER" | RESOLVE+42* |
TIUFLDS("DICT | DATE" , RESOLVE+50* |
TIUFLDS("DISC | H DATE" , RESOLVE+36* |
TIUFLDS("DIVISION" | RESOLVE+61* |
TIUFLDS("DOCU | MENT TYPE" , RESOLVE+17* |
TIUFLDS("LAST | I/LAST 4" , RESOLVE+32* |
TIUFLDS("LINE | COUNT" , RESOLVE+37* |
TIUFLDS("PATI | ENT NAME" , RESOLVE+22* |
TIUFLDS("REF | DATE" , RESOLVE+48* |
TIUFLDS("SIG | DATE" , RESOLVE+53* |
TIUFLDS("STATUS" | RESOLVE+55* |
TIUFLDS("TITLE" | RESOLVE+18* |
TIUGDATA | IDDATA+9~, IDDATA+12*, IDDATA+20*, IDDATA+21 |
TIUI | RESOLVE+6~, RESOLVE+62*, RESOLVE+64*, RESOLVE+65 |
TIULI | RESOLVE+6~, RESOLVE+20* |
TIULST4 | RESOLVE+5~, RESOLVE+27*, RESOLVE+28* |
TIUP | RESOLVE+6~ |
TIUR | RESOLVE+5~ |
TIUSTN | RESOLVE+7~, RESOLVE+58*, RESOLVE+59 |
TIUY | RESOLVE+6~, RESOLVE+8*, RESOLVE+62*, RESOLVE+63*, RESOLVE+65*, RESOLVEX, GETPT+4~, GETPT+5*, GETPT+6*, GETPT+7 , GETTL+4~, GETTL+5*, GETTL+6*, GETTL+7*, GETTL+8 |
TSTART | RESOLVE~, RESOLVE+63 |
U | VEXREQ+27, VEXREQ+28, VEXREQ+29, VEXREQ+30, IDDATA+18, IDDATA+20, RESOLVE+16, RESOLVE+21, RESOLVE+26, RESOLVE+33 , RESOLVE+35, RESOLVE+38, RESOLVE+39, RESOLVE+46, RESOLVE+47, RESOLVE+49, RESOLVE+51, RESOLVE+54, RESOLVE+57, RESOLVE+58 , RESOLVE+59, 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+65 |
>> VALMDDF("PATI | ENT NAME" , RESOLVE+16, SETTLPT+8 |
VALMY | VEXREQ~ |
VALMY( | VEXREQ+14, VEXREQ+20 |
VALMY("" | VEXREQ+4, VEXREQ+5 |
XDT | RESOLVE+5~, RESOLVE+49* |
XIDDATA | RESOLVE~, RESOLVE+12* |