Routine: INHMGD1

Information

INHMGD1 ;CAR; 15 May 97 12:22;HL7 MESSAGING - MANAGEMENT OF DATA SOURCES

Source Information

Source file <INHMGD1.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
IHS Generic Interface System	3	PAGE1^INHMGD11 SEG^INHMGD2 $$SC^INHUTIL1
Uncategorized	1	$$CR^UTSRD

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
IHS Generic Interface System	5	INHMGD INHMGD11 INHMGD2 INHMGD3 INHMGD4

Entry Points

Name	Comments	DBIA/ICR reference
HDR2	;Header 2 ; No Parameters. ; Output: ; generates a DATA line for writing by WRITE^INHMGD1, with the ; segment column labels. Used after the segment header and on each ; page after the page header. ; 12,"-" CHCS 11,"-"
IN(INDA,INP)	;Entere here with INDA= ien of message to process one message. ; Input: ; INDA = Internal Entry Number (IEN) of message ; INP = Flag, +INP>0 means create tab-delimited output, ; for exporting to desk-top applications, like MS-Access. ; Also, $E(INP,2,999) contains tab delimited Message and ; Segment information. Will be copied to INPDATA for printing.
WRITE	;output a line ; Input: ; DATA = passed globally, is a quoted line for use with W @DATA
HEADER	;output header in local array INHDR(x) ; No Parameters. ; Description: The function HEADER is used to display the header ; when reaching the end of the page/screen, and give ; the user the option to continue or to abort.
DASH(QTY,CH)	;Extrensic. Creates QTY copies of CH ; Inputs: ; QTY = numeric integer, how many copies of CH do you want in the ; output string. ; CH = character you want repeated. defaults to "-", hence the ; name DASH, but " " or anything else is ok. ; Output:
LKPRM(INX)	;Extrensic. Converts lookup parameter F,L,N,O & P to long form
HSET	;set up header ; No Parameters. ; Description: The function HSET is used to set up the header with ; the current page and current date/time. ; Return: ; globally creates the INHDR array, containing quoted DATA strings ; for use by WRITE^INHMGD1.
YN(INV,INN)	;Extrensic. Converts "" and 0 to NO and 1 to YES ; Inputs: ; INV = the value ["",0,1] to be converted to YES/NO or Y/N ; INN = control: 1 for "YES"/"NO", 0 for "Y"/"N"

External References

Name	Field # of Occurrence
PAGE1^INHMGD11	IN+39
SEG^INHMGD2	IN+53
$$SC^INHUTIL1	IN+33
$$CR^UTSRD	HEADER+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: HEADER+12
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+15
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+17
Function Call: WRITE	Prompt: !,?ING,@INHDR(INA) Line Location: HEADER+18
Function Call: WRITE	Prompt: @DATA Line Location: WRITE+2
Function Call: WRITE	Prompt: !,?ING,@DATA Line Location: WRITE+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	IN+26
^INTHL7M - [#4011]	IN+11, IN+41, IN+48, IN+50, IN+51

Label References

Name	Line Occurrences
$$DASH	HSET+11, HDR2+18
HDR2	HEADER+21
HEADER	WRITE+6
HSET	IN+38
WRITE	HDR2+12, HDR2+17, HDR2+18

Naked Globals

Name	Field # of Occurrence
^("GL"	IN+26

Local Variables

Name	Field # of Occurrence
CH	DASH~, DASH+8*
DASH	DASH+8~*, DASH+9
DATA	HDR2+7~, HDR2+10, HDR2+11, HDR2+13, HDR2+14, HDR2+15, HDR2+16, HDR2+18, WRITE+7
FIELD	IN+15~
FILE	IN+15~, IN+25*, IN+26, IN+53
FILE(0	IN+26*
FLVL	IN+15~, IN+22*, IN+53
IDENT	IN+15~, IN+22*
INA	HEADER+6~, HEADER+18*
>> INALL	IN+13
>> INAM	IN+44*
INAUDIT	IN+15~, IN+33*
INDA	IN~, IN+8, IN+9
INDATA	IN+16~
INDB	IN+16~
INDTY	IN+16~
>> INERN	IN+53
INEX	IN+16~
>> INEXIT	IN+34, IN+48, IN+50, HEADER+8, HEADER+14, HEADER+15, WRITE+4
>> ING	HEADER+18, WRITE+7
>> INHDR	IN+39
>> INHDR(	HEADER+18
>> INHDR(1	HSET+9*
>> INHDR(2	HSET+10*
>> INHDR(3	HSET+11*
INHF2	IN+15~, HEADER+19, HEADER+20, HEADER+21, HDR2+19*
>> INMODE	IN+42*
INMSG	IN+9~*, IN+11, IN+39, IN+41, IN+48, IN+50, IN+51
INMSG(0	IN+11*, IN+13, IN+25, IN+30, IN+39, IN+43, IN+44
INN	YN~, YN+5
>> INOFF	HSET+11, HDR2+9, HDR2+18
INP	IN~, IN+30*, IN+53, HEADER+7, WRITE+5
>> INPAGE	HEADER+10, HEADER+17*
>> INPARS	IN+43*
INREPEAT	IN+17~, IN+22*
INREQ	IN+17~
INS	IN+16~
INSEG	IN+16~
INSEG(1	IN+51*, IN+53
INSEQ	IN+16~, IN+47, IN+48, IN+50
INSG	IN+16~
INSVAR	IN+18~
INSYS	IN+16~, IN+33*
>> INTRP	IN+41*, IN+42
INV	YN~, YN+5
INX	IN+17~, IN+49, IN+50, IN+51, IN+53, LKPRM~, LKPRM+1
IO	HEADER+10
IO("Q"	HEADER+10
IO(0	HEADER+10
IOF	HEADER+15, HEADER+17
IOM	HDR2+15, HDR2+16
IOSL	HEADER+12, HEADER+13, WRITE+6
IOST	HEADER+10
QTY	DASH~, DASH+8
TAB	IN+18~, IN+29*
U	IN+13, IN+25, IN+26, IN+30, IN+42, IN+43, IN+44, IN+53
X	HEADER+6~, HEADER+12, HDR2+7~, HDR2+9
X1	HDR2+7~

Customize PDF page

Package: IHS Generic Interface System

Routine: INHMGD1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed