TIUSRVLL ; SLC/JER - Server functions for LOCAL lists ;7/16/01
Source file <TIUSRVLL.m>
Package | Total | Call Graph |
---|---|---|
Text Integration Utility | 4 | SETPARM^TIULE $$CANDO^TIULP APTCL^TIUSRVLL APTCL^TIUSRVLP |
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 3 | TIULA2 TIUROR TIUSRVLL |
Name | Comments | DBIA/ICR reference |
---|---|---|
REPLACE(TIUDA,DATTIM,EXPAND,FORGETAD) | ; Populate ^TMP("TIUREPLACE",$J) with
|
|
ACLPT(ARRAY,CLASS,DFN,TIME1,TIME2,OCCLIM,SEQUENCE) | ; Signed,
|
|
SETARRY(ARRAY,TIUORDER) | ; Set ARRAY(SUB)=DA, which is passed
|
|
APTCL(ARRAY,CLASS,TIUAUTH,DFN,TIME1,TIME2,SEQUENCE,TIUEXPKD) | ; Signed, by author
|
|
LIST(TIUY,CLASS,DFN,EARLY,LATE) | ; Build List user can select from to browse
|
|
ACLSB(ARRAY,CLASS,SIGNEDBY,DFN,TIME1,TIME2,SEQUENCE,TIUEXPKD) | ; Signed, by author
|
|
ACLAU(ARRAY,CLASS,AUTHOR,DFN,TIME1,TIME2,SEQUENCE,TIUEXPKD) | ; Unsigned
|
|
CONTEXT(TIUY,CLASS,CONTEXT,DFN,EARLY,LATE,PERSON,OCCLIM,SEQUENCE,TIUEXPKD) | ; main
; --- Call with: TIUY - Return array, pass by reference ; CLASS - Pointer to TIU DOCUMENT DEFINITION #8925.1 ; CONTEXT - 1=All Signed (by PT), ; - 2="Unsigned (by PT&(AUTHOR!TANSCRIBER)) ; - 3="Uncosigned (by PT&EXPECTED COSIGNER ; - 4="Signed notes (by PT&selected author) ; - 5="Signed notes (by PT&date range) ; DFN - Pointer to Patient (#2) ; [EARLY] - FM date/time to begin search ; [LATE] - FM date/time to end search ; [PERSON] - Pointer to file 200 (DUZ if not passed) ; [OCCLIM] - Occurrence Limit (optional) ; [SEQUENCE] - "A"=ascending (Regular date/time) (dflt) ; - "D"=descending (Reverse date/time) ; [TIUEXPKD] - Return array, pass by ref. ; TIUEXPKD(IFN)="", where we will expand IFN ; so ID kids/adda that meet criteria are ; displayed under it. |
|
GATHER(TIUY,DFN,CLASS,TIUI) | ; Find/sort records for the list to browse
|
|
ACLEC(ARRAY,CLASS,EXCOSIGN,DFN,TIME1,TIME2,SEQUENCE,TIUEXPKD) | ; Uncosigned
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TIU(8925 - [#8925] | LIST+6, GATHER+3, GATHER+5!, GATHER+6, CONTEXT+36, CONTEXT+41, CONTEXT+48, ACLPT+4, ACLPT+10, ACLPT+11 , REPLACE+9, REPLACE+10, REPLACE+11, REPLACE+12, REPLACE+13, REPLACE+14, REPLACE+31, REPLACE+32, REPLACE+34, ACLAU+3 , ACLAU+8, ACLAU+9, ACLEC+3, ACLEC+8, ACLSB+3, ACLSB+8, APTCL+3, APTCL+8, APTCL+9, APTCL+11 |
^TMP("TIUREPLACE" | ACLPT+3!, ACLPT+8, ACLPT+17!, SETARRY+11, SETARRY+13, REPLACE+19, REPLACE+20*, REPLACE+21*, REPLACE+25, REPLACE+26* , REPLACE+27*, REPLACE+36, REPLACE+37*, REPLACE+38*, REPLACE+40, REPLACE+41*, REPLACE+42*, ACLAU+2!, ACLAU+14!, ACLEC+2! , ACLEC+11!, ACLSB+2!, ACLSB+11!, APTCL+2!, APTCL+15! |
^TMP("TIUYARRAY" | SETARRY+15* |
^TMP("TIUYLIST" | GATHER+8* |
Name | Line Occurrences |
---|---|
ACLAU | CONTEXT+35, CONTEXT+36 |
ACLEC | CONTEXT+40, CONTEXT+41 |
ACLPT | CONTEXT+31 |
GATHER | LIST+6 |
REPLACE | ACLPT+14, ACLAU+12, ACLEC+9, ACLSB+9, APTCL+13 |
SETARRY | ACLPT+16, ACLAU+13, ACLEC+10, ACLSB+10, APTCL+14 |
Name | Field # of Occurrence |
---|---|
^(0 | GATHER+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDMGPNT | REPLACE+8~, REPLACE+31*, REPLACE+32*, REPLACE+33, REPLACE+34, REPLACE+35, REPLACE+36, REPLACE+37 |
ADDMPRNT | REPLACE+8~, REPLACE+12*, REPLACE+13*, REPLACE+14, REPLACE+18, REPLACE+29, REPLACE+30, REPLACE+31, REPLACE+40, REPLACE+41 |
ARRAY | ACLPT~, ACLPT+16, SETARRY~, ACLAU~, ACLAU+13, ACLEC~, ACLEC+10, ACLSB~, ACLSB+10, APTCL~ , APTCL+14 |
AUTHOR | ACLAU~, ACLAU+3 |
CLASS | LIST~, LIST+6, GATHER~, GATHER+3, GATHER+5, CONTEXT~, CONTEXT+21, CONTEXT+31, CONTEXT+35, CONTEXT+36 , CONTEXT+40, CONTEXT+41, CONTEXT+47, CONTEXT+48, ACLPT~, ACLPT+4, ACLAU~, ACLAU+3, ACLEC~, ACLEC+3 , ACLSB~, ACLSB+3, APTCL~, APTCL+3 |
CONTEXT | CONTEXT~, CONTEXT+20, CONTEXT+30, CONTEXT+33, CONTEXT+38, CONTEXT+43 |
DA | ACLPT+2~, ACLPT+9*, ACLPT+10, ACLPT+11, ACLPT+14, ACLAU+1~, ACLAU+7*, ACLAU+8, ACLAU+9, ACLAU+12 , ACLEC+1~, ACLEC+7*, ACLEC+8, ACLEC+9, ACLSB+1~, ACLSB+7*, ACLSB+8, ACLSB+9, APTCL+1~, APTCL+7* , APTCL+8, APTCL+9, APTCL+11, APTCL+13 |
DATTIM | ACLPT+2~, ACLPT+5*, ACLPT+8*, ACLPT+9, ACLPT+10, ACLPT+14, SETARRY+8~, SETARRY+9*, SETARRY+11*, SETARRY+13 , REPLACE~, REPLACE+19, REPLACE+20, ACLAU+1~, ACLAU+4*, ACLAU+6*, ACLAU+7, ACLAU+8, ACLAU+9, ACLAU+12 , ACLEC+1~, ACLEC+4*, ACLEC+6*, ACLEC+7, ACLEC+8, ACLEC+9, ACLSB+1~, ACLSB+4*, ACLSB+6*, ACLSB+7 , ACLSB+8, ACLSB+9, APTCL+1~, APTCL+4*, APTCL+6*, APTCL+7, APTCL+8, APTCL+13 |
DFN | LIST~, LIST+6, GATHER~, GATHER+3, GATHER+5, CONTEXT~, CONTEXT+27*, CONTEXT+31, CONTEXT+34, CONTEXT+35 , CONTEXT+36*, CONTEXT+39, CONTEXT+40, CONTEXT+41*, CONTEXT+44, CONTEXT+47, CONTEXT+48*, ACLPT~, ACLPT+4, ACLAU~ , ACLAU+3, ACLEC~, ACLEC+3, ACLSB~, ACLSB+3, APTCL~, APTCL+3 |
DUZ | CONTEXT+24 |
EARLY | LIST~, LIST+4*, LIST+6, CONTEXT~, CONTEXT+22*, CONTEXT+28*, CONTEXT+31, CONTEXT+35, CONTEXT+36, CONTEXT+40 , CONTEXT+41, CONTEXT+47, CONTEXT+48 |
EXCOSIGN | ACLEC~, ACLEC+3 |
EXPAND | REPLACE~, REPLACE+17*, REPLACE+24*, REPLACE+30*, REPLACE+35* |
EXPAND( | REPLACE+24*, REPLACE+30*, REPLACE+35* |
FORGETAD | REPLACE~, REPLACE+30 |
GPDATTIM | REPLACE+8~, REPLACE+34*, REPLACE+36, REPLACE+37 |
IDPRNT | REPLACE+8~, REPLACE+9*, REPLACE+10*, REPLACE+11, REPLACE+18, REPLACE+23, REPLACE+24, REPLACE+25, REPLACE+26 |
LATE | LIST~, LIST+5*, CONTEXT~, CONTEXT+23*, CONTEXT+28*, CONTEXT+31, CONTEXT+35, CONTEXT+36, CONTEXT+40, CONTEXT+41 , CONTEXT+47, CONTEXT+48 |
OCCLIM | CONTEXT~, CONTEXT+26*, CONTEXT+31, ACLPT~, ACLPT+8 |
PDATTIM | REPLACE+8~, REPLACE+11*, REPLACE+14*, REPLACE+25, REPLACE+26, REPLACE+40, REPLACE+41 |
PERSON | CONTEXT~, CONTEXT+24*, CONTEXT+35, CONTEXT+36, CONTEXT+40, CONTEXT+41, CONTEXT+47, CONTEXT+48 |
ROOT | ACLPT+2~, ACLPT+4*, ACLPT+8, ACLPT+9, ACLPT+10, ACLAU+1~, ACLAU+3*, ACLAU+6, ACLAU+7, ACLAU+8 , ACLAU+9, ACLEC+1~, ACLEC+3*, ACLEC+6, ACLEC+7, ACLEC+8, ACLSB+1~, ACLSB+3*, ACLSB+6, ACLSB+7 , ACLSB+8, APTCL+1~, APTCL+3*, APTCL+6, APTCL+7, APTCL+8 |
SEQUENCE | CONTEXT~, CONTEXT+25*, CONTEXT+31, CONTEXT+35, CONTEXT+36, CONTEXT+40, CONTEXT+41, CONTEXT+47, CONTEXT+48, ACLPT~ , ACLPT+7, ACLAU~, ACLAU+5, ACLEC~, ACLEC+5, ACLSB~, ACLSB+5, APTCL~, APTCL+5 |
SIGNEDBY | ACLSB~, ACLSB+3 |
SUB | SETARRY+8~, SETARRY+10*, SETARRY+14*, SETARRY+15 |
TIME1 | ACLPT~, ACLPT+5, ACLAU~, ACLAU+4, ACLEC~, ACLEC+4, ACLSB~, ACLSB+4, APTCL~, APTCL+4 |
TIME2 | ACLPT~, ACLPT+8, ACLAU~, ACLAU+6, ACLEC~, ACLEC+6, ACLSB~, ACLSB+6, APTCL~, APTCL+6 |
TIUAUTH | APTCL~, APTCL+10 |
TIUCNT | LIST+1~, LIST+4*, GATHER+7*, GATHER+8 |
TIUCONT | LIST+2~ |
TIUDA | GATHER+1~, GATHER+2*, GATHER+3*, GATHER+4, GATHER+5, GATHER+6, GATHER+8, SETARRY+8~, SETARRY+12*, SETARRY+13* , SETARRY+15, REPLACE~, REPLACE+9, REPLACE+12, REPLACE+19, REPLACE+20 |
TIUDT | LIST+1~ |
TIUEXPKD | CONTEXT~, CONTEXT+35, CONTEXT+36, CONTEXT+40, CONTEXT+41, ACLAU~, ACLAU+12, ACLEC~, ACLEC+9, ACLSB~ , ACLSB+9, APTCL~, APTCL+13 |
TIUI | LIST+1~, LIST+5*, LIST+6*, GATHER~, GATHER+3, GATHER+5 |
TIUJ | LIST+1~ |
TIUK | LIST+1~ |
TIUORDER | ACLPT+2~, ACLPT+7*, ACLPT+16, SETARRY~, SETARRY+14, ACLAU+1~, ACLAU+5*, ACLAU+13, ACLEC+1~, ACLEC+5* , ACLEC+10, ACLSB+1~, ACLSB+5*, ACLSB+10, APTCL+1~, APTCL+5*, APTCL+14 |
TIUP | LIST+1~ |
TIUPRM0 | LIST+1~, LIST+3, GATHER+4 |
TIUPRM1 | LIST+1~ |
TIUPRM3 | LIST+2~ |
TIUQ | LIST+1~ |
TIUREC | LIST+1~ |
TIUS | LIST+2~ |
TIUS12 | APTCL+1~, APTCL+9*, APTCL+10 |
TIUS15 | APTCL+1~, APTCL+11*, APTCL+12 |
TIUSTAT | LIST+2~ |
TIUT | LIST+2~ |
TIUTP | LIST+2~ |
TIUTYPE | LIST+2~ |
TIUY | LIST~, LIST+6, GATHER~, GATHER+8*, CONTEXT~, CONTEXT+19!*, CONTEXT+31, CONTEXT+35, CONTEXT+36, CONTEXT+40 , CONTEXT+41, CONTEXT+47, CONTEXT+48 |
U | GATHER+4, GATHER+6, REPLACE+12, ACLAU+8, APTCL+10, APTCL+12 |
XREF | LIST+2~ |