; Search/List/Output INTHER errors that match a search criteria
; MODULE NAME: SEARCH ( Interface Error Search Routine )
; DESCRIPTION: Prompts the user for search criteria to be used
; to find matches in the Interface Error File
; file (^INTHER). The user is presented with a list
; of matching items which can be selectively expanded
; or printed(user chosen device). The user is then
; brought back to the Search Criteria menu and can
; continue with another search or exit with the F10 key.
; RETURN = none
; PARAMETERS = none
; CODE BEGINS
IHSJUMP
;IHS jumps here to bypass windowman calls
BGNSRCH(INMSGFND,INKINDA,INDA,INPARM2,SUMMARY)
; Begin a search
; MODULE NAME: BGNSRCH ( Programmers entry point )
; DESCRIPTION: Same fuctionality as SEARCH^INHMS but only executes
; a single pass. This would be useful for a programmers
; interface because an array is loaded with the selected
; items and could be used for other processing needs. An
; Action-Bar can be added to the process by setting the
; fourth parameter to the name of the Action-Bar.
; RETURN = 0 = "CONTINUE" The program completed properly
; 1 = "EXIT" The user exited ^DWC
; 2 = "SYSTEM" The incorrect system
; 3 = "CREATION" The entry to store the search criteria could
; not be created
; 4 = "CRITERIA" The required search criteria was not entered
; PARAMETERS:
; INMSGFND(PBR) = A NAME of an array in which to build a list(in
; subscript/selection order) of the selected items IEN's
; into ^INTHU
; INKINDA(PBV) = Flag used to initiate the call to INKINDA(INDA) to do
; cleanup of the ^DIZ global if set to 0 after the search
; or let the calling routine call INKINDA(INDA).
; INDA(PBR) = Set to the node into ^DIZ(4001.1) where the selected
; search criteria is setup.
; INPARM2(PBR) = Structure nodes as follows:
; "HELP" = Executable M code used for the List Processor HELP
; "TITLE" = Executable M code use for the List Processor Title
; "BAR" = A NAME of an Action-Bar to be called immediately after
; all the items in the list have been selected. The
; structure passed is to be updated with the XGABESCF and
; XGABPOP nodes upon exiting. The calling routine must
; evaluate the appropriate structure nodes to determine
; the action to be taken
; "BAR","XGABESCF" & "BAR","XGABPOP" set after bar is run
; "HOT",x ="string indicating the function of the key^ret. value"
; "HOT",x,"ACTION" ="Executable M code used on key selection)"
; "SUMMARY" = 1 : SUMMARY REPORT, 0 : NORMAL REPORT
; CODE BEGINS