Kernel Toolkit 7.3 APIs Banner
Office of Information and Technology (OIT) Banner
[skip navigation]

LKUP^XTLKMGR(): General Lookup Facility for MTLU

Reference Type: Supported, Category: Toolkit—Multi-Term Look-Up (MTLU), ICR#: 10153

Description

The LKUP^XTLKMGR API adds terms and synonyms to the LOCAL SYNONYM (#8984.3) file.

Format

  LKUP^XTLKMGR(fil,xtlkx[,xtlksay][,xtlkhlp][,xtlkmore])

Make sure to perform the following steps before calling this API:

  1. NEW all non-namespaced variables.

  2. Set all input variables.

  3. Call the API.

Input Parameters

fil:

(required) Target file (must be defined in the LOCAL LOOKUP (#8984.4) file.
xtlkx:

(required) Word or phrase to use in lookup.
xtlksay:

(optional) -1, 0, or 1 (default=1). Set to “0” to minimize, “-1” to prevent screen display, “1” or “” for full screen (normal) display.

NOTE: The purpose of XTLKSAY is to control the degree of output to the screen, not the amount of “file information” displayed.

If screen displays are turned off, MTLU matches can be processed by checking the count in ^TMP(“XTLKHITS”,$J). ^TMP(“XTLKHITS”,$J,count)=IEN of the entry in the target file. ^TMP(“XTLKHITS”) should be killed after processing.
xtlkhlp:

(optional) The lookup was successful.
xtlkmore:

(optional) Set to “1” to continue with FileMan search (default=1).

 

Output Variables

Y=-1:

File not defined in the LOCAL LOOKUP (#8984.4) file.
Y=N^S:

N is the internal entry number (IEN) of the entry in the file and S is the value of the .01 field for that entry.
Y=N^S^1:

N and S are defined as above and the 1 indicates that this entry has just been added to the file.

Example 1

Caption: LKUP^XTLKMGR API—Example 1: Standard Lookup; Single term entered

VAH,MTL>D LKUP^XTLKMGR(80,”MALIG”)
( MALIG/MALIGNANT )
..........................................................................
..........................................................................
...........................................

The following 443 matches were found:

   1: 140.1 (MAL NEO LOWER VERMILION)
       MALIGNANT NEOPLASM OF LOWER LIP, VERMILION BORDER

   2: 140.3 (MAL NEO UPPER LIP, INNER)
       MALIGNANT NEOPLASM OF UPPER LIP, INNER ASPECT

   3: 140.4 (MAL NEO LOWER LIP, INNER)
       MALIGNANT NEOPLASM OF LOWER LIP, INNER ASPECT

   4: 140.5 (MAL NEO LIP, INNER NOS)
       MALIGNANT NEOPLASM OF LIP, UNSPECIFIED, INNER ASPECT

   5: 140.6 (MAL NEO LIP, COMMISSURE)
       MALIGNANT NEOPLASM OF COMMISSURE OF LIP

Press <RET> or Select 1-5: ^
...Nothing selected. Attempting Fileman lookup.

NOTE: Pressing the <Enter> key continues listing the MTLU matches. If no selection is made, MTLU initiates a standard VA FileMan lookup (using all available cross-references).

Example 2

Caption: LKUP^XTLKMGR API—Example 2: Standard Lookup; Multiple terms entered

VAH,MTL>D LKUP^XTLKMGR(80,”MALIGNANCY OF THE LIP”)


(LIP/LIPIDOSES/LIPODYSTROPHY/LIPOID/LIPOMA/LIPOPROTEIN/LIPOTROPIC/LIPS MALIGNAN/MALIGNANT)

The following words were not used in this search:
     OF
     THE
............

The following 12 matches were found:

   1: 140.1 (MAL NEO LOWER VERMILION)
       MALIGNANT NEOPLASM OF LOWER LIP, VERMILION BORDER

   2: 140.3 (MAL NEO UPPER LIP, INNER)
       MALIGNANT NEOPLASM OF UPPER LIP, INNER ASPECT

   3: 140.4 (MAL NEO LOWER LIP, INNER)
       MALIGNANT NEOPLASM OF LOWER LIP, INNER ASPECT

   4: 140.5 (MAL NEO LIP, INNER NOS)
       MALIGNANT NEOPLASM OF LIP, UNSPECIFIED, INNER ASPECT

   5: 140.6 (MAL NEO LIP, COMMISSURE)
       MALIGNANT NEOPLASM OF COMMISSURE OF LIP


Press <RET> or Select 1-5: ^
...Nothing selected. Attempting Fileman lookup. ??

Example 3

Caption: LKUP^XTLKMGR API—Example 3: Display minimized by setting the 3rd parameter = 0

VAH,MTL>S XTLKX=“MALIGNANCY OF THE LIP”

VAH,MTL>D LKUP^XTLKMGR(80,XTLKX,0)

The following 12 matches were found:

   1: 140.1 (MAL NEO LOWER VERMILION)
       MALIGNANT NEOPLASM OF LOWER LIP, VERMILION BORDER

   2: 140.3 (MAL NEO UPPER LIP, INNER)
       MALIGNANT NEOPLASM OF UPPER LIP, INNER ASPECT

   3: 140.4 (MAL NEO LOWER LIP, INNER)
       MALIGNANT NEOPLASM OF LOWER LIP, INNER ASPECT

   4: 140.5 (MAL NEO LIP, INNER NOS)
       MALIGNANT NEOPLASM OF LIP, UNSPECIFIED, INNER ASPECT

   5: 140.6 (MAL NEO LIP, COMMISSURE)
       MALIGNANT NEOPLASM OF COMMISSURE OF LIP


Press <RET> or Select 1-5: ^ <Enter> ??
VAH,MTL>

Example 4

Caption: LKUP^XTLKMGR API—Example 4: MTLU with screen display turned off

VAH,MTL>D LKUP^XTLKMGR(80,XTLKX,-1)


VAH,MTL>D ^%G

Global ^TMP(“XTLKHITS”,$J
        TMP(“XTLKHITS”,$J
^TMP(“XTLKHITS”,591795907) = 12
^TMP(“XTLKHITS”,591795907,1) = 167
                                ^
 ------------------------------ |--------------------------
| NOTE:                                                    |
|                                                          |
|“167” is the IEN of the target file.                      |
|^ICD9(167,0) = 140.1^Y^MAL NEO LOWER VERMILION^^3^^^^     |
|^ICD9(167,1) = MALIGNANT NEOPLASM OF LOWER LIP, VERMILION |
|BORDER                                                    |
|^ICD9(167,”DRG”) = 64^^ VERMILION^^3^^^^                  |
 ----------------------------------------------------------
 
^TMP(“XTLKHITS”,591795907,2) = 168
^TMP(“XTLKHITS”,591795907,3) = 169
^TMP(“XTLKHITS”,591795907,4) = 170
^TMP(“XTLKHITS”,591795907,5) = 171
^TMP(“XTLKHITS”,591795907,6) = 172
^TMP(“XTLKHITS”,591795907,7) = 173
^TMP(“XTLKHITS”,591795907,8) = 220
^TMP(“XTLKHITS”,591795907,9) = 221
^TMP(“XTLKHITS”,591795907,10) = 8595
^TMP(“XTLKHITS”,591795907,11) = 8623
^TMP(“XTLKHITS”,591795907,12) = 8624