Routine: ABMDE8C

Package	Total	Call Graph
Third Party Billing	7	(PAUSE,SUM)^ABMDE1 C^ABMDE8X ^ABMDERR ($$CDT,$$GETREV)^ABMDUTL ^ABMDWRAP $$ONE^ABMFEAPI $$EN^ABMVDF
VA Fileman	4	^DIC FILE^DICN ^DIE ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP
A	;ADD ENTRY
FEE
E	;EDIT EXISTING ENTRY
PC1
DEL100	;if 100 ask to delete
EOP
XIT
HD
LOOP	;LOOP

External References

Name	Field # of Occurrence
PAUSE^ABMDE1	DISP+2, EOP
SUM^ABMDE1	DISP+3
C^ABMDE8X	FEE+3
^ABMDERR	LOOP+3
$$CDT^ABMDUTL	EOP+5
$$GETREV^ABMDUTL	PC1+3
^ABMDWRAP	EOP+15
$$ONE^ABMFEAPI	E+11
$$EN^ABMVDF	DEL100+3
^DIC	A+4
FILE^DICN	A+8
^DIE	EOP+1, E+15, E+24, E+27
^DIR	E+6, DEL100+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?71,"TOTAL" Line Location: HD+0
Function Call: WRITE	Prompt: !?5,"REVENUE CODE",?37,"CPT",?44,"CHARGE",?54,"DAYS",?61,"UNITS",?71,"CHARGE" Line Location: HD+1
Function Call: WRITE	Prompt: !?5,"=============================",?37,"===",?44,"======",?54,"====",?61,"=====",?70,"=========" Line Location: HD+2
Function Call: WRITE	Prompt: !?54,"====",?70,"=========",!?53,$J(ABMZ("DAYS"),4),?69,$J("$"_($FN(ABMZ("TOTL"),",",2)),10) Line Location: LOOP+2
Function Call: WRITE	Prompt: !,"[",ABM("I"),"]" Line Location: EOP+2
Function Call: WRITE	Prompt: ?5,$P(ABMZ(ABM("I")),U) Line Location: EOP+6
Function Call: WRITE	Prompt: !!,"You have entered an all inclusive revenue code. Do you want to" Line Location: DEL100+2
Function Call: WRITE	Prompt: !,$$EN^ABMVDF("RVN"),"DELETE ALL",$$EN^ABMVDF("RVF")," line items from the other pages?",! Line Location: DEL100+3
Function Call: WRITE	Prompt: ! Line Location: DEL100+6
Function Call: WRITE	Prompt: ! Line Location: DEL100+11
Routine Call	DIE Line Location: EOP+1 E+15 E+24 E+27
Routine Call	DIC Line Location: A+4
Routine Call	DIR Line Location: E+6 DEL100+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABMDCLM - [#9002274.3]	Classic Fileman Calls
^AUTTREVN - [#9999999.72]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	LOOP+1, PC1, EOP+1, E+8, E+17, E+19, E+26, E+27, DEL100+8, DEL100+10!
^ABMDEXP - [#9002274.08]	E+18
^ABMNINS(	E+17, E+19, E+20
^AUTTREVN - [#9999999.72]	EOP+14
^DD(9002274.3	A+1, DEL100+9
^DIC(81.1 - [#81.1]	E+27
^ICPT - [#81]	PC1+3, E+27

Label References

Name	Line Occurrences
A	E+1
DEL100	A+11
HD	FEE+4, EOP
LOOP	FEE+4
PC1	LOOP+1
XIT	DISP+2, LOOP+4

Naked Globals

Name	Field # of Occurrence
^(0	PC1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	LOOP+1*, PC1+3, XIT!
ABM("I"	LOOP+1*, PC1+3, EOP+2, EOP+6, EOP+7
ABM("X"	LOOP+1, PC1, PC1+3, EOP+1, EOP+9, EOP+14
ABM("X0"	PC1*, PC1+1, PC1+3, EOP+3, EOP+5, EOP+8, EOP+12, EOP+13
>> ABMCNCK	E+19*, E+20
>> ABME("CONT"	LOOP+3*!
>> ABME(0	LOOP+3
>> ABMP("CDFN"	LOOP+1, PC1, EOP+1, A+6, E+4, E+17, E+19, E+26, E+27, DEL100+8 , DEL100+10
>> ABMP("DDL"	DISP+2
>> ABMP("EXP"	E+18
>> ABMP("FEE"	E+11
>> ABMP("INS"	E+17, E+19, E+20
>> ABMP("LDFN"	E+17, E+19, E+20
>> ABMP("VDT"	E+11
>> ABMTCPT	E+26*, E+27
>> ABMU("LM"	EOP+15*
>> ABMU("RM"	EOP+15*
>> ABMU("TXT"	EOP+14*
>> ABMU(1	EOP+7*
>> ABMU(2	EOP+8*
>> ABMU(3	EOP+9, EOP+10
>> ABMU(4	EOP+11*
>> ABMU(5	EOP+12*
ABMZ	DISP+1!
ABMZ(	PC1+3*, EOP+6, EOP+7, E+7
ABMZ("CAT"	FEE*
ABMZ("CHRG"	FEE+1*
ABMZ("DAYS"	FEE, FEE+2, LOOP+2, EOP+9*
ABMZ("DIC"	FEE+1*
ABMZ("DR"	FEE+1*
ABMZ("ITEM"	FEE+1*
ABMZ("LNUM"	LOOP+1*
ABMZ("NUM"	LOOP+1, LOOP+2, A+10, E+1, E+5, E+6
ABMZ("PG"	DISP+1*
ABMZ("RVCODE"	A+5, A+7, E+2, E+8, E+11, DEL100+1
ABMZ("SUB"	FEE*
ABMZ("TITL"	DISP+1*
ABMZ("TOTL"	FEE+2, LOOP+2, EOP+13
ABMZ("UC"	E+11*, E+13
ABMZ("UNIT"	PC1+1, PC1+2, EOP+9, EOP+11, EOP+12, EOP+13
ABMZ("X"	FEE+2*
ABMZ(1	LOOP+1*
DA	EOP+1, A+9, E+3!, E+7*, E+8, E+9, E+17, E+19, E+26, E+27
DA(1	A+6, E+4, E+8
DD	A+8!
DIC	DISP+1!, A+2, A+7
DIC("A"	A+3!
DIC("P"	A+1*
DIC(0	A+2*
>> DIE	EOP+1, E+12
DIR	E+6!, DEL100+4!
DIR("B"	DEL100+4*
DIR(0	E+6, DEL100+4
>> DIROUT	DISP+2
DO	A+8!
>> DR	EOP+1, E+13, E+16, E+20, E+23, E+27
>> DTOUT	DISP+2
>> DUOUT	DISP+2
DUZ(2	LOOP+1, PC1, EOP+1, E+8, E+17, E+19, E+26, E+27, DEL100+8, DEL100+10
I	DEL100+7~*, DEL100+8, DEL100+9, DEL100+10
IOSL	DISP+2, EOP
U	PC1, PC1+1, PC1+3, EOP+1, EOP+6, EOP+7, EOP+8, EOP+9, EOP+10, EOP+11 , EOP+12, EOP+13, EOP+14, A+1, E+8, E+11, E+17, E+18, E+19, E+20 , E+26, E+27, DEL100+9
>> X	A+7*
>> Y	A+5, A+9, E+5*, E+6, E+7, DEL100+5

Customize PDF page

Package: Third Party Billing

Routine: ABMDE8C

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: