Routine: PSXRECV1

Package	Total	Call Graph
VA Fileman	5	(NOW,YX)^%DTC FILE^DICN ^DIE (,IX)^DIK $$GET1^DIQ
CMOP	2	FALERT^PSXDODNT (ACK,EN,ERR,GRP)^PSXNOTE
MailMan	2	XMZ^XMA2 ENT1^XMD
Health Level Seven	1	$$HLDATE^HLFNC
Kernel	1	$$GTF^%ZISH

Package	Total	Caller Graph
CMOP	1	PSXRECV

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	UPDATE, DOD+8
YX^%DTC	UPDATE+6
$$GTF^%ZISH	DOD+12, DOD+15
FILE^DICN	FF+2
^DIE	UPDATE+2, UPDATE+14, CHECK+3
^DIK	CLNUP, CLNUP+2, CLNUP+4
IX^DIK	XMZ+6, XMZ+7, CHECK+5
$$GET1^DIQ	DOD+1, DOD+11, DOD+14
$$HLDATE^HLFNC	DOD+8
FALERT^PSXDODNT	DOD+13, DOD+16
ACK^PSXNOTE	DOD+3
EN^PSXNOTE	UPDATE+9
ERR^PSXNOTE	CHECK+1
GRP^PSXNOTE	XMZ+4
XMZ^XMA2	XMZ
ENT1^XMD	XMZ+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	F515+10
^PSX(552	F515+2, UPDATE+12, UPDATE+13, UPDATE+15, CHECK+1, DOD+3
^PSX(552.1	CHKDUP, CHKDUP+3, CHKDUP+5, CHKDUP+7, CLNUP+1, UPDATE+1, UPDATE+2!, UPDATE+3!, UPDATE+4, CHECK+2 , CHECK+4, HOLD*
^PSX(552.2	CLNUP+2
^PSX(552.4	CLNUP, F515+2, F515+4, F515+6, F515+18*
^TMP($J	F515+11, F515+12, F515+13, F515+14, F515+16*, XMZ+2, EXIT+1!
^XMB(3.9 - [#3.9]	XMZ+2, XMZ+3

Label References

Name	Line Occurrences
CLNUP	CHKDUP+5
EXIT	UPDATE+1, UPDATE+3, UPDATE+13, CHECK+2, HOLD
HOLD	CHECK+1
PUT	DOD+9
XMZ	XMZ+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	UPDATE, DOD+8, EXIT!
%H	UPDATE+6*!
ACK	DOD+6!, DOD+7*, DOD+9, DOD+10
ACK(1	DOD+10*
ACK(2	DOD+10*
>> AGNCYID	DOD+1*, DOD+3
BAT	CLNUP+1*, CLNUP+2, CLNUP+3!
>> BATDTM	DOD+8*
>> BATID	DOD+1, DOD+5, DOD+10, DOD+11
CHK	EXIT+1!
DA	CLNUP!, CLNUP+2!, CLNUP+3!, CLNUP+4!, FF+3!, UPDATE+2!, UPDATE+14!, XMZ+6!, XMZ+7!, CHECK+3! , CHECK+5*!
DA(1	FF*
>> DA515	F515+2, F515+4, F515+6, F515+18, FF
DA55241	F515+4~, F515+5, F515+6
DD	F515+17!
DIC	FF*, FF+3!
DIC("DR"	FF+1*, FF+3!
DIC(0	FF*
DIE	UPDATE+2!, UPDATE+14!, CHECK+3*!
DIK	CLNUP!, CLNUP+1, CLNUP+3!, CLNUP+4!, XMZ+6!, XMZ+7!, CHECK+5!
DLM	PIECE~, PIECE+2, PUT~, PUT+3
DO	F515+17!
DOMAIN	EXIT!
DR	UPDATE+2, UPDATE+14!, CHECK+3*
DRG515	FF+1, FF+3!
DT	XMZ+3
FILL	F515+4~, F515+6*
FL1	UPDATE+4*, XMZ+5!
FL515	F515+4, F515+6, F515+15, FF+1, FF+3!
>> FLAG5	CHKDUP, CHKDUP+3, CHKDUP+5, CHKDUP+7
>> FNAME2	DOD+11*, DOD+12, DOD+13, DOD+15, DOD+16
>> GBL	DOD+13, DOD+16
I	XMZ+2*, EXIT!
I512	CLNUP+2*, CLNUP+3!
MCT	F515+8*, F515+9, F515+16, EXIT+1!
NAME	F515+16, EXIT+1!
NAME1	F515+16*, EXIT+1!
OLDBAT	EXIT+1!
OLDDA	UPDATE+1, UPDATE+2, XMZ+6, CHECK+2, CHECK+3, CHECK+4, CHECK+5, DOD+1, HOLD, EXIT!
>> OLDTM	CHKDUP*
P	PIECE+2~, PUT+2~, PUT+3
P515	CLNUP*!
>> PATH	DOD+11, DOD+12, DOD+13, DOD+14, DOD+15, DOD+16
PSXBAT	UPDATE+14, EXIT!
PSXCS	FF+1, FF+3!
PSXDIV	UPDATE+17, EXIT+1!
PSXDRG	F515+16, EXIT+1!
PSXEND	UPDATE+5*, EXIT!
PSXERR	EXIT+1!
PSXFLAG	UPDATE+7, UPDATE+8, EXIT!
PSXFLG1	UPDATE, UPDATE+4, XMZ+5!
PSXFROM	EXIT+1!
PSXFTDT	UPDATE*, UPDATE+2, CHECK+3, EXIT!
PSXID	EXIT!
PSXJOB	EXIT+1!
PSXLAST	CHKDUP+3, CHKDUP+5, CHECK+1, EXIT!
PSXMSG	F515+16, FF+1, UPDATE+5, CHECK+1, EXIT!
PSXMSGCT	UPDATE+5*, CHECK+1, EXIT!
PSXOLD	EXIT+1!
PSXORDCT	UPDATE+2, CHECK+1, EXIT!
PSXRECV	DOD+3*!, EXIT+1!
PSXREF	F515+2, F515+11, UPDATE+2, UPDATE+3, UPDATE+17, EXIT!
PSXRTRN	CLNUP+5*, UPDATE+1, UPDATE+2, UPDATE+3, UPDATE+4, UPDATE+7, UPDATE+8, EXIT+1!
PSXRXCT	UPDATE+5*, CHECK+1, EXIT!
PSXRXS	UPDATE+2, CHECK+1, EXIT!
PSXSENDR	EXIT!
PSXSITE	F515+11, EXIT!
PSXSMSG	CHECK+1, EXIT!
PSXSTART	CHKDUP+3, CHKDUP+5, CHECK+1, EXIT!
PSXSYST	EXIT!
PSXTDT	UPDATE+6*, EXIT!
QTY515	FF+1, FF+3!
REC	UPDATE+12, UPDATE+13, UPDATE+14, UPDATE+15, EXIT+1!, PIECE~, PIECE+2, PUT~, PUT+3
RR	UPDATE+12*, EXIT+1!
RRR	EXIT+1!
RX515	F515+2, F515+4, F515+6, F515+16, FF, FF+3!
RXNDX	EXIT+2!
>> SAME	CHKDUP, CHKDUP+3, CHKDUP+5, CHKDUP+7, CLNUP, CLNUP+1, CLNUP+4, CLNUP+5*, UPDATE+3, UPDATE+4 , XMZ+7
SDATE	CHKDUP+3, F515+10, UPDATE+5, EXIT!
SDT	UPDATE+5*, EXIT!
SITEN	CHECK+1, EXIT+1!
SITENUM	UPDATE+12, EXIT!
SUBDA	EXIT!
>> T	UPDATE+3
U	F515+6, UPDATE+5, XMZ+3, PIECE+2, PUT+2
V	PIECE+2~, PUT+2~, PUT+3
X	FF*, FF+3!, EXIT!
XMDUN	UPDATE+16~, XMZ+3*
XMDUZ	UPDATE+16~, UPDATE+17, XMZ+3
XMFROM	EXIT!
>> XMRG	UPDATE+5
XMSER	EXIT+1!
XMSUB	UPDATE+16~, UPDATE+17*
XMY	UPDATE+16~
XMZ	UPDATE+16~, XMZ+1, XMZ+2, XMZ+3, EXIT+1!
XQMSG	EXIT+1!
XQSOP	EXIT+1!
XSITE	EXIT+1!
XX	DOD+12, DOD+15, EXIT+1!, PIECE~, PIECE+2, PUT~, PUT+2
XYZ	F515+7*, F515+16, EXIT+1!
Y	F515+10, F515+11!, UPDATE+6, DOD+12, DOD+13, DOD+15*, DOD+16, EXIT!
>> YY	DOD+9*
ZCNT	XMZ+2*, XMZ+3, XMZ+5!
>> ZFILL	F515+15*, F515+16

Customize PDF page

Package: CMOP

Routine: PSXRECV1

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
PIECE(REC,DLM,XX)	; ; Set variable V = piece P of REC using delimiter DLM
PUT(REC,DLM,XX)	; ; Set Variable V into piece P of REC using delimiter DLM
FF
UPDATE
DOD	; DOD interface - send ACK even if placed in hold
CHECK	;this would be a good place for an alert to be sent
EXIT
CHKDUP
XMZ
CLNUP
HOLD
F515	; ; test if VA and RX already filed