TIULA1 ; SLC/JER - More interactive functions ;4/18/03
Source file <TIULA1.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 9 | TIULA TIUR TIUR3 TIURS TIURS1 TIUSRVD TIUSRVL TIUSRVL1 ^TIU(8925.8 |
Order Entry Results Reporting | 1 | ORCNOTE |
Name | Comments | DBIA/ICR reference |
---|---|---|
TRAVERSE(DA,RETURN,PARM,TYPE) | ; Select Document Type(s)
|
|
ASKSIG() | ; Prompt for ES, return encrypted data
|
|
ASKX | ||
ASKSUBJ() | ; Handle query by subject
|
|
ASKLOC() | ; Handle query by location
|
|
TYPMATCH(TYPE,CURTYP) | ; Check for type match
|
|
DOCLIST(CLASS,Y,PARM,DFLT) | ; Get preferred documents for user
|
|
SELCAT(Y,PARM,DFLT,TIUOVER) | ; Get preferred documents for user
|
|
DICLOOK(CATEGORY,SCREEN) | ; Call ^DIC to get category value
|
|
LOOK(LOOKUP) | ; Execute LOOKUP CODE
|
|
GETVSIT(DFN) | ; Visit selection code
|
|
GETTERM(X) | ; Get Lexicon term
|
|
GETDIV() | ; Get Institution Number and Name
|
|
MULTDIV() | ; User selects from active divisions
|
Name | Field # of Occurrence |
---|---|
^DIC | DICLOOK+5, GETTERM+3 |
^DIR | MULTDIV+5 |
$$PERSNAME^TIULC1 | DOCLIST+17 |
$$PNAME^TIULC1 | DOCLIST+12 |
BADSIG^TIULG | ASKSIG+2 |
$$DATE^TIULS | GETVSIT+5 |
$$UPPER^TIULS | ASKSUBJ+3 |
$$READ^TIUU | ASKSUBJ+2, ASKLOC+2, GETTERM+5 |
MAIN^TIUVISIT | GETVSIT+3 |
$$PRIM^VASITE | GETDIV+2 |
$$SITE^VASITE | GETDIV+3 |
EN^XQORM | TRAVERSE+7, DOCLIST+21, SELCAT+14 |
SIG^XUSESIG | ASKSIG+2 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(43 - [#43] | GETDIV+2 |
^DISV( | TRAVERSE+5, DOCLIST+5, DOCLIST+6, SELCAT+6, SELCAT+7 |
^TIU(8925.1 - [#8925.1] | TRAVERSE+6, TRAVERSE+11 |
^TIU(8925.8 - [#8925.8] | SELCAT+34, SELCAT+35, SELCAT+36 |
^TIU(8925.98 - [#8925.98] | DOCLIST+2, DOCLIST+7, DOCLIST+8 |
^VA(200 - [#200] | ASKSIG+3 |
^XUTL("XQORM" | DOCLIST+3 |
Name | Line Occurrences |
---|---|
$$DICLOOK | SELCAT+38 |
$$LOOK | SELCAT+39 |
$$MULTDIV | GETDIV+2 |
ASKX | ASKSIG+2 |
TRAVERSE | TRAVERSE+11 |
Name | Field # of Occurrence |
---|---|
^(0 | DOCLIST+8 |
^(20 | ASKSIG+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
C | TRAVERSE+1~ |
CATEGORY | DICLOOK~, DICLOOK+2, DICLOOK+3 |
CATLOOK | SELCAT+1~, SELCAT+36*, SELCAT+38, SELCAT+39 |
CATREC | SELCAT+1~, SELCAT+34*, SELCAT+38, SELCAT+40 |
CATSCRN | SELCAT+1~, SELCAT+35*, SELCAT+38 |
CATVAL | SELCAT+1~, SELCAT+37*, SELCAT+38*, SELCAT+39*, SELCAT+40 |
CLASS | DOCLIST~, DOCLIST+2, DOCLIST+10, DOCLIST+12 |
CURTYP | TYPMATCH~, TYPMATCH+2, TYPMATCH+3 |
DA | TRAVERSE~, TRAVERSE+3, TRAVERSE+5, TRAVERSE+6 |
DFLT | DOCLIST~, DOCLIST+4, DOCLIST+5*, DOCLIST+6*, DOCLIST+8, SELCAT~, SELCAT+5, SELCAT+6*, SELCAT+7*, SELCAT+9 |
DFN | GETVSIT~, GETVSIT+2*, GETVSIT+3 |
DIC | DICLOOK+1~, DICLOOK+2*, GETTERM+1~, GETTERM+2* |
DIC("A" | DICLOOK+3*, GETTERM+2* |
DIC(0 | DICLOOK+2*, GETTERM+2* |
DIR | MULTDIV+1~ |
DIR("A" | MULTDIV+3* |
DIR("S" | MULTDIV+4* |
DIR(0 | MULTDIV+2* |
>> DIROUT | DICLOOK+5* |
>> DUOUT | DICLOOK+5 |
DUZ | TRAVERSE+5, ASKSIG+3, DOCLIST+2, DOCLIST+5, DOCLIST+6, DOCLIST+17, SELCAT+6, SELCAT+7 |
ESNAME | ASKSIG+1~, ASKSIG+3*, ASKSIG+4 |
ESTITLE | ASKSIG+1~, ASKSIG+3*, ASKSIG+4 |
I | TRAVERSE+1~, TRAVERSE+9*, TRAVERSE+10 |
>> J | TRAVERSE+10*, TRAVERSE+11 |
LEVEL | TRAVERSE+1~*, TRAVERSE+8 |
LISTNAME | DOCLIST+12~*, DOCLIST+13, DOCLIST+14*, DOCLIST+15, DOCLIST+16*, DOCLIST+18*, DOCLIST+19 |
LOOKUP | LOOK~, LOOK+2 |
>> ORVP | SELCAT+10, GETVSIT+2 |
PARM | TRAVERSE~, TRAVERSE+3, TRAVERSE+11, DOCLIST~, DOCLIST+7, SELCAT~, SELCAT+8 |
PERSNAME | DOCLIST+12~, DOCLIST+17*, DOCLIST+18 |
RETURN | TRAVERSE~, TRAVERSE+11 |
RETURN( | TRAVERSE+8* |
SCREEN | DICLOOK~, DICLOOK+4 |
TIUDA | DOCLIST+1~, DOCLIST+2*, DOCLIST+3, DOCLIST+7, DOCLIST+8, SELCAT+1~, SELCAT+33*, SELCAT+34, SELCAT+35, SELCAT+36 |
TIUDIV | GETDIV+1~, GETDIV+2*, GETDIV+3 |
TIUHOLD | SELCAT+2~, SELCAT+24* |
TIUHOLD( | SELCAT+26, SELCAT+27, SELCAT+28 |
TIUI | TYPMATCH+1~, TYPMATCH+3*, SELCAT+1~, SELCAT+3*, SELCAT+32*, SELCAT+33, SELCAT+40, SELCAT+41 |
TIUOVER | SELCAT~, SELCAT+21* |
TIUSTN | GETDIV+1~, GETDIV+3*, GETDIV+4, GETDIV+5 |
TIUT1 | SELCAT+2~, SELCAT+17*, SELCAT+18*, SELCAT+19, SELCAT+20, SELCAT+25*, SELCAT+26*, SELCAT+27, SELCAT+28 |
TIUT2 | SELCAT+2~, SELCAT+25*, SELCAT+28, SELCAT+29, SELCAT+30* |
TIUTSTR | SELCAT+2~, SELCAT+17*, SELCAT+19*, SELCAT+20*, SELCAT+21, SELCAT+23 |
TIUY | TYPMATCH+1~*, TYPMATCH+2*, TYPMATCH+3*, TYPMATCH+4 |
TYPE | TRAVERSE~, TRAVERSE+2*, TRAVERSE+11, TYPMATCH~, TYPMATCH+2, TYPMATCH+3 |
U | TRAVERSE+6, TRAVERSE+10, TRAVERSE+11, ASKSIG+3, ASKSIG+4, DOCLIST+7, DOCLIST+8, SELCAT+33, SELCAT+38, SELCAT+40 , DICLOOK+2, DICLOOK+3, GETVSIT+5, GETTERM+6, GETDIV+2, GETDIV+4, GETDIV+5 |
USEX | GETTERM+1~, GETTERM+5*, GETTERM+6 |
X | ASKSIG+2*, DOCLIST+1~, DOCLIST+9*, SELCAT+1~, SELCAT+11*, DICLOOK+1~, DICLOOK+5, LOOK+1~, GETVSIT+1~, GETTERM~ , GETTERM+4, GETTERM+5, GETTERM+6, MULTDIV+1~ |
>> X1 | ASKSIG+2 |
XQORM | TRAVERSE+1~, TRAVERSE+3*, DOCLIST+1~, DOCLIST+2*, DOCLIST+3, DOCLIST+5, DOCLIST+6, SELCAT+1~, SELCAT+4*, SELCAT+6 , SELCAT+7 |
XQORM("A" | TRAVERSE+6*, DOCLIST+10*, SELCAT+12* |
XQORM("B" | TRAVERSE+5*, DOCLIST+8*, DOCLIST+9, SELCAT+9*, SELCAT+11 |
XQORM("H" | TRAVERSE+4*, DOCLIST+19*, SELCAT+13* |
XQORM("S" | DOCLIST+20*, SELCAT+10* |
XQORM(0 | TRAVERSE+3*, TRAVERSE+4, TRAVERSE+6, DOCLIST+7*, DOCLIST+9, DOCLIST+10, DOCLIST+11, SELCAT+8*, SELCAT+11, SELCAT+12 , SELCAT+13 |
Y | TRAVERSE+1~, TRAVERSE+8, ASKSIG+1~*, ASKSIG+4*, ASKX, ASKSUBJ+1~, ASKSUBJ+2*, ASKSUBJ+3, ASKLOC+1~, ASKLOC+2* , ASKLOC+3, DOCLIST~, DOCLIST+3*, SELCAT~, SELCAT+24!, SELCAT+29*, SELCAT+41*, DICLOOK+1~, DICLOOK+6, LOOK+1~ , LOOK+3, GETVSIT+1~, GETVSIT+3, GETVSIT+4*, GETVSIT+5*, GETVSIT+6, GETTERM+1~, GETTERM+4, GETTERM+6*, GETTERM+7 , GETDIV+1~, GETDIV+5*, GETDIV+7*, GETDIV+8, MULTDIV+1~, MULTDIV+6 |
Y( | TRAVERSE+9, TRAVERSE+10, SELCAT+18, SELCAT+19, SELCAT+20, SELCAT+28*, SELCAT+32, SELCAT+33, SELCAT+40*, SELCAT+41! |
Y("" | SELCAT+23 |
Y("VISIT" | GETVSIT+4 |