Routine: PRCAKBT

Information

PRCAKBT ;WASH-ISC@ALTOONA,PA/CMS-AR BUILD TEMP ARCHIVE FILE ;9/10/93 8:39 AM ;9/10/93 8:26 AM

Source Information

Source file <PRCAKBT.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Accounts Receivable	2	^PRCAKBT1 BUSY^PRCAKS
VA FileMan	2	YN^DICN EN^DIQ1
Kernel	1	^%ZTLOAD
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: 2

Package	Total	Caller Graph
Accounts Receivable	1	PRCAK BUILD TEMP
Kernel	1	^DIC(19

Entry Points

Name	Comments	DBIA/ICR reference
V	;;4.5;Accounts Receivable;;Mar 20, 1995
Q
DQ	;
END
BULL	;Send total in bulletin
R0	;All Bills not successfully moved
XM

External References

Name	Field # of Occurrence
^%ZTLOAD	V+9
YN^DICN	V+7
EN^DIQ1	DQ+7
^PRCAKBT1	DQ+11
BUSY^PRCAKS	DQ+2
^XMD	XM

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,*7,"The temporary storage file already has data!" Line Location: V+3
Function Call: WRITE	Prompt: !!,"This option will build the temporary storage file (AR Archive File 430.8)",!,"with all the data and corresponding transactions from the bills in the",!,"Pending Archive status." Line Location: V+4
Function Call: WRITE	Prompt: !!,"The use of this option should be coordinated with the IRM System Manager to",!,"determine disk and journal space!" Line Location: V+5
Function Call: WRITE	Prompt: !!,*7,"The PENDING ARCHIVE File 430.3 entry is not setup properly, contact IRM." Line Location: V+6
Function Call: WRITE	Prompt: !,"I'll send you a mail message when I am done.",! Line Location: V+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	DQ+7
^PRCA(430.3 - [#430.3]	V+6, DQ+3
^PRCAK("PRCAK"	DQ+2, DQ+13
^PRCAK(430.8 - [#430.8]	V+3
^TMP("PRCAK"	DQ+4!, DQ+8, DQ+9, DQ+10, BULL+3, BULL+4, BULL+5, R0+1, R0+2, R0+3 , R0+4, R0+5, XM!
^UTILITY("DIQ1"	DQ+4!, DQ+8, DQ+9!, XM!

Label References

Name	Line Occurrences
BULL	DQ+10, DQ+12
END	DQ+2, DQ+10
Q	V+3, V+6, V+7
R0	BULL+3
XM	BULL+5

Naked Globals

Name	Field # of Occurrence
^(	DQ+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	V+2~, V+7*
CNT	DQ+1~, BULL+4, R0+2
DA	DQ+1~, DQ+7*
DIC	DQ+1~, DQ+6*
DIQ	DQ+1~
DIQ(0	DQ+5*
DR	DQ+1~, DQ+5*
DUZ	BULL+2
FIL	DQ+1~, DQ+6*, DQ+7, DQ+8, DQ+9
II	DQ+1~, DQ+9*
STAT	V+6, DQ+1~, DQ+3
U	V+3, V+6
X1	BULL+1~
XMDUZ	BULL+1~, BULL+2*
XMSUB	BULL+1~, BULL+2*
XMTEXT	BULL+1~, BULL+2*
XMY	BULL+1~
XMY(	BULL+2*
ZTDESC	V+2~, V+9*
ZTIO	V+2~, V+9*
ZTRTN	V+2~, V+9*
ZTSAVE	V+2~

Customize PDF page

Package: Accounts Receivable