Routine: INHMS

Package	Total	Call Graph
IHS Generic Interface System	5	EXPAND^INHMS1 (ERR,LIST,POST)^INHMS2 $$QUITDWL^INHMS3 ($$SRCHSIZE,GATHER)^INHMS4 $$SC^INHUTIL1
Uncategorized	4	^DWC MS^DWD ^DWL $$CR^UTSRD
VA Fileman	2	^DIC ^DIK
Kernel	1	ABASK^XGABAR

Package	Total	Caller Graph
IHS Generic Interface System	5	INHERR INHES2 INHOU1 INHOU4 INHOU8

Entry Points

Name	Comments	DBIA/ICR reference
INKINDA(INDA)	; Clean-up search criteria storage data ; MODULE NAME: INKINDA ( Search Criteria Clean-up Routine ) ; DESCRIPTION: Cleans up the Search Criteria Data in the ^DIZ global ; by using the ^DIK routine. ; RETURN = none ; PARAMETERS: ; INDA = Unique IEN into ^DIZ used to store Search Criteria Data ; CODE BEGINS
SEARCH	; Search/List/Output INTHU messages that match a search criteria ; MODULE NAME: SEARCH ( Interface Message Search Routine ) ; DESCRIPTION: Prompts the user for search criteria to be used ; to find matches in the Interface Message Queue ; file (^INTHU). 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
BGNSRCH(INMSGFND,INKINDA,INDA,INPARM2)	; 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 = A NAME of an array in which to build a list(in ; subscript/selection order) of the selected items IEN's ; into ^INTHU ; INKINDA = 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 = Set to the node into ^DIZ(4001.1) where the selected ; search criteria is setup. ; INPARM2 = 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)" ; CODE BEGINS

External References

Name	Field # of Occurrence
^DIC	BGNSRCH+43
^DIK	INKINDA+9
^DWC	BGNSRCH+51
MS^DWD	BGNSRCH+55
^DWL	BGNSRCH+64
EXPAND^INHMS1	BGNSRCH+65
ERR^INHMS2	BGNSRCH+40, BGNSRCH+43, BGNSRCH+53
LIST^INHMS2	BGNSRCH+62
POST^INHMS2	SEARCH+18
$$QUITDWL^INHMS3	BGNSRCH+64
$$SRCHSIZE^INHMS4	BGNSRCH+55
GATHER^INHMS4	BGNSRCH+54
$$SC^INHUTIL1	BGNSRCH+40
$$CR^UTSRD	BGNSRCH+55
ABASK^XGABAR	BGNSRCH+72

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIZ(4001.1 - [#4001.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIZ(4001.1 - [#4001.1]	BGNSRCH+46, BGNSRCH+48, BGNSRCH+53, INKINDA+9

Label References

Name	Line Occurrences
$$BGNSRCH	SEARCH+18
INKINDA	SEARCH+19, BGNSRCH+52, BGNSRCH+53, BGNSRCH+55, BGNSRCH+62, BGNSRCH+81

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	BGNSRCH+44, INKINDA+9~
DIC	BGNSRCH+37~, BGNSRCH+43*
DIC(0	BGNSRCH+43*
DIE	BGNSRCH+37~, BGNSRCH+51*
DIK	INKINDA+9~*
DIPA	BGNSRCH+37~
>> DLAYGO	BGNSRCH+43*
DUZ	BGNSRCH+43, BGNSRCH+79
>> DWASK	BGNSRCH+50*
>> DWFILE	BGNSRCH+52
DWL	BGNSRCH+37~, BGNSRCH+61, BGNSRCH+63, BGNSRCH+64*
DWL("MORE"	BGNSRCH+61*
DWL("TITLE"	BGNSRCH+60*
DWLB	BGNSRCH+37~, BGNSRCH+61*
DWLHOT	BGNSRCH+37~
DWLHOT(	BGNSRCH+57*
DWLMK	BGNSRCH+37~, BGNSRCH+67, BGNSRCH+69!, BGNSRCH+70, BGNSRCH+77
DWLMK(	BGNSRCH+80
DWLMK1	BGNSRCH+37~, BGNSRCH+69!
DWLMK2	BGNSRCH+37~
DWLMSG	BGNSRCH+37~
DWLR	BGNSRCH+36~, BGNSRCH+64, BGNSRCH+65, BGNSRCH+66, BGNSRCH+67, BGNSRCH+68, BGNSRCH+69
DWLRF	BGNSRCH+36~, BGNSRCH+61*, BGNSRCH+62, BGNSRCH+64, BGNSRCH+79, BGNSRCH+80, BGNSRCH+83
DWN	BGNSRCH+37~, BGNSRCH+51*
IND	BGNSRCH+36~, BGNSRCH+54, BGNSRCH+62
INDA	SEARCH+12~, SEARCH+18, SEARCH+19, BGNSRCH~, BGNSRCH+38, BGNSRCH+43, BGNSRCH+44, BGNSRCH+46, BGNSRCH+48, BGNSRCH+52 , BGNSRCH+53, BGNSRCH+54, BGNSRCH+55, BGNSRCH+62, BGNSRCH+81, INKINDA~, INKINDA+8*, INKINDA+9
INERRTYP	BGNSRCH+37~
INERRTYP("CONTINUE"	BGNSRCH+39*, BGNSRCH+55, BGNSRCH+62, BGNSRCH+83
INERRTYP("CREATION"	BGNSRCH+39*, BGNSRCH+43
INERRTYP("CRITERIA"	BGNSRCH+39*, BGNSRCH+53
INERRTYP("EXIT"	BGNSRCH+39*, BGNSRCH+52
INERRTYP("SYSTEM"	BGNSRCH+39*, BGNSRCH+40
INFNDNAM	SEARCH+12~, SEARCH+13~, SEARCH+18
INHOTOPT	BGNSRCH+67~, BGNSRCH+68, BGNSRCH+70~
INKINDA	BGNSRCH~, BGNSRCH+38*, BGNSRCH+52, BGNSRCH+53, BGNSRCH+55, BGNSRCH+62, BGNSRCH+81
INL	BGNSRCH+36~, BGNSRCH+62
INM	BGNSRCH+36~
INMSGFND	BGNSRCH~, BGNSRCH+78, BGNSRCH+79*, BGNSRCH+80
INMSGSZ	BGNSRCH+37~, BGNSRCH+55*
INNODE	BGNSRCH+36~, BGNSRCH+57, BGNSRCH+80
INPARM2	SEARCH+12~, SEARCH+18, BGNSRCH~
INPARM2("BAR"	BGNSRCH+72*
INPARM2("HOT"	BGNSRCH+57, BGNSRCH+58, BGNSRCH+67, BGNSRCH+68, BGNSRCH+70
INPARM2("INHELP"	SEARCH+15*, BGNSRCH+63, BGNSRCH+66
INPARM2("TITLE"	SEARCH+17, BGNSRCH+58, BGNSRCH+60
INQUIT	SEARCH+12~, SEARCH+18*, BGNSRCH+36~, BGNSRCH+62
INRVSRCH	BGNSRCH+36~, BGNSRCH+54, BGNSRCH+62
INSELECT	SEARCH+12~
INSRCH	BGNSRCH+36~, BGNSRCH+54, BGNSRCH+55, BGNSRCH+62
INSRCHCT	BGNSRCH+36~, BGNSRCH+62*
INTEMP	BGNSRCH+36~
INUQUIT	BGNSRCH+36~, BGNSRCH+52*
U	BGNSRCH+61, BGNSRCH+68, BGNSRCH+79
X	BGNSRCH+36~, BGNSRCH+43, BGNSRCH+55, INKINDA+9~
XBABPOP	BGNSRCH+37~
XGABESCF	BGNSRCH+37~, BGNSRCH+72
>> XGABPOP	BGNSRCH+72
Y	BGNSRCH+36~, BGNSRCH+43

Customize PDF page

Package: IHS Generic Interface System

Routine: INHMS

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 5

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: