Routine: INHES2

Name	Comments	DBIA/ICR reference
NP	; New page
INSUMP(INSRCH,INAR,INKA)	;Summary routine ; ; Description: The INSUM is used to search global ^INTHER Interface ; Error File. Get the count for each group of the ; error messages according to select text length. It ; also calculate the count, save the IEN for the first ; and the last occurence for each group of the messages. ; ; Return: None
INSUM(INSRCH,INAR)	;Summary routine ; ; Description: ; The INSUM is used to search global ^INTHER Interface Error File ; from the start date to the end/date. It will group the error ; messages according to the text length, report the count for each ; group. It also collects details for the first and last occurences ; of each group occurs and of error messages such as: Transaction type, ; Message ID, Error loc, Destination and Background process.
SEARCH	; Search/List/Output INTHER errors that match a search criteria ; Module Name: SEARCH ( Interface Error Search Routine )
GETERR(INKA,INKD)	; get error messages ; ; Description: The GETERR is used to given the IEN for the first and ; last occurance in INKA array, get details for the error ; messages such as: Transaction Type, Destination, Message ; ID, Error location, Background process and store in ; display array INKD parameter. ; Return: None ; ; Parameters: ; INKA = array of IEN for the first and last occuence ; INKD = display array

Name	Field # of Occurrence
DD^%DT	GETERR+21
$$UPCASE^%ZTF	INSUMP+31
$$BGNSRCH^INHERR	SEARCH+20
POST^INHERR2	SEARCH+20
HEADER^INHES	INSUM+28, NP+1
HSET^INHES	INSUM+28
INKINDA^INHMS	SEARCH+21
^UTSRD	INSUM+43

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$G(@INKD@(INX)),?7,INX Line Location: INSUM+31
Function Call: WRITE	Prompt: !?5,$S(INJ=1:"Latest",INJ=2:"Earliest")," occurence: ",$G(@INKD@(INX,INJ)),?45,$E($G(@INKD@(INX,INJ,4)),1,30) Line Location: INSUM+34
Function Call: WRITE	Prompt: !?5,$S(INJ=1:"Earliest",INJ=2:"Latest")," occurence: ",$G(@INKD@(INX,INJ)),?45,$E($G(@INKD@(INX,INJ,4)),1,30) Line Location: INSUM+35
Function Call: WRITE	Prompt: !?5,$E($G(@INKD@(INX,INJ,1)),1,30),?45,$E($G(@INKD@(INX,INJ,2)),1,30) Line Location: INSUM+36
Function Call: WRITE	Prompt: !?5,$E($G(@INKD@(INX,INJ,3)),1,30),?45,$E($G(@INKD@(INX,INJ,5)),1,30),! Line Location: INSUM+37
Function Call: WRITE	Prompt: !!,"TOTAL ERROR : ",$G(INSRCH("FOUND"))," TOTAL SEARCH : ",$G(INSRCH("TOTAL")) Line Location: INSUM+40
Function Call: WRITE	Prompt: !!,$J("",30)_"* End of Report *" Line Location: INSUM+42
Function Call: WRITE	Prompt: ! Line Location: INSUM+43

Name	Line Occurrences (* Changed, ! Killed)
^INRHD - [#4005]	GETERR+27
^INRHT - [#4000]	GETERR+23
^INTHER - [#4003]	GETERR+19, GETERR+21, INSUMP+27, INSUMP+28
^INTHERL - [#4003.1]	GETERR+25
^INTHPC - [#4004]	GETERR+30
^INTHU - [#4001]	GETERR+19

Name	Line Occurrences
GETERR	INSUM+27
INSUMP	INSUM+21
NP	INSUM+31, INSUM+34, INSUM+35, INSUM+36, INSUM+37, INSUM+40

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DUOUT	INSUM+31, INSUM+34, INSUM+35, INSUM+36, INSUM+37, INSUM+40, INSUM+43*, INSUM+44
INAR	INSUM~, INSUM+21, INSUMP~, INSUMP+24, INSUMP+26
>> INBGDPR	GETERR+30*
INDA	SEARCH+14~, SEARCH+20, SEARCH+21
>> INEDEST	GETERR+27*
>> INELOC	GETERR+25*
INENODE	INSUMP+16~, INSUMP+26, INSUMP+27, INSUMP+28
>> INERRTXT	GETERR+19*, GETERR+23, GETERR+25, GETERR+27, GETERR+30
>> INETTYPE	GETERR+23*
>> INEXLN	INSUMP+17, INSUMP+21, INSUMP+31
INFNDNAM	SEARCH+14~, SEARCH+15~, SEARCH+20
>> INIEN	GETERR+17*, GETERR+19, GETERR+21
>> INJ	INSUM+32, INSUM+33, INSUM+34, INSUM+35, INSUM+36, INSUM+37, GETERR+16, GETERR+17, GETERR+21, GETERR+23 , GETERR+25, GETERR+27, GETERR+28, GETERR+30
INKA	INSUM+17~, INSUM+19, INSUM+21, INSUM+27, INSUM+38!, GETERR~, GETERR+15, GETERR+17, INSUMP~, INSUMP+34 , INSUMP+35, INSUMP+37, INSUMP+38
INKD	INSUM+25, INSUM+27, INSUM+30, INSUM+31, INSUM+33, INSUM+34, INSUM+35, INSUM+36, INSUM+37, INSUM+38! , GETERR~, GETERR+17, GETERR+21, GETERR+23, GETERR+25, GETERR+27, GETERR+28, GETERR+30, GETERR+32
>> INLV	INSUMP+28*, INSUMP+29, INSUMP+30
>> INMSGTXT	GETERR+19*, GETERR+23, GETERR+27, GETERR+28
>> INPAGE	INSUM+43
INPARM2	SEARCH+14~, SEARCH+20
INPARM2("HELP"	SEARCH+17*
INPARM2("TITLE"	SEARCH+19*
INQUIT	SEARCH+14~, SEARCH+20*
>> INRVSRCH	INSUM+18*, INSUM+34, INSUM+35
INSELECT	SEARCH+14~
INSRCH	INSUM~, INSUM+21, INSUMP~
INSRCH("FOUND"	INSUM+40
INSRCH("INORDER"	INSUM+18
INSRCH("TEXTLEN"	INSUMP+17
INSRCH("TOTAL"	INSUM+40
INT	GETERR+15, GETERR+17, GETERR+21, GETERR+23, GETERR+25, GETERR+27, GETERR+28, GETERR+30, INSUMP+16~, INSUMP+23 , INSUMP+24*, INSUMP+26
INTIM	INSUMP+16~
INTMPY	GETERR+32~!, INSUMP+34~!
>> INTXT	INSUMP+26, INSUMP+29, INSUMP+30, INSUMP+31, INSUMP+32, INSUMP+35, INSUMP+37, INSUMP+38
>> INX	INSUM+30, INSUM+31, INSUM+33, INSUM+34, INSUM+35, INSUM+36, INSUM+37, INSUMP+26, INSUMP+27, INSUMP+28 , INSUMP+37, INSUMP+38
IO	INSUM+43
IO("Q"	INSUM+43
IO(0	INSUM+43
IOF	INSUM+28
IOSL	NP+1
IOST	INSUM+28, INSUM+43
>> OK	INSUMP+26, INSUMP+27, INSUMP+29
U	GETERR+19, GETERR+23, GETERR+25, GETERR+27, GETERR+28, GETERR+30
>> X	INSUM+43
>> Y	GETERR+21*

Customize PDF page

Package: IHS Generic Interface System

Routine: INHES2

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: