Routine: ACRFSSA1

Information

ACRFSSA1 ;IHS/OIRM/DSD/THL,AEF - AUXILLIARY SUB-ROUTINES FOR ACRFSS* ROUTINES; [ 07/20/2006 9:58 AM ]

Source Information

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Commitment Register	7	(DIE,DIR,FILE)^ACRFDIC $$DASH^ACRFMENU UP^ACRFSS3 $$TMFEE^ACRFSS42 $$ADVR^ACRFSSA1 OUTSTD^ACRFTA PAUSE^ACRFWARN
VA Fileman	1	NOW^%DTC

Caller Graph

Caller Graph Total: 8

Package	Total	Caller Graph
Commitment Register	8	ACRFEA21 ACRFPAY9 ACRFPSS ACRFSS4 ACRFSS42 ACRFSSA1 ACRFTA ACRFTOT

Entry Points

Name	Comments	DBIA/ICR reference
ADVANCE	;EP;UPDATE TRAVEL ADVANCE AMOUNT DURING TRAVEL ORDER PROCESSING
ADVR(ACRDOCDA,ACRTAMT,ACRADV)	;LOCAL ENTRY; EXTRINSIC FUNCTION ;ACR2.15.10 ; ENTERS WITH: DOCUMENT IEN ; AMOUNT BEFORE MINU 8 % ; ALLOWABLE ADVANCE ; RETURNS: ADVANCE AMOUNT ; ADJUSTED IF GREATER THAN TAMT-5.00
OTA	;EP;RECORD OUTSTANDING TRAVEL ADVANCE
CHK	;EP;CHECK TO SEE IF ANY SIGNATURES HAVE BEEN APPLIED TO THE TRAVEL
ETA	;EP;TO EDIT/UPDATE TRAVEL ADVANCE
TOTAL	;EP;
ALTOT	;EP;TO CALCULATE TOTAL AIRLINE EXPENSE
TA	;EP;

External References

Name	Field # of Occurrence
NOW^%DTC	OTA+3
DIE^ACRFDIC	TA+18, TA+23, OTA+13, OTA+18, OTA+25, ETA+4, ETA+10
DIR^ACRFDIC	TA+12
FILE^ACRFDIC	OTA+9
$$DASH^ACRFMENU	TOTAL+13
UP^ACRFSS3	TOTAL+31
$$TMFEE^ACRFSS42	TOTAL+21
$$ADVR^ACRFSSA1	TA+6
OUTSTD^ACRFTA	ADVANCE+8
PAUSE^ACRFWARN	TOTAL+30, ADVANCE+15, ADVR+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"ALLOWABLE TRAVEL ADVANCE: ",$J($FN(ACRADV,"P",2),8) Line Location: TA+7
Function Call: WRITE	Prompt: !,"CURRENT AMOUNT REQUESTED: ",$J($FN(ACRADVR,"P",2),8) Line Location: TA+8
Function Call: WRITE	Prompt: $$DASH^ACRFMENU Line Location: TOTAL+13
Function Call: WRITE	Prompt: ! Line Location: TOTAL+14
Function Call: WRITE	Prompt: ?54,"TOTAL EXPENSES: ",$J($FN(ACRTOT,"P",2),9) Line Location: TOTAL+17
Function Call: WRITE	Prompt: !,"PER DIEM: ",$J($FN(ACRPD+ACRLDG,"P",2),8) Line Location: TOTAL+18
Function Call: WRITE	Prompt: ?25,"OTHER.....: ",$J($FN(ACROTHT,"P",2),8) Line Location: TOTAL+19
Function Call: WRITE	Prompt: ?54,$S(ACRREF=130:"EXCLD AIRLINE.: ",1:"REIMBURSABLE..: "),$J($FN(ACRREIM-$P($G(^ACROTA(ACRDOCDA,0)),U,3),"P",2),9) Line Location: TOTAL+20
Function Call: WRITE	Prompt: !,"TM FEE..: ",$J($FN($$TMFEE^ACRFSS42(ACRDOCDA),"P",2),8) Line Location: TOTAL+21
Function Call: WRITE	Prompt: ?54,"TRAVEL ADVANCE: ",$J($FN($P(^ACRDOC(ACRDOCDA,"TO"),U,25),"P",2),9) Line Location: TOTAL+22
Function Call: WRITE	Prompt: !?48,"TOTAL NOT TO EXCEED.: ",$J($FN($P(^("TRNG4"),U,16),"P",2),9) Line Location: TOTAL+23

FileNo	Call Tags
^ACROTA - [#9002185.4]	Classic Fileman Calls
^ACROBL - [#9002189]	Classic Fileman Calls
^ACRDOC - [#9002196]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRAL - [#9002193.7]	ALTOT+4, ALTOT+5
^ACRAL("E"	ALTOT+1, ALTOT+3
^ACRAPVS - [#9002190]	CHK+5
^ACRAPVS("AB"	CHK+2, CHK+5
^ACRDOC - [#9002196]	TA+19, OTA+8, OTA+19, TOTAL+1, TOTAL+2, TOTAL+7, TOTAL+8, TOTAL+11, TOTAL+22, TOTAL+23 , TOTAL+25, TOTAL+26, ADVANCE+1, ADVANCE+6, ADVANCE+17, ADVR+7
^ACROBL - [#9002189]	OTA+14
^ACROTA - [#9002185.4]	OTA+1, TOTAL+20
^ACRSYS(1	TOTAL+11
^AUTTDOCR("B"	ADVANCE+1

Name	Line Occurrences
ADVANCE	TA+4
ETA	TA+13
OTA	TA+24, ETA+11

Name	Field # of Occurrence
^("TO"	TA+19
^("TRNG4"	TOTAL+23
^(0	CHK+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	OTA+4
ACR	CHK+3~
>> ACR4P	TOTAL+2
ACR9E	ADVANCE+9, ADVANCE+10!
ACRADV	TA+6, TA+7, TA+13, TA+19, TA+22, OTA+12, OTA+14, OTA+17, OTA+19, OTA+22 , OTA+24, TOTAL+24, ADVANCE+21, ADVANCE+22, ADVANCE+25*, ETA+3, ETA+7, ETA+9, ADVR~, ADVR+8
ACRADVR	TA+3~, TA+6, TA+8, TA+13, ADVR+7, ADVR+8, ADVR+9, ADVR+10, ADVR+13, ADVR+15
>> ACRALDA	ALTOT+2, ALTOT+3, ALTOT+4, ALTOT+5
>> ACRALTOT	TOTAL+2, TOTAL+15, ALTOT+2, ALTOT+4
>> ACRAPVDA	CHK+4, CHK+5
>> ACRATM	TOTAL+2, TOTAL+3, TOTAL+4, TOTAL+5, TOTAL+6, TOTAL+7, TOTAL+11
>> ACRATM1	TOTAL+7*, TOTAL+9
>> ACRATM2	TOTAL+8*, TOTAL+10
>> ACRATMX	TOTAL+4*, TOTAL+5
>> ACRCONC	ALTOT+5*
ACRDOCDA	TA+6, TA+15, TA+19, TA+20, OTA+1, OTA+5, OTA+8, OTA+10, OTA+14, OTA+15 , OTA+19, OTA+20, TOTAL+1, TOTAL+2, TOTAL+7, TOTAL+8, TOTAL+11, TOTAL+20, TOTAL+21, TOTAL+22 , TOTAL+23, TOTAL+25, TOTAL+26, CHK+2, CHK+5, ADVANCE+1, ADVANCE+6, ADVANCE+17, ALTOT+1, ALTOT+3 , ETA+1, ETA+5, ADVR~, ADVR+7
ACRDUZ	ADVANCE+5~, ADVANCE+6*, ADVANCE+7
>> ACRLDG	TOTAL+2, TOTAL+18, ADVANCE+2*, ADVANCE+19
ACRNOW	OTA+2~, OTA+4*
>> ACROBL	TOTAL+26*, TOTAL+27, TOTAL+28, TOTAL+29
>> ACROTHT	TOTAL+19, ADVANCE+4*, ADVANCE+19
>> ACRPD	TOTAL+18, ADVANCE+19
>> ACRPHN	TOTAL+2
>> ACRPRT	TOTAL+24
ACRQTA	TA+1~, TA+5, ADVANCE+14*
>> ACRQUIT	TOTAL+30
>> ACRRC	TOTAL+2, TOTAL+16, ADVANCE+3*, ADVANCE+19
>> ACRREF	TOTAL+20, TOTAL+24, TOTAL+25
>> ACRREFX	TOTAL+7, TOTAL+9, TOTAL+10, TOTAL+11
>> ACRREIM	TOTAL+2, TOTAL+20
ACRTAMT	TA+2~, TA+6, OTA+22, ADVANCE+19, ADVANCE+21, ADVANCE+25, ETA+7, ADVR~, ADVR+10, ADVR+13
ACRTO	ADVANCE+16~, ADVANCE+17*, ADVANCE+18
>> ACRTOT	TOTAL+17, TOTAL+23*, TOTAL+24, TOTAL+28, TOTAL+29
>> ACRTV("D"	TOTAL+32!
>> ACRTVCH	CHK+5*
>> DA	TA+15, TA+20, OTA+10, OTA+15, OTA+20, ETA+1, ETA+5*
>> DIC	OTA+6*
>> DIC("DR"	OTA+8*
>> DIC(0	OTA+7*
>> DIE	TA+16, TA+21, OTA+11, OTA+16, OTA+23, ETA+2, ETA+8*
>> DINUM	OTA+5*
>> DIR("A"	TA+10*
>> DIR("B"	TA+11*
>> DIR(0	TA+9*
>> DR	TA+17, TA+22, OTA+12, OTA+17, OTA+24, ETA+3, ETA+9*
U	TA+19, OTA+8, OTA+19, TOTAL+1, TOTAL+2, TOTAL+7, TOTAL+8, TOTAL+11, TOTAL+20, TOTAL+22 , TOTAL+23, TOTAL+25, TOTAL+26, CHK+5, ADVANCE+1, ADVANCE+6, ADVANCE+18, ALTOT+4, ALTOT+5, ADVR+7
>> X	OTA+5*
>> Y	TA+13, TA+14

Customize PDF page

Package: Commitment Register

Routine: ACRFSSA1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller 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: