$ListLup

<section begin="desc" />Locate string in $list, searching backwards<section end="desc" />

Most Sirius $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $ListLup function is the LocateUp (Stringlist function).

This function locates a specified string in a $list, searching the $list items in reverse order.

The $ListLup function accepts six arguments and returns a numeric result.

Syntax

<section begin="syntax" /> %RESULT = $ListLup(list_identifier, start, search_string, - start_col, end_col, case_ignore) <section end="syntax" />

$ListLup Function

%RESULT is set to the item number of the first item in the $list going backwards from the starting item number that matches the search criteria, or it is set to a negative number if an error has occurred.

• The first argument is the identifier of the $list in which a string is to be located. This is a required argument.
• The second argument is the item number at which the search is to begin. If this argument is not specified searching begins at the last item in the $list.
• The third argument is the string to be located. If this argument is not specified, all $list items are considered to contain the search string.
• The fourth argument is a number that specifies the starting column of a range of columns in which the search string must be located or a string containing the name of an image item in the image associated with the $list using $ListImg (:hdref refid=listimg.). In the latter case, the start column for the search is the position of the image item in the image. This is an optional argument and defaults to 1.
• The fifth argument is a number that specifies the ending column of a range of columns in which the search string must be located. This is an optional argument and defaults to one of the following values:
  • if the fourth argument specifies an image item name, the position of the end of the image item in the image
  • otherwise, 6124 for Sirius Mods Version 6.2 and later, and 4096 before.

  If the sixth argument is a non-zero integer, then the width of the column range is reduced to a maximum of 256.

• The sixth argument is an indicator for case-insensitive comparisons. If this argument is a non-zero integer, the string comparisons use $list item data translated to uppercase (hence your search string should be passed as an uppercase value). This is an optional argument and defaults to zero. If the sixth argument is 1, then the width of the column range is reduced to a maximum of 256.

-5 - Required argument not specified -6 - $List identifier invalid -7 - Item number not found in $list -8 - String not found (if $list empty, -7) -9 - Invalid column range

$ListLup Error Codes

The following code locates a string anywhere in a $list item, searching backwards starting at item 100.

%NUM = $ListLup(%LIST, 100, 'VIETNAMERICA')

In the following code, an image is associated with the $list, items are added to the $list from the image and then the $list is searched backwards from the last item for an item that contains a particular value in the columns associated with a specific image item.

IMAGE CUST LNAME IS STRING LEN 30 FNAME IS STRING LEN 30 ID IS STRING LEN 9 END IMAGE PREPARE IMAGE CUST %LIST = $ListNew %RC = $ListImg(%LIST, %CUST:LAME) . . . . . FOR EACH RECORD IN LCUST . . . . . %RC = $ListAddI(%LIST) . . . . . END FOR . . . . . %ITEMNUM = $ListLup(%LIST, , %LOCID, 'ID')

• Sirius functions
• Fast/Unload User Language Interface
• Janus Open Client
• Janus Open Server
• Janus Sockets
• Janus Web Server
• Japanese functions
• Sir2000 Field Migration Facility

Products authorizing $ListLup