Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^TIU(8925.8

Package: Text Integration Utility

Global: ^TIU(8925.8


Information

FileMan FileNo FileMan Filename Package
8925.8 TIU SEARCH CATEGORIES Text Integration Utility

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
Text Integration Utility 6 TIU ENTER/EDIT SEARCH CATEGORY    TIU ENTER/EDIT SURGICAL REPORT    TIUDD8    TIULA1    TIURH    ^TIU(8925.8    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
VA FileMan 1 FILE(#1)[.04]    

Fields, Total: 7

Field # Name Loc Type Details
.01 SEARCH CATEGORY 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • OUTPUT TRANSFORM:  S Y=$$MIXED^TIULS(Y)
  • LAST EDITED:  JUN 16, 1995
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  These are the allowable categories by which you may query for documents (e.g., PATIENT, AUTHOR, EXPECTED COSIGNER, TREATING SPECIALTY, HOSPITAL LOCATION, SUBJECT, SERVICE, PROBLEM, PATIENT STATUS (i.e.,
    Inpatient/Outpatient), etc.).
  • CROSS-REFERENCE:  8925.8^B
    1)= S ^TIU(8925.8,"B",$E(X,1,30),DA)=""
    2)= K ^TIU(8925.8,"B",$E(X,1,30),DA)
.02 CROSS-REFERENCE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1)!('$D(^TIU(8925,X))) X
  • LAST EDITED:  SEP 27, 1995
  • HELP-PROMPT:  Answer must correspond to a valid x-ref in file 8925.
  • DESCRIPTION:  This is the cross-reference which will be searched to identify the corrresponding documents. It must have the structure:
    ^TIU(8925,"",ENTITY,DOCTYP,STATUS,INVDATE,IEN)="" where ENTITY is the object of the search, DOCTYPE is the .01 field value of the record in 8925, STATUS is the value of the .05 field in 8925, and inverse date
    is the inverted reference date (field 1301 in file 8925), computed as 9999999-REFDATE.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  8925.8^C
    1)= S ^TIU(8925.8,"C",$E(X,1,30),DA)=""
    2)= K ^TIU(8925.8,"C",$E(X,1,30),DA)
    This REGULAR FileMan cross-reference is used to map SEARCH CATEGORY to CROSS REFERENCE.
.03 DISPLAY NAME 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
  • LAST EDITED:  SEP 27, 1995
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This is the name of the Search Category as it will be displayed to the user on selection.
  • CROSS-REFERENCE:  8925.8^AM1^MUMPS
    1)= D REDO^TIUDD8
    2)= D REDO^TIUDD8
    This MUMPS-type cross-reference is used to update the timestamp on the search category selection menu when a DISPLAY NAME changes.
.04 ASSOCIATED FILE 0;4 POINTER TO FILE FILE (#1) FILE(#1)

  • LAST EDITED:  SEP 27, 1995
  • HELP-PROMPT:  Select the file to which the category will refer.
  • DESCRIPTION:  
    This is the file on which a look-up will occur in the event that a category is selected (e.g., for category PATIENT, the file should be 2, and for category AUTHOR, the file should be 200).
1 SCREEN 1;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 27, 1995
  • HELP-PROMPT:  This is Standard MUMPS code.
  • DESCRIPTION:  
    This is MUMPS code, which sets the special variable DIC("S"), prior to invoking the look-up on the FILE identified with the category.
    WRITE AUTHORITY: @
2 LOOK-UP CODE 2;E1,245 MUMPS

  • INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
  • LAST EDITED:  SEP 27, 1995
  • HELP-PROMPT:  This is Standard MUMPS code.
  • DESCRIPTION:  
    This code is invoked, if defined, and should behave like a call to ^DIC, setting the variable Y as IFN^VALUE.
    WRITE AUTHORITY: @
99 TIMESTAMP 99;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  JUN 16, 1995
  • HELP-PROMPT:  Enter the $HOROLOG date/time of a change.
  • DESCRIPTION:  
    This field stores the $HOROLOG-formatted date/time for a change to a Search Categories entry.
  • CROSS-REFERENCE:  8925.8^AM^MUMPS
    1)= D SET^TIUDD8
    2)= D KILL^TIUDD8
    This cross-reference invokes menu compilation in ^XUTL("XQORM", DA;TIU(8925.8, when the TIMESTAMP field is modified.

Found Entries, Total: 13

SEARCH CATEGORY: ALL CATEGORIES    SEARCH CATEGORY: AUTHOR    SEARCH CATEGORY: EXPECTED COSIGNER    SEARCH CATEGORY: SUBJECT    SEARCH CATEGORY: SERVICE    SEARCH CATEGORY: TREATING SPECIALTY    SEARCH CATEGORY: TRANSCRIPTIONIST    SEARCH CATEGORY: PATIENT    
SEARCH CATEGORY: VISIT    SEARCH CATEGORY: PROBLEM    SEARCH CATEGORY: HOSPITAL LOCATION    SEARCH CATEGORY: TITLE    SEARCH CATEGORY: DIVISION    

External References

Name Field # of Occurrence
^DIM 1+1, 2+1
KILL^TIUDD8 99(XREF 1K)
REDO^TIUDD8 .03(XREF 1S), .03(XREF 1K)
SET^TIUDD8 99(XREF 1S)
$$ASKSUBJ^TIULA1 2(IEN:4)
$$GETDIV^TIULA1 2(IEN:13)
$$GETTERM^TIULA1 2(IEN:10)
$$GETVSIT^TIULA1 2(IEN:9)
TITLE^TIULA3 2(IEN:12)
$$MIXED^TIULS .01OT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] .02+1
^TIU(8925.8 - [#8925.8] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)
>> DIC("S" 1(IEN:3)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .02(XREF 1S), .02(XREF 1K), .03+1!, 1+1!, 2+1!, 99+1!
>> Y .01OT+1*, 2(IEN:1), 2(IEN:4), 2(IEN:9), 2(IEN:10), 2(IEN:13)
>> Y(0 .01OT+1*
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables  | All