Routine: ACRFPRCS

Call Graph Total: 11

Package	Total	Call Graph
Commitment Register	10	^ACRFALT DIR^ACRFDIC SETDOC^ACRFEA1 HOME^ACRFMENU EN1^ACRFNXT APPROVE^ACRFPRC1 (CSI,EXIT,RESP)^ACRFPRC2 (ESIG,LIST,PAUSE,RELIST,SECURITY,TREPORT)^ACRFPRC4 (EDIT,HEAD,TE)^ACRFPRC9 PAUSE^ACRFWARN
Contracts and Grants	1	^ACGPSP

Package

Total

Call Graph

^ACRFALT DIR^ACRFDIC SETDOC^ACRFEA1 HOME^ACRFMENU EN1^ACRFNXT APPROVE^ACRFPRC1 (CSI,EXIT,RESP)^ACRFPRC2 (ESIG,LIST,PAUSE,RELIST,SECURITY,TREPORT)^ACRFPRC4
(EDIT,HEAD,TE)^ACRFPRC9 PAUSE^ACRFWARN

Contracts and Grants

^ACGPSP

Package	Total	Caller Graph
Commitment Register	3	ACRFALT ACRFEA21 ACRFPRC9

Package

Total

Caller Graph

Commitment Register

ACRFALT ACRFEA21 ACRFPRC9

Entry Points

Name	Comments	DBIA/ICR reference
ENA
EN
ACRCSI	;EP;TO PRINT STATUS OF DOCUMENTS
EN21	;EP;
LIST21
ACRREV	;EP;FOR DOCUMENT APPROVAL
LIST2	;EP;
TOT(X)	;DETERMINE IF TRAVEL ORDER IS ZERO AMOUNT
EN1
EN2	;
EXIT
SELECT	;SELECT DOCUMENT TO BE REVIEWED FOR APPROVAL
LOOKUP	;LOOKUP OF DOCUMENTS WHICH NEED CURRENT USER'S SIGNATURE
SPSUM	;EP;TO REVIEW SMALL PURCHASE SUMMARY
LX

External References

Name	Field # of Occurrence
^ACGPSP	SPSUM+9
^ACRFALT	EN1+2
DIR^ACRFDIC	ENA+11, SELECT+8, SPSUM+5
SETDOC^ACRFEA1	SELECT+18
HOME^ACRFMENU	ACRREV+5
EN1^ACRFNXT	LOOKUP+24
APPROVE^ACRFPRC1	EN21+7
CSI^ACRFPRC2	ENA+2
EXIT^ACRFPRC2	EN, EXIT
RESP^ACRFPRC2	ENA
ESIG^ACRFPRC4	LOOKUP+28
LIST^ACRFPRC4	LOOKUP+26
PAUSE^ACRFPRC4	LIST2+5
RELIST^ACRFPRC4	LOOKUP+6, LOOKUP+38
SECURITY^ACRFPRC4	LOOKUP+32
TREPORT^ACRFPRC4	EN21+5
EDIT^ACRFPRC9	EN21+4
HEAD^ACRFPRC9	LIST2+3
TE^ACRFPRC9	ACRREV+3
PAUSE^ACRFWARN	SPSUM+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: SELECT+7
Function Call: WRITE	Prompt: !,$J(ACRI,2) Line Location: LIST21+8
Function Call: WRITE	Prompt: ?4,"**" Line Location: LIST21+12
Function Call: WRITE	Prompt: ?4,"TA" Line Location: LIST21+13
Function Call: WRITE	Prompt: ?4,"NR" Line Location: LIST21+14
Function Call: WRITE	Prompt: ?4,$$TOT(+$G(^ACRAPVS(+ACRAPDA,0))) Line Location: LIST21+15
Function Call: WRITE	Prompt: ?7,ACRDOC Line Location: LIST21+16
Function Call: WRITE	Prompt: ?24,ACRID Line Location: LIST21+17
Function Call: WRITE	Prompt: ?40,"\|",$J((ACRII),2) Line Location: LIST21+23
Function Call: WRITE	Prompt: ?45,"**" Line Location: LIST21+27
Function Call: WRITE	Prompt: ?4,"TA" Line Location: LIST21+28
Function Call: WRITE	Prompt: ?45,"NR" Line Location: LIST21+29
Function Call: WRITE	Prompt: ?4,$$TOT(+$G(^ACRAPVS(+ACRAPDA,0))) Line Location: LIST21+30
Function Call: WRITE	Prompt: ?48,ACRDOC Line Location: LIST21+31
Function Call: WRITE	Prompt: ?65,ACRID Line Location: LIST21+32
Function Call: WRITE	Prompt: !!,"One moment, please." Line Location: ACRREV+7
Function Call: WRITE	Prompt: !!,"I need to review all documents pending for approval" Line Location: ACRREV+8
Function Call: WRITE	Prompt: !,"to determine if there are any which you need to sign." Line Location: ACRREV+9
Function Call: WRITE	Prompt: !! Line Location: ACRREV+10
Function Call: WRITE	Prompt: ! Line Location: SPSUM+4
Function Call: WRITE	Prompt: !! Line Location: SPSUM+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRAPL - [#9002190.55]	LOOKUP+13
^ACRAPL("AC"	EN+1, LOOKUP+12
^ACRAPVS - [#9002190]	LOOKUP+17, LOOKUP+18, SELECT+22, SELECT+23, LIST21+11, LIST21+13, LIST21+14, LIST21+15, LIST21+26, LIST21+28 , LIST21+29, LIST21+30
^ACRAPVS("AB"	LOOKUP+20, SELECT+22
^ACRAPVS("ANXT"	LOOKUP+9, LOOKUP+12, LOOKUP+16, LOOKUP+21!
^ACRDOC - [#9002196]	LIST21+14, LIST21+29
^ACROBL - [#9002189]	EN21+5
^ACRSS - [#9002193]	TOT+4
^ACRSS("J"	TOT+4
^TMP("ACRALT"	LOOKUP+8!
^TMP("ACRALTDT"	EN1+2, LOOKUP+8!, LOOKUP+27
^TMP("ACRDATA"	ENA+3, ENA+6, LOOKUP+5!, LOOKUP+6, SELECT+9, SELECT+13, LIST2+2, LIST2+3, LIST2+5, LIST21 , LIST21+4, LIST21+18, LIST21+19
^TMP("ACRDATE"	LOOKUP+27, LOOKUP+33

Name	Line Occurrences
$$TOT	LIST21+15, LIST21+30
EN	ACRREV+11, ACRCSI+5
EN2	ENA+12, EN1
ENA	EN+1
LIST2	LX
LIST21	LIST2+5
LOOKUP	EN2+1
LX	LOOKUP+6
SELECT	EN21+1

Name	Field # of Occurrence
^(	LOOKUP+12, LOOKUP+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR	SELECT+21, SELECT+22, SELECT+23, SELECT+25
>> ACRAP0	LOOKUP+17*, LOOKUP+20, LOOKUP+23
ACRAPDA	LOOKUP+15, LOOKUP+16, LOOKUP+17, LOOKUP+18, LOOKUP+20, LOOKUP+21, SELECT+17, SELECT+22, LIST21+1~, LIST21+7 , LIST21+11, LIST21+13, LIST21+14, LIST21+15, LIST21+22*, LIST21+26, LIST21+28, LIST21+29, LIST21+30
>> ACRAPDT	LOOKUP+18*, LOOKUP+19, LOOKUP+20, LOOKUP+25
>> ACRAPLDA	LOOKUP+12*, LOOKUP+13
>> ACRAPLDT	LOOKUP+13*, LOOKUP+14
>> ACRAPV0	SELECT+23*, SELECT+24, SELECT+25
>> ACRAPVDT	SELECT+23*, SELECT+24, SELECT+25
>> ACRAPVS(	SELECT+24*
>> ACRAPVT	LOOKUP+7, LOOKUP+9, LOOKUP+12, LOOKUP+16, LOOKUP+21
>> ACRCSI	ENA+2, EN21+7, ACRCSI+4*
ACRDATA	ENA+1~
ACRDATA1	ENA+13!
>> ACRDATE	LOOKUP+25*
ACRDOC	SELECT+10~, LIST21+5, LIST21+16, LIST21+20, LIST21+31
ACRDOCDA	EN21+5, LOOKUP+22~, LOOKUP+23, SELECT+15, ACRREV+4, ACRREV+13*
ACRDOCXX	ACRREV+4*, ACRREV+13, ACRREV+14!
>> ACRDUZ	LOOKUP+4*, LOOKUP+6, SELECT+9, SELECT+13, LIST2+2, LIST2+3, LIST2+5, LIST21, LIST21+4, LIST21+18 , LIST21+19
>> ACRENTR1	ACRCSI+3*
ACRENTRY	SELECT+10~, SELECT+12, ACRCSI+1~, ACRCSI+2
ACRESIG	LOOKUP+27, LOOKUP+29!
>> ACRI	EN21+1, EN21+2, LOOKUP+3, SELECT+9, LIST2+4, LIST2+5, LIST21, LIST21+2, LIST21+3, LIST21+4 , LIST21+8
>> ACRID	LIST21+6, LIST21+17, LIST21+21, LIST21+32
>> ACRII	LIST21+3*, LIST21+18, LIST21+19, LIST21+23
>> ACRINDV	LOOKUP+11, LOOKUP+12, LOOKUP+16, LOOKUP+21
>> ACRJJ	SELECT+11, SELECT+14
>> ACRMAX	SELECT+2, SELECT+6, LIST2+1, LIST2+2
>> ACRNOFM	ACRREV+2
>> ACROF	LOOKUP+34
>> ACRON	LOOKUP+34, ACRREV+5
>> ACROUT	ENA+2, EN1, EN1+2, EN21+3, LOOKUP+27, LOOKUP+29*, SELECT+9, LIST2+5, SPSUM+6
ACRPSUM	EN21+6!
ACRQUIT	ENA+2, EN1, EN1+1!, EN21+1, EN21+2, EN21+3, EN21+8!, LOOKUP+29, LOOKUP+37, SELECT+9 , LIST2+5, LIST2+6!, LIST21, LIST21+9!, LIST21+11, LIST21+12!, LIST21+24!, LIST21+26*, LIST21+27!, SPSUM+6
ACRREF	ENA+1~, SELECT+19, LIST21+30
>> ACRREFX	SELECT+19*
ACRREV	EXIT+1!, ENA+2, ACRREV+6, ACRREV+12!, ACRCSI+4*
ACRSIGN	SELECT+20!
ACRSIGN(	SELECT+25*
>> ACRTX(	ENA+4
>> ACRTXTYP	SELECT+16*
>> ACRX	SELECT+11*, SELECT+13
>> ACRXX	LIST2+1, LIST2+2
>> ACRY	ENA+4
>> ACRZDA	SELECT+15*, SELECT+22
>> DA	SELECT+15*
DC	SPSUM+8~
DIP	SPSUM+8~
>> DIR("?"	SELECT+4, SELECT+5, SELECT+6*
>> DIR("A"	ENA+8, SELECT+2, SELECT+3, SPSUM+2
>> DIR("B"	ENA+9, SPSUM+3
>> DIR(0	ENA+7, SELECT+1, SPSUM+1*
DN	SPSUM+8~
DT	LOOKUP+16, LOOKUP+19
DUZ	EN+1, LOOKUP+4, LOOKUP+5, LOOKUP+14, LOOKUP+27, LOOKUP+33, SELECT+25
DXS	SPSUM+8~
U	ENA+4, LOOKUP+13, LOOKUP+14, LOOKUP+16, LOOKUP+19, LOOKUP+20, LOOKUP+25, SELECT+14, SELECT+15, SELECT+16 , SELECT+17, SELECT+24, SELECT+25, LIST21+5, LIST21+6, LIST21+7, LIST21+13, LIST21+14, LIST21+20, LIST21+21 , LIST21+22, LIST21+28, LIST21+29, LIST21+30, TOT+4
X	SELECT+9, SELECT+11, SELECT+13, SELECT+14, SELECT+15, SELECT+16, SELECT+17, LIST21+1~, LIST21+4, LIST21+5 , LIST21+6, LIST21+7, LIST21+10, LIST21+11, LIST21+19, LIST21+20, LIST21+21, LIST21+22, LIST21+25, LIST21+26* , TOT~, TOT+1, TOT+4
Y	ENA+12, SPSUM+6, TOT+2~, TOT+3, TOT+4
Z	TOT+2~, TOT+3, TOT+4, TOT+5, TOT+6, TOT+7

Customize PDF page

Package: Commitment Register

Routine: ACRFPRCS

Information

Source Information