Routine: ABMDE9B

Package	Total	Call Graph
Third Party Billing	2	(PAUSE,SUM)^ABMDE1 ^ABMDERR
VA Fileman	1	^DIE

Package	Total	Caller Graph
Third Party Billing	1	ABMDE9

Entry Points

Name	Comments	DBIA/ICR reference
SPCL	; Special Program
HD7
HD5
HD6	;
LOOP7
CATTCH	; Claim Attachments
V1
REM1	;
DISP7	;EP - Entry Point for Claim Attachments
REM	; Remarks
SPCL1
XIT
ATTCH1
DISP5	;EP - Entry Point for Spec Prog code
LOOP5
DISP6	;EP - Entry Point for Remarks

External References

Name	Field # of Occurrence
PAUSE^ABMDE1	DISP5+2, SPCL1+2, DISP6+7, DISP7+2, ATTCH1+2
SUM^ABMDE1	DISP5+3, DISP6+8, DISP7+3, V1
^ABMDERR	LOOP5+1, LOOP7+3, V1+1
^DIE	REM1+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?6,"PRGM" Line Location: HD5+0
Function Call: WRITE	Prompt: !?6,"CODE",?14," SPECIAL PROGRAM DESCRIPTION" Line Location: HD5+1
Function Call: WRITE	Prompt: !?6,"====",?14,"============================================================" Line Location: HD5+2
Function Call: WRITE	Prompt: !,"[",ABM("I"),"]",?7,$P(ABMZ(ABM("I")),U),?14,$P(^ABMDCODE(ABM("X"),0),U,3) Line Location: SPCL1+3
Function Call: WRITE	Prompt: !?5,"REPORT TYPE" Line Location: HD7+0
Function Call: WRITE	Prompt: ?26,"TRNS TYPE" Line Location: HD7+1
Function Call: WRITE	Prompt: ?45,"CONTROL NUMBER" Line Location: HD7+2
Function Call: WRITE	Prompt: !?5,"====================",?26,"==================",?45,"============================" Line Location: HD7+3
Function Call: WRITE	Prompt: !,"[",ABM("I"),"]",?5,$P(ABMZ(ABM("I")),U),?8,$E($P(^ABMDCODE(ABM("X"),0),U,3),1,17) Line Location: ATTCH1+3
Function Call: WRITE	Prompt: ?26,ABMTCODE_" " Line Location: ATTCH1+5
Function Call: WRITE	Prompt: $S(ABMTCODE="AA":"Avail On Req",ABMTCODE="BM":"By Mail",ABMTCODE="EL":"Elec Only",ABMTCODE="EM":"E-Mail",ABMTCODE="FX":"By Fax",1:"") Line Location: ATTCH1+6
Function Call: WRITE	Prompt: ?45,$E($P(ABMZ(ABM("I")),U,4),1,35) Line Location: ATTCH1+7
Function Call: WRITE	Prompt: !?15,"REMARKS" Line Location: HD6+1
Function Call: WRITE	Prompt: !?6,"========================================" Line Location: HD6+2
Function Call: WRITE	Prompt: !,?7,"(19 characters - 1st line; 24 characters x 3 lines max)" Line Location: HD6+3
Function Call: WRITE	Prompt: !,?7,"(48 characters x 4 lines max)" Line Location: HD6+4
Function Call: WRITE	Prompt: !,?5,"------------------------------------------------" Line Location: HD6+5
Function Call: WRITE	Prompt: !,?5,"------------------------------------------------",! Line Location: HD6+9
Function Call: WRITE	Prompt: !!,"ADA-94 ONLY CONTAINS 62 CHARACTERS. ADDITIONAL DATA MAY BE CUT OFF" Line Location: HD6+10
Function Call: WRITE	Prompt: !!,"ADA-99 ONLY CONTAINS 45 CHARACTERS. ADDITIONAL DATA MAY BE CUT OFF" Line Location: HD6+11
Function Call: WRITE	Prompt: !!,"ADA-2002 ONLY CONTAINS 80 CHARACTERS. ADDITIONAL DATA MAY BE CUT OFF" Line Location: HD6+12
Routine Call	DIE Line Location: REM1+2

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	LOOP5, SPCL1, DISP6+3, DISP6+4, DISP6+5, LOOP7+2, ATTCH1, HD6+8
^ABMDCODE - [#9002274.03]	SPCL1+1, SPCL1+3, ATTCH1+1, ATTCH1+3
^ABMDEXP - [#9002274.08]	DISP6+2, DISP6+4

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ABM	LOOP5, SPCL1+1, LOOP7+1, LOOP7+2*, ATTCH1+1
>> ABM("I"	LOOP5, SPCL1+1, SPCL1+3, LOOP7+2, ATTCH1+1, ATTCH1+3, ATTCH1+4, ATTCH1+7
>> ABM("X"	LOOP5, SPCL1, SPCL1+1, SPCL1+3, LOOP7+2, ATTCH1, ATTCH1+1, ATTCH1+3
>> ABM("X0"	SPCL1, SPCL1+1, ATTCH1, ATTCH1+1
>> ABME("CONT"	LOOP5+1!, LOOP7+3!
>> ABME(0	LOOP5+1, LOOP7+3
>> ABMP("CDFN"	LOOP5, SPCL1, DISP6+3, DISP6+4, DISP6+5, LOOP7+2, ATTCH1, HD6+8, REM1+2
>> ABMP("DDL"	DISP5+2, DISP6+7, DISP7+2
>> ABMP("EXP"	DISP6+2, DISP6+4, HD6+3, HD6+10, HD6+11, HD6+12
>> ABMQUIET	REM1+1
>> ABMTCODE	ATTCH1+4*, ATTCH1+5, ATTCH1+6
ABMZ	DISP5+1!, DISP6+6!, DISP7+1!
ABMZ(	SPCL1+1, SPCL1+3, ATTCH1+1, ATTCH1+3, ATTCH1+4, ATTCH1+7
ABMZ("DIC"	SPCL+1, CATTCH+1
ABMZ("DR"	SPCL+1, CATTCH+1
ABMZ("ITEM"	SPCL+1, CATTCH+1
ABMZ("LNUM"	LOOP5, LOOP7
ABMZ("MAX"	SPCL+1, CATTCH+1
ABMZ("NUM"	LOOP5, LOOP7, LOOP7+2*
ABMZ("PG"	DISP5+1, DISP6+6, DISP7+1*
ABMZ("SUB"	SPCL+1, CATTCH+1
ABMZ("TITL"	DISP5+1, DISP6+6, DISP7+1, V1
ABMZ("X"	SPCL+1, CATTCH+1
ABMZ(1	LOOP5, LOOP7
>> DA	REM1+2*
>> DIE	REM1+2*
>> DIROUT	DISP5+2, SPCL1+2, DISP6+7, DISP7+2, ATTCH1+2
>> DR	REM1+2*
DT	DISP6+5
>> DTOUT	DISP5+2, SPCL1+2, DISP6+7, DISP7+2, ATTCH1+2
>> DUOUT	DISP5+2, SPCL1+2, DISP6+7, DISP7+2, ATTCH1+2
DUZ(2	LOOP5, SPCL1, DISP6+3, DISP6+4, DISP6+5, LOOP7+2, ATTCH1, HD6+8
I	DISP6+1~, DISP6+2, DISP6+3, DISP6+4, DISP6+5, HD6+6~, HD6+7, HD6+8
IOSL	DISP5+2, SPCL1+2, DISP6+7, DISP7+2, ATTCH1+2
U	SPCL1, SPCL1+1, SPCL1+3, ATTCH1, ATTCH1+1, ATTCH1+3, ATTCH1+4, ATTCH1+7

Customize PDF page

Package: Third Party Billing

Routine: ABMDE9B

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

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	Line Occurrences
ATTCH1	LOOP7+2
HD5	SPCL+2, SPCL1+2
HD6	REM+1
HD7	CATTCH+2, ATTCH1+2
LOOP5	SPCL+2
LOOP7	CATTCH+2
REM1	REM+1
SPCL1	LOOP5
XIT	DISP5+2, SPCL1+2, DISP6+7, DISP7+2, ATTCH1+2