Routine: APCPEPRN

Package	Total	Call Graph
IHS VA Utilities	4	^XBDBQUE $$VAL^XBDIQ1 ^XBFMK EN^XBVK
VA Fileman	2	^DIC ^DIR
IHS Patient	1	$$HRN^AUPNPAT
Kernel	1	$$FMTE^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
LOC	;
HEAD	;EP
LOG	;get log entry
HEAD1	;
CTR(X,Y)	;EP - Center X in a field Y wide.
DRIVER	;EP entry point for taskman
USR()	;EP - Return name of current user from ^VA(200.
O	;one community
S	;all communities within APCPSU su
EOP	;EP - End of page.
XIT	;EP
LBLK(V,L)	;left blank fill
RBLK(V,L)	;EP right blank fill
PRINT	;EP
ZIS	;call xbdbque

External References

Name	Field # of Occurrence
$$HRN^AUPNPAT	PRINT+9, PRINT+10
^DIC	LOG+2, O+1, S+1
^DIR	LOC+3, HEAD+2, EOP+5
^XBDBQUE	ZIS+2
$$VAL^XBDIQ1	PRINT+8, PRINT+13, S+1
^XBFMK	XIT+2
EN^XBVK	XIT+1
$$FMTE^XLFDT	PRINT+12, HEAD1+2, HEAD1+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"PCC Data Transmission Error Listing",! Line Location: LOG+1
Function Call: WRITE	Prompt: !!,"Goodbye" Line Location: LOG+2
Function Call: WRITE	Prompt: !!,"No TX errors generated on that run." Line Location: LOG+4
Function Call: WRITE	Prompt: !!,"Gathering up ",$P(^AUTTSU(+Y,0),U),"'s Facilities.." Line Location: S+3
Function Call: WRITE	Prompt: ! Line Location: HEAD+2
Function Call: WRITE	Prompt: !?35,$$FMTE^XLFDT(DT),?70,"Page ",APCPPG Line Location: HEAD1+2
Function Call: WRITE	Prompt: !,?((80-$L(X))/2),X Line Location: HEAD1+3
Function Call: WRITE	Prompt: !,$$CTR(X,80),! Line Location: HEAD1+4
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: HEAD1+5
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: HEAD1+6
Function Call: WRITE	Prompt: !,"Name",?22,"HRN",?34,"Visit Date/Time",?53,"Location",?66,"TY",?69,"SC",?73,"DEP" Line Location: HEAD1+7
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-") Line Location: HEAD1+8
Routine Call	DIC Line Location: LOG+2 O+1 S+1
Routine Call	DIR Line Location: LOC+3 HEAD+2 EOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APCPLOG - [#9001005]	Classic Fileman Calls
^AUTTLOC - [#9999999.06]	Classic Fileman Calls
^AUTTSU - [#9999999.22]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCPLOG - [#9001005]	LOG+4, DRIVER+3, DRIVER+4, DRIVER+5, DRIVER+6, HEAD1+4
^AUPNVSIT - [#9000010]	DRIVER+8, DRIVER+9, DRIVER+10, DRIVER+11, DRIVER+12, PRINT+6, PRINT+12
^AUTTLOC - [#9999999.06]	S+4
^AUTTSU - [#9999999.22]	S+3
^DIC(4 - [#4]	PRINT+12
^VA(200 - [#200]	USR+1
^XTMP("APCPEPRN"	DRIVER+2!, DRIVER+12*, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+15!

Label References

Name	Line Occurrences
$$CTR	HEAD1+4, HEAD1+5, HEAD1+6
@(	LOC+7
HEAD	PRINT+2, PRINT+7
HEAD1	HEAD+1
LOC	LOC+8
LOG	LOG+4, LOC+4
XIT	LOG+2, ZIS+3
ZIS	LOC+6

Naked Globals

Name	Field # of Occurrence
^(	PRINT+6
^(0	USR+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LBLK+1~, LBLK+2, RBLK+1~, RBLK+2
>> APCPD	LOG+3, PRINT+4, PRINT+5, PRINT+6, PRINT+12
>> APCPDFN	PRINT+6*, PRINT+9, PRINT+10
>> APCPE	DRIVER+3, DRIVER+4, DRIVER+5, DRIVER+6, DRIVER+12, PRINT+5, PRINT+6
>> APCPE1	DRIVER+4*
>> APCPE2	DRIVER+4*, DRIVER+12
>> APCPERR	DRIVER+5, DRIVER+12, PRINT+6, PRINT+14
>> APCPF	DRIVER+4*, DRIVER+12
>> APCPH	DRIVER+1*, DRIVER+2, DRIVER+12, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+15
>> APCPHRN	PRINT+9, PRINT+10, PRINT+11*, PRINT+12
>> APCPJ	DRIVER+1*, DRIVER+2, DRIVER+12, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+15
>> APCPL	PRINT+3*, PRINT+4, PRINT+5, PRINT+6, PRINT+9, PRINT+12
APCPLOCT	LOC+1!, LOC+5*, LOC+6!, LOC+7, DRIVER+11, HEAD1+5, HEAD1+6
APCPLOCT(	DRIVER+11, O+3, S+4
>> APCPLOG	LOG+3*, LOG+4, DRIVER+3, DRIVER+4, DRIVER+5, DRIVER+6, HEAD1+4
>> APCPPG	PRINT+1, HEAD+1, HEAD1+1, HEAD1+2
>> APCPQ	LOC+8, PRINT+1, PRINT+3, PRINT+4, PRINT+5, PRINT+7, O+2, S+2, HEAD+2
>> APCPV	DRIVER+6, DRIVER+7, DRIVER+8, DRIVER+9, DRIVER+10, DRIVER+11, DRIVER+12, PRINT+6, PRINT+8, PRINT+12 , PRINT+13
DA	LOC+3!
DFOUT	EOP+4!
DIC	LOG+2!, O+1!, S+1*!
DIC("A"	O+1, S+1
DIC("B"	S+1*
DIC(0	LOG+2, O+1, S+1*
DIR	LOC+3!, HEAD+2!, EOP+3~
DIR("A"	LOC+2, LOC+3
DIR("B"	LOC+2, LOC+3
DIR(0	LOC+2, HEAD+2, EOP+5*
DIRUT	LOC+4, EOP+4!
DLOUT	EOP+4!
DT	HEAD1+2
DTOUT	HEAD+2, EOP+4!
DUOUT	EOP+4!
DUZ	USR+1
DUZ(2	PRINT+10, S+1
I	LBLK+1~, LBLK+2, RBLK+1~, RBLK+2
IO	HEAD+2
IO("S"	EOP+2
IO(0	HEAD+2
IOF	HEAD1+1
IOM	CTR+1
IOSL	PRINT+7
IOST	HEAD+2, EOP+1
>> IOT	EOP+2
L	LBLK~, LBLK+2, RBLK~, RBLK+2
U	DRIVER+4, DRIVER+5, DRIVER+6, DRIVER+9, DRIVER+10, DRIVER+11, DRIVER+12, PRINT+6, PRINT+12, S+3 , S+4, HEAD1+4, USR+1
V	LBLK~, LBLK+2, LBLK+3, RBLK~, RBLK+2, RBLK+3
X	S+4, HEAD1+3, HEAD1+4, HEAD1+5, HEAD1+6*, CTR~, CTR+1
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	LOG+2, LOG+3, LOC+5, O+2, O+3, S+2, S+3, S+4, HEAD+2, CTR~ , CTR+1
>> Z	LBLK+2, RBLK+2
>> ZTQUEUED	EOP+2

Customize PDF page

Package: Patient Care Component Data Transmission

Routine: APCPEPRN

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: