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* |