Routine: ACRFTR1

Package	Total	Call Graph
Commitment Register	5	EN2^ACRFCLM $$DASH^ACRFMENU ($$TTYPE,EXIT)^ACRFTR $$NAME2^ACRFUTL1 PAUSE^ACRFWARN

Name	Comments	DBIA/ICR reference
HEAD	;EP;PRINT TRAINING SUMMARY HEADER
GATHER	;GATHER DATA ON EACH TRAVEL DOCUMENT
GROUP	;INCLUDE GROUP TRAINING PARTICIPANTS IN TRAINING REPORT
DTL
H
S1
H1
ALL	;PRINT ALL SUMMARY REPORTS
START	;EP;TO PRINT TRAINING SUMMARY
TAIL	;
DOCS	;GATHER AND PRINT INFO ON EACH TRAINING DOCUMENT
STAIL	;
TYPET
PL	;PRINT LINE SUMMARY OF EACH DOCUMENT
TYPE(X,Y)	;DETERMINE NAME TO PRINT

Name	Field # of Occurrence
EN2^ACRFCLM	GATHER+1
$$DASH^ACRFMENU	PL+14
$$TTYPE^ACRFTR	ALL+6
EXIT^ACRFTR	DTL+17
$$NAME2^ACRFUTL1	GATHER+30
PAUSE^ACRFWARN	DTL+11, DTL+18, DOCS+6, STAIL+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+1
Function Call: WRITE	Prompt: !!,"SUMMARY FOR...: ",ACRFOR Line Location: H1+5
Function Call: WRITE	Prompt: ?60,"PAGE: ",ACRDC Line Location: H1+7
Function Call: WRITE	Prompt: !,"REPORT DATE...: " Line Location: H1+8
Function Call: WRITE	Prompt: Y Line Location: H1+11
Function Call: WRITE	Prompt: !,"BEGINNING DATE: " Line Location: H1+12
Function Call: WRITE	Prompt: Y Line Location: H1+15
Function Call: WRITE	Prompt: !,"ENDING DATE...: " Line Location: H1+16
Function Call: WRITE	Prompt: Y Line Location: H1+19
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: H1+20
Function Call: WRITE	Prompt: !,"AUTHORIZA-" Line Location: H1+21
Function Call: WRITE	Prompt: ?11,"EMPLOYEE" Line Location: H1+22
Function Call: WRITE	Prompt: !,"TION NO." Line Location: H1+23
Function Call: WRITE	Prompt: ?11,"COURSE TITLE" Line Location: H1+24
Function Call: WRITE	Prompt: ?28,"SERIES/GRD" Line Location: H1+25
Function Call: WRITE	Prompt: ?41,"TUITION" Line Location: H1+26
Function Call: WRITE	Prompt: ?49,"BOOKS" Line Location: H1+27
Function Call: WRITE	Prompt: ?57,"TRAVEL" Line Location: H1+28
Function Call: WRITE	Prompt: ?65,"M & IE" Line Location: H1+29
Function Call: WRITE	Prompt: ?73,"OTHER" Line Location: H1+30
Function Call: WRITE	Prompt: !,"---------- ----------------------------- ------- ------- ------- ------- -------" Line Location: H1+31
Function Call: WRITE	Prompt: !,$E(ACRTGNO,1,10) Line Location: PL+1
Function Call: WRITE	Prompt: ?11,ACRTRNEE Line Location: PL+2
Function Call: WRITE	Prompt: ?32,ACRGRD Line Location: PL+3
Function Call: WRITE	Prompt: !?11,ACRTITLE Line Location: PL+4
Function Call: WRITE	Prompt: ?40,$J($P(ACR4,"."),8) Line Location: PL+5
Function Call: WRITE	Prompt: ?48,$J($P(ACR5,"."),8) Line Location: PL+6
Function Call: WRITE	Prompt: ?56,$J($P(ACR1,"."),8) Line Location: PL+7
Function Call: WRITE	Prompt: ?64,$J($P(ACR2,"."),8) Line Location: PL+8
Function Call: WRITE	Prompt: ?72,$J($P(ACR3,"."),8) Line Location: PL+9
Function Call: WRITE	Prompt: !?11,"HOURS: ",$J(ACRDUTHR,4),$J(ACRNDHR,5) Line Location: PL+10
Function Call: WRITE	Prompt: ?48,$J($P(ACR4+ACR5,"."),8) Line Location: PL+12
Function Call: WRITE	Prompt: ?72,$J($P(ACR1+ACR2+ACR3,"."),8) Line Location: PL+13
Function Call: WRITE	Prompt: $$DASH^ACRFMENU Line Location: PL+14
Function Call: WRITE	Prompt: !?18,"---- ----" Line Location: TAIL+1
Function Call: WRITE	Prompt: ?41,"------- ------- ------- ------- -------" Line Location: TAIL+2
Function Call: WRITE	Prompt: !?5,"TOTAL HOURS: ",$J(ACRTOTD,4),$J(ACRTOTND,5) Line Location: TAIL+3
Function Call: WRITE	Prompt: ?32,"DOLLARS:" Line Location: TAIL+4
Function Call: WRITE	Prompt: ?40,$J($P(ACRT4,"."),8) Line Location: TAIL+5
Function Call: WRITE	Prompt: ?48,$J($P(ACRT5,"."),8) Line Location: TAIL+6
Function Call: WRITE	Prompt: ?56,$J($P(ACRT1,"."),8) Line Location: TAIL+7
Function Call: WRITE	Prompt: ?64,$J($P(ACRT2,"."),8) Line Location: TAIL+8
Function Call: WRITE	Prompt: ?72,$J($P(ACRT3,"."),8) Line Location: TAIL+9
Function Call: WRITE	Prompt: !?30,"SUB-TOTAL:" Line Location: TAIL+10
Function Call: WRITE	Prompt: ?48,$J($P(ACRT4+ACRT5,"."),8) Line Location: TAIL+11
Function Call: WRITE	Prompt: ?72,$J($P(ACRT1+ACRT2+ACRT3,"."),8) Line Location: TAIL+12
Function Call: WRITE	Prompt: !?28,"TOTAL COSTS:" Line Location: TAIL+13
Function Call: WRITE	Prompt: ?72,$J($P(ACRT1+ACRT2+ACRT3+ACRT4+ACRT5,"."),8) Line Location: TAIL+14
Function Call: WRITE	Prompt: !?5,$$TYPE(ACRTYPET,ACRTYPE("G")) Line Location: STAIL+1
Function Call: WRITE	Prompt: !?11,"HOURS: ",$J(+$G(ACRTOTD(ACRTYPET)),4),$J(+$G(ACRTOTND(ACRTYPET)),5) Line Location: STAIL+2
Function Call: WRITE	Prompt: ?32,"DOLLARS:" Line Location: STAIL+3
Function Call: WRITE	Prompt: ?40,$J($P($G(ACRT4(ACRTYPET)),"."),8) Line Location: STAIL+4
Function Call: WRITE	Prompt: ?48,$J($P($G(ACRT5(ACRTYPET)),"."),8) Line Location: STAIL+5
Function Call: WRITE	Prompt: ?56,$J($P($G(ACRT1(ACRTYPET)),"."),8) Line Location: STAIL+6
Function Call: WRITE	Prompt: ?64,$J($P($G(ACRT2(ACRTYPET)),"."),8) Line Location: STAIL+7
Function Call: WRITE	Prompt: ?72,$J($P($G(ACRT3(ACRTYPET)),"."),8) Line Location: STAIL+8
Function Call: WRITE	Prompt: !?21,"CATEGORY SUB-TOTAL:" Line Location: STAIL+9
Function Call: WRITE	Prompt: ?48,$J($P($G(ACRT4(ACRTYPET))+$G(ACRT5(ACRTYPET)),"."),8) Line Location: STAIL+10
Function Call: WRITE	Prompt: ?72,$J($P($G(ACRT1(ACRTYPET)),".")+$P($G(ACRT2(ACRTYPET)),".")+$P($G(ACRT3(ACRTYPET)),"."),8) Line Location: STAIL+11
Function Call: WRITE	Prompt: !?19,"CATEGORY TOTAL COSTS:" Line Location: STAIL+12
Function Call: WRITE	Prompt: ?72,$J($P($G(ACRT4(ACRTYPET))+$G(ACRT5(ACRTYPET))+$G(ACRT1(ACRTYPET))+$G(ACRT2(ACRTYPET))+$G(ACRT3(ACRTYPET)),"."),8) Line Location: STAIL+13

Name	Line Occurrences (* Changed, ! Killed)
^ACRAU - [#9002185.3]	S1+19, GATHER+31
^ACRDOC - [#9002196]	S1+4, S1+6, S1+7, S1+11, S1+12, S1+13, S1+14, S1+25, DTL+7, DTL+8 , DTL+9, GATHER+28
^ACRLOCB - [#9002188]	S1+9
^ACROBL - [#9002189]	S1+5, S1+23
^ACRPO - [#9002199.4]	S1+10
^ACRTPAR("B"	DOCS+4
^ACRTVAL("B"	S1+23
^DD("DD"	H1+10, H1+14, H1+18
^TMP("ACRTRNG"	S1!, S1+25*, S1+26, DTL+2, DTL+4, DTL+5, DTL+13

Name	Line Occurrences
$$TYPE	STAIL+1
ALL	START+1
DOCS	DTL+10
DTL	DTL+11
GATHER	DOCS+1
GROUP	DOCS+4
H	S1+1, DTL+11
H1	H+1
HEAD	H, DOCS+7, STAIL+16
PL	DOCS+3
S1	ALL+7
STAIL	DTL+13
TAIL	DTL+14, DTL+16
TYPET	S1+24, GATHER+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR1	PL+7, PL+13, GATHER+12, GATHER+18
>> ACR2	PL+8, PL+13, GATHER+13, GATHER+19
>> ACR3	PL+9, PL+13, GATHER+14, GATHER+20
>> ACR4	PL+5, PL+12, GATHER+15, GATHER+21
>> ACR5	PL+6, PL+12, GATHER+16, GATHER+22
>> ACR6	GATHER+17, GATHER+23
>> ACRAREA	S1+10
>> ACRBEGIN	H1+13, S1+22
>> ACRCAN	S1+11
>> ACRDATES	PL+11, GATHER+33*
>> ACRDC	H1+6*, H1+7
>> ACRDFN	S1+4
>> ACRDOC	DTL+3, DTL+4, DTL+5
>> ACRDOC0	S1+7*, S1+8, S1+9, S1+10
>> ACRDOCDA	S1+2, S1+4, S1+5, S1+6, S1+7, S1+11, S1+12, S1+13, S1+14, S1+23 , S1+25, DTL+5*, DTL+6, DTL+7, DTL+8, DTL+9, GATHER+28, DOCS+4
>> ACRDTAIL	DTL+11
>> ACRDUTHR	PL+10, GATHER+6*, GATHER+8, GATHER+9
>> ACRDUZ	GATHER+5*, GATHER+30, GATHER+31
>> ACREND	H1+17, S1+22
>> ACRFOR	H1+5
>> ACRFROM	GATHER+25*, GATHER+33
>> ACRGRD	PL+3, GATHER+31, GATHER+32
>> ACRLOC	S1+9
>> ACRNDHR	PL+10, GATHER+7*, GATHER+10, GATHER+11
>> ACRNVAL	S1+23
>> ACROUT	S1+4, ALL+2
>> ACRPOZ	S1+8
>> ACRQUIT	S1+4, DTL+2, DTL+4, DTL+13, ALL+2
>> ACRSG	S1+15
ACRSGX	S1+15, S1+16, S1+17, S1+19, S1+20!
ACRSMRY	H1, DTL+11, DTL+15!, GATHER+24, DOCS+2, ALL+3*
>> ACRT1	DTL, GATHER+12, TAIL+7, TAIL+12, TAIL+14
>> ACRT1(	GATHER+18*, STAIL+6, STAIL+11, STAIL+13
>> ACRT2	DTL, GATHER+13, TAIL+8, TAIL+12, TAIL+14
>> ACRT2(	GATHER+19*, STAIL+7, STAIL+11, STAIL+13
>> ACRT3	DTL, GATHER+14, TAIL+9, TAIL+12, TAIL+14
>> ACRT3(	GATHER+20*, STAIL+8, STAIL+11, STAIL+13
>> ACRT4	DTL, GATHER+15, TAIL+5, TAIL+11, TAIL+14
>> ACRT4(	GATHER+21*, STAIL+4, STAIL+10, STAIL+13
>> ACRT5	DTL, GATHER+16, TAIL+6, TAIL+11, TAIL+14
>> ACRT5(	GATHER+22*, STAIL+5, STAIL+10, STAIL+13
>> ACRT6	DTL, GATHER+17
>> ACRT6(	GATHER+23*
>> ACRTGNO	PL+1, GATHER+28*
>> ACRTITLE	PL+4, GATHER+27*
>> ACRTO	GATHER+26*, GATHER+33
>> ACRTOTD	DTL, GATHER+8, TAIL+3
>> ACRTOTD(	GATHER+9*, STAIL+2
>> ACRTOTND	DTL, GATHER+10, TAIL+3
>> ACRTOTND(	GATHER+11*, STAIL+2
>> ACRTRNEE	PL+2, GATHER+30*
>> ACRTRNG	S1+12, S1+18, S1+19, S1+22, DTL+7, GATHER+5, GATHER+6, GATHER+7, GATHER+25, GATHER+26 , GATHER+27, TYPET
>> ACRTRNG3	S1+13, S1+16, S1+21, DTL+8, TYPET
>> ACRTRNG4	S1+14, DTL+9, TYPET
>> ACRTT	S1+21
>> ACRTYPE	H1+3, START+1, TYPE+1, ALL+4*, ALL+5, ALL+6, TYPET
>> ACRTYPE("G"	STAIL+1, ALL+6*
>> ACRTYPET	S1+25, DTL+1, DTL+2, DTL+4, DTL+5, DTL+12, DTL+13, GATHER+9, GATHER+11, GATHER+18 , GATHER+19, GATHER+20, GATHER+21, GATHER+22, GATHER+23, STAIL+1, STAIL+2, STAIL+4, STAIL+5, STAIL+6 , STAIL+7, STAIL+8, STAIL+10, STAIL+11, STAIL+13, TYPET, TYPET+1
>> ACRXREF	S1+4
ACRXT	DTL+17, ALL+1~, ALL+2*, ALL+4
DT	H1+9
I	GATHER+2~, GATHER+3*
IOF	HEAD+1, DTL+19
IOSL	DOCS+5, STAIL+14
IOST	DTL+19, H
U	S1+6, S1+8, S1+9, S1+10, S1+11, S1+16, S1+17, S1+18, S1+19, S1+21 , S1+22, S1+23, S1+25, GATHER+5, GATHER+6, GATHER+7, GATHER+25, GATHER+26, GATHER+27, GATHER+28 , GATHER+32, TYPE+3, TYPET
X	H1+2~, H1+3, H1+4, TYPE~, TYPE+1, TYPE+2, TYPE+3, TYPE+4
Y	H1+9, H1+11, H1+13, H1+15, H1+17*, H1+19, TYPE~, TYPE+2

Customize PDF page

Package: Commitment Register

Routine: ACRFTR1

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: