Routine: PRCHITM6

Information

PRCHITM6 ;OI&T/LKG - LOAD MANUFACTURER ENTRIES FROM HOST FILE ;12/20/21 22:15

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Kernel	6	($$LIST,$$STATUS,CLOSE,OPEN)^%ZISH ^%ZTLOAD $$DT^XLFDT $$STA^XUAF4 $$KSP^XUPARAM $$PROD^XUPROD
VA FileMan	4	C^%DTC EN^DDIOL (FILE,UPDATE)^DIE ^DIR
MailMan	1	^XMD

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
IFCAP	1	PRCHITEM MANUFACTURER LOAD

Entry Points

Name	Comments	DBIA/ICR reference
ST	;Entry point
GETDIR
RUN	;
END	;
INITLOG(PRCTXNID)	; Initialize error log
LOGERR(PRCE,PRCID)	; Record errors
SEND(PRCA,PRCB,PRCC,PRCD,PRCE)	;

External References

Name	Field # of Occurrence
C^%DTC	INITLOG+4
$$LIST^%ZISH	GETDIR+8
$$STATUS^%ZISH	GETDIR+14, RUN+12, RUN+13, RUN+15
CLOSE^%ZISH	GETDIR+15, GETDIR+19, GETDIR+21, RUN+34
OPEN^%ZISH	GETDIR+11, RUN+5
^%ZTLOAD	GETDIR+24
EN^DDIOL	GETDIR+15
FILE^DIE	RUN+31
UPDATE^DIE	RUN+25
^DIR	GETDIR+2, GETDIR+6, GETDIR+19
$$DT^XLFDT	INITLOG+4
^XMD	RUN+10, RUN+53, SEND+5
$$STA^XUAF4	RUN+3
$$KSP^XUPARAM	RUN+3
$$PROD^XUPROD	RUN+52, SEND+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"File not found!" Line Location: GETDIR+10
Function Call: WRITE	Prompt: !,"Unable to open file "_PRCLFDIR_PRCLFFIL_"." Line Location: GETDIR+12
Function Call: READ	Variable: PRCX Timeout: DTIME Line Location: GETDIR+14
Function Call: WRITE	Prompt: ! Line Location: GETDIR+16
Function Call: WRITE	Prompt: !,"Task #=",$G(ZTSK) Line Location: GETDIR+24
Function Call: READ	Variable: PRCX Timeout: DTIME Line Location: RUN+12
Function Call: READ	Variable: PRCX Timeout: DTIME Line Location: RUN+15
Routine Call	DIE Line Location: RUN+31
Routine Call	DIE Line Location: RUN+25
Routine Call	DIR Line Location: GETDIR+2 GETDIR+6 GETDIR+19

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRC(440.4 - [#440.4]	RUN+20
^XTMP(	RUN+36, RUN+38, RUN+40, RUN+41, INITLOG+2!, INITLOG+4, LOGERR+4

Label References

Name	Line Occurrences
END	GETDIR+2, GETDIR+6, GETDIR+12, GETDIR+15, GETDIR+19, GETDIR+20, RUN+4
GETDIR	GETDIR+10
INITLOG	RUN+14
LOGERR	RUN+19, RUN+26, RUN+32
SEND	RUN+43, RUN+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%H	INITLOG+1~
DIR	ST+1~, GETDIR+4!, GETDIR+7!, GETDIR+17!
DIR("?"	GETDIR+1, GETDIR+4, GETDIR+5, GETDIR+18
DIR("A"	GETDIR, GETDIR+4, GETDIR+17*
DIR("B"	GETDIR, GETDIR+5, GETDIR+17*
DIR(0	GETDIR, GETDIR+4, GETDIR+17*
DIROUT	ST+1~
DIRUT	ST+1~, GETDIR+2, GETDIR+6, GETDIR+19
DTIME	GETDIR+14, RUN+12, RUN+15
DTOUT	ST+1~
DUOUT	ST+1~
DUZ	RUN+8, RUN+51, SEND+3
IO	GETDIR+13, GETDIR+25, RUN+11
IO(0	GETDIR+15, GETDIR+16
POP	ST+1~, GETDIR+12, RUN+1~, RUN+4, RUN+6
PRCA	SEND~
PRCARR	RUN+17~, RUN+37~, RUN+43, RUN+44!, RUN+45, RUN+47~
PRCARR(	RUN+21, RUN+22, RUN+23, RUN+24, RUN+28, RUN+29, RUN+30, RUN+41
PRCARR(1	RUN+9, RUN+49
PRCARR(2	RUN+50*
PRCARR(3	RUN+50*
PRCB	SEND~, SEND+2
PRCC	RUN+37~, RUN+38, RUN+39*, RUN+43, RUN+45, SEND~, SEND+2
PRCD	SEND~, SEND+2
PRCDT	INITLOG+1~, INITLOG+4*
PRCDUNS	RUN+17~*, RUN+22, RUN+29
PRCE	LOGERR~, SEND~, SEND+2
PRCE("DIERR"	LOGERR+3
PRCERR	RUN+17~, RUN+19, RUN+26, RUN+27, RUN+32, RUN+33
PRCERR("DIERR"	RUN+19*, LOGERR+1
PRCERRC	RUN+2~, INITLOG+2, LOGERR+4
PRCFATAL	ST+1~, GETDIR+2, GETDIR+6, GETDIR+12, GETDIR+15, GETDIR+19, RUN+2~*, END+2
PRCHNODE	RUN+2~, RUN+36, RUN+38, RUN+40, RUN+41, RUN+46, INITLOG+2*, INITLOG+4, LOGERR+4
PRCI	ST+1~, GETDIR+14, RUN+1~, RUN+12, RUN+15, RUN+37~, RUN+38, RUN+39, RUN+40, RUN+41 , LOGERR+1~, LOGERR+2, LOGERR+3
PRCID	LOGERR~, LOGERR+3
PRCIEN	RUN+17~
PRCIEN(1	RUN+17*, RUN+19, RUN+20, RUN+21, RUN+26, RUN+28, RUN+29, RUN+30, RUN+32
PRCITC	RUN+2~
PRCIUPD	RUN+2~, RUN+33, RUN+50
PRCJ	RUN+1~, RUN+37~, RUN+41, RUN+42, RUN+44*
PRCK	RUN+1~, RUN+37~, RUN+43, RUN+45, LOGERR+1~, LOGERR+2
PRCL	RUN+37~*, RUN+39, RUN+42
PRCLCTR	RUN+2~, RUN+27, RUN+50
PRCLFARR	ST+1~, GETDIR+9!, RUN+1~
PRCLFDIR	ST+1~, GETDIR+3*, GETDIR+8, GETDIR+11, GETDIR+12, RUN+5, RUN+9, END+3!
PRCLFF	ST+1~, GETDIR+9!
PRCLFF(	GETDIR+8*
PRCLFFIL	ST+1~, GETDIR+7*, GETDIR+8, GETDIR+11, GETDIR+12, RUN+5, RUN+9
PRCLFFILE	END+3!
PRCLFIN	ST+1~, RUN+1~
PRCLINES	RUN+3~, RUN+18, RUN+49
PRCM	LOGERR+1~, LOGERR+3*, LOGERR+4
PRCNAME	RUN+17~*, RUN+21, RUN+28
PRCSTATUS	RUN+17~*, RUN+23, RUN+24, RUN+30
PRCSTN	RUN+3~*, RUN+43, RUN+45, RUN+48
PRCTXN	RUN+2~, RUN+14*, RUN+43, RUN+45, RUN+48
PRCTXNID	INITLOG~, INITLOG+2
PRCX	ST+2~, GETDIR+8, GETDIR+10, GETDIR+14, GETDIR+15, RUN+1~, RUN+12, RUN+14, RUN+15, RUN+16 , RUN+17
X	ST+1~, RUN+1~, INITLOG+1~, INITLOG+4
X1	INITLOG+1~, INITLOG+4*
X2	INITLOG+1~, INITLOG+4*
XMDUZ	RUN+7~, RUN+8, RUN+47~, RUN+51, SEND+1~, SEND+3*
XMMG	RUN+7~, RUN+47~, SEND+1~
XMSUB	RUN+7~, RUN+8, RUN+47~, RUN+48, SEND+1~, SEND+2*
XMTEXT	RUN+7~, RUN+9, RUN+47~, RUN+51, SEND+1~, SEND+3*
XMY	RUN+7~, RUN+47~, SEND+1~
XMY(	RUN+8, RUN+51, SEND+3*
XMY("G.ISM"	RUN+8, RUN+51, SEND+3*
XMY("VHANIFMO@domain.ext"	RUN+52, SEND+4
XMZ	RUN+7~, RUN+47~, SEND+1~
Y	ST+1~, GETDIR+3, GETDIR+7, GETDIR+20, RUN+1~
ZTDESC	ST+2~, GETDIR+22*
ZTDTM	ST+2~
ZTIO	ST+2~, GETDIR+22*
>> ZTQUEUED	RUN+1, RUN+4, END+1, END+2
>> ZTREQ	END+1*
ZTRTN	ST+2~, GETDIR+22*
ZTSAVE	ST+2~
ZTSAVE("DTIME"	GETDIR+23*
ZTSAVE("DUZ"	GETDIR+23*
ZTSAVE("PRCLFDIR"	GETDIR+23*
ZTSAVE("PRCLFFIL"	GETDIR+23*
ZTSK	ST+2~, GETDIR+24

Customize PDF page

Package: IFCAP