Routine: ACRFSS3

Package	Total	Call Graph
Commitment Register	5	^ACR148A (DDS,DIE,DIR,FILE)^ACRFDIC ^ACRFSS4 $$TMFEE^ACRFSS42 PAUSE^ACRFWARN
VA Fileman	1	^DIE

Package	Total	Caller Graph
Commitment Register	6	ACRFEA4 ACRFEA41 ACRFEA42 ACRFSS ACRFSSA1 ACRFTOT

Entry Points

External References

Name	Field # of Occurrence
^ACR148A	COURSE+8
DDS^ACRFDIC	COURSE+5
DIE^ACRFDIC	ADD1+16, E1+5, COURSE+15, UP+8, OBJ+5, OBJ+13
DIR^ACRFDIC	EDIT+7, COURSE+14
FILE^ACRFDIC	ADD+13
^ACRFSS4	EN1+1
$$TMFEE^ACRFSS42	ADD1+11
PAUSE^ACRFWARN	DISPLAY+35
^DIE	PUT+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$S(ACRREF=130:"TRAVEL ORDER",ACRREF=600:"TRAVEL VOUCHER",1:"TRAINING REQUEST")," BEING PROCESSED." Line Location: EN1+4
Function Call: WRITE	Prompt: ! Line Location: EN1+5
Function Call: WRITE	Prompt: !!,"ITEM" Line Location: DISPLAY+5
Function Call: WRITE	Prompt: ?6,"TYPE OF" Line Location: DISPLAY+6
Function Call: WRITE	Prompt: ?42,"ESTIMATED" Line Location: DISPLAY+8
Function Call: WRITE	Prompt: !," NO." Line Location: DISPLAY+9
Function Call: WRITE	Prompt: ?6,"EXPENSE" Line Location: DISPLAY+10
Function Call: WRITE	Prompt: ?42,"EXPENSE" Line Location: DISPLAY+14
Function Call: WRITE	Prompt: !,"----" Line Location: DISPLAY+15
Function Call: WRITE	Prompt: ?6,"--------------" Line Location: DISPLAY+16
Function Call: WRITE	Prompt: ?42,"----------" Line Location: DISPLAY+20
Function Call: WRITE	Prompt: !?42,"----------" Line Location: DISPLAY+32
Function Call: WRITE	Prompt: !?34,"TOTAL" Line Location: DISPLAY+33
Function Call: WRITE	Prompt: ?42,$J($FN(ACRSSTOT,"P",2),11) Line Location: DISPLAY+34
Function Call: WRITE	Prompt: @IOF Line Location: DISPLAY+35
Function Call: WRITE	Prompt: !,$J(ACRJ,3) Line Location: DISP1+6
Function Call: WRITE	Prompt: ?6,ACRSSITM Line Location: DISP1+7
Function Call: WRITE	Prompt: ?42,$J(ACRSS1,10) Line Location: DISP1+11
Function Call: WRITE	Prompt: ! Line Location: EDIT+5
Function Call: WRITE	Prompt: !!?22,"Item No. ",X Line Location: E1+0
Routine Call	DIE Line Location: PUT+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACRSS - [#9002193]	Classic Fileman Calls
^ACRDOC - [#9002196]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRAL("E"	ADD+9, ADD1+12
^ACRDOC - [#9002196]	COURSE+9, UP+1
^ACROBL - [#9002189]	EDIT+1, OBJ+1
^ACRSS - [#9002193]	DISP1, DISP1+5*, ADD1+10, E1+4, OBJ+2, OBJ+6, OBJ+7, OBJ+9, OBJ+12
^ACRSS("C"	OBJ+2, OBJ+8
^ACRSS("E"	EN1+3, DISPLAY+23, DISPLAY+28, ADD, ADD1, UP+3, UP+4
^ACRSYS(1	ADD+9, ADD+12, ADD1+12, ADD1+14, OBJ+12
^AUTTCAN - [#9999999.57]	DISP1+1
^AUTTCAN("B"	ADD+7
^AUTTOBJC - [#9999999.59]	DISP1+1
^AUTTOBJC("B"	ADD+12, ADD1+14

Label References

Name	Line Occurrences
ADD	EN1+6
ADD1	ADD
DISP1	DISPLAY+26, DISPLAY+31
DISPLAY	EN2+1
E1	EDIT+10
EDIT	EN2+2
EN1	TO
EN2	EN1+8
OBJ	DISPLAY+4
PUT	OBJ+14
UP	EN1+3

Naked Globals

Name	Field # of Occurrence
^(0	OBJ+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR4P	ADD+9, ADD1+9*, ADD1+10, ADD1+12, UP+7
ACRALTOT	EXIT!, ADD+9, ADD1+4*, ADD1+10, ADD1+12, UP+7
>> ACRCAN	DISP1+1*, DISP1+10, E1+3
>> ACRCANDA	ADD+7*, ADD+8
>> ACRDOC	DISPLAY+3
>> ACRDOC0	EN1
ACRDOCDA	EN1+3, DISPLAY+23, DISPLAY+28, ADD, ADD+8, ADD+9, ADD1, ADD1+11, ADD1+12, EDIT+1 , COURSE+2, COURSE+9, UP+1, UP+3, UP+4, OBJ+1, OBJ+2, OBJ+8, OBJ+14, PUT~ , PUT+6, PUT+8
>> ACRFDNCA	ADD+7, E1+3
ACRI	EXIT!, EN1+6, DISPLAY+22, DISPLAY+23, DISPLAY+27, DISPLAY+28, ADD, ADD+1, ADD+9, ADD1 , ADD1+10, ADD1+11, ADD1+12, ADD1+14, EDIT+10, UP+3*, UP+4, UP+7
>> ACRITEM	DISP1*, DISP1+5
>> ACRJ	DISPLAY+21, DISPLAY+25, DISPLAY+30*, DISP1, DISP1+5, DISP1+6
>> ACRLBDA	ADD+8
>> ACRLDG	ADD+9, ADD1+6*, ADD1+10, ADD1+12, UP+7
>> ACRNEWOB	EN1+3
ACROBJ	DISP1+1, DISP1+9, ADD+12, OBJ+2, OBJ+6, OBJ+7*, OBJ+9, OBJ+12, OBJ+14, PUT~ , PUT+6, PUT+9
>> ACROBJDA	DISP1*, DISP1+1
>> ACROF	DISPLAY+3
>> ACRON	DISPLAY+2, DISPLAY+3
>> ACROTHT	ADD+9, ADD1+7*, ADD1+10, ADD1+12, UP+7
>> ACROUT	TO, EN1+2, EN1+8, EDIT+8
>> ACRPD	ADD+9, ADD1+5*, ADD1+10, ADD1+12, UP+7
ACRPF	EXIT!
>> ACRPRT	DISPLAY, DISPLAY+7, DISPLAY+11, DISPLAY+17, DISPLAY+35, DISP1+8
ACRQUIT	TO, EXIT!, EN1+1, EN1+7, EN1+8, EN2+3, EDIT+6!, EDIT+8, COURSE+9*
>> ACRRC	ADD+9, ADD1+8*, ADD1+10, ADD1+12, UP+7
>> ACRREF	EN1+1, EN1+3, EN1+4, EN1+6, DISPLAY+2, DISPLAY+22, DISPLAY+27, ADD, ADD+4, ADD+6 , ADD+9, ADD1+10, ADD1+11, ADD1+12, ADD1+14, ADD1+15, EDIT+1, EDIT+2, EDIT+4, EDIT+9 , E1+3, OBJ+2, OBJ+3
>> ACRREV	EN1+1
ACRSCREN	COURSE+6, COURSE+7!
ACRSS	EXIT!, DISP1*
ACRSS(	DISP1*, EDIT+10, E1+1
>> ACRSS1	DISP1, DISP1+2, DISP1+3*, DISP1+4, DISP1+11
>> ACRSSCAN	DISP1*, DISP1+1
>> ACRSSDA	DISPLAY+21, DISPLAY+23, DISPLAY+24, DISPLAY+28, DISPLAY+29, DISP1, DISP1+5, ADD+14, E1+1, E1+4 , UP+2, UP+4, UP+5, OBJ+2, OBJ+6, OBJ+7, OBJ+8*, OBJ+9, OBJ+10, OBJ+12
>> ACRSSITM	DISP1*, DISP1+7
>> ACRSSTOT	DISPLAY+21, DISPLAY+34, DISP1+4
>> ACRTXDA	EN1*
ACRX	EXIT!
>> ACRY	EDIT+10
>> D0	COURSE+2*
>> DA	ADD1, ADD1+2, ADD1+10, E1+1, COURSE+2, UP+5, OBJ+2, OBJ+10, PUT+8*
DC	COURSE+1~
>> DIC	ADD+3*
>> DIC("DR"	ADD+8, ADD+9, ADD+10, ADD+12
>> DIC(0	ADD+2*
>> DIE	ADD1+1, E1+2, COURSE+3, UP+6, OBJ+3, OBJ+11, PUT+7*
DIP	COURSE+1~
>> DIR("A"	EDIT+3, COURSE+11
>> DIR("B"	EDIT+4, COURSE+12
>> DIR(0	EDIT+2, COURSE+10
DN	COURSE+1~
>> DR	ADD1+12, ADD1+13, ADD1+14, E1+3, E1+4, COURSE+4, UP+7, OBJ+3, OBJ+12, PUT+9
DXS	COURSE+1~
IOF	DISPLAY+1, DISPLAY+35
IOST	DISPLAY, DISPLAY+35
U	EN1, DISP1, DISP1+1, DISP1+5, ADD+9, ADD+12, ADD1+10, ADD1+12, ADD1+14, EDIT+1 , E1+4, UP+1, OBJ+1, OBJ+2, OBJ+6, OBJ+7, OBJ+9, OBJ+12
>> X	ADD+1, ADD+4, ADD+5, ADD+6, EDIT+10, E1, E1+1, E1+3
>> Y	ADD+14, EDIT+8, EDIT+9, COURSE+9
>> Y(0	ADD+4, ADD+5, ADD+6*, ADD+8, ADD+11

Customize PDF page

Package: Commitment Register

Routine: ACRFSS3

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
PUT(ACROBJ,ACRDOCDA)
OBJ	;
ADD1
EN1
EDIT	;
ADD
UP	;EP;TO UPDATE REQUEST AMOUNT
TO
EN2	;EP
EXIT
DISP1
COURSE	;EP;TO EDIT TRAINING NEED
E1
DISPLAY