Routine: ABMER10

Package	Total	Call Graph
Third Party Billing	2	$$ENVOY^ABMEF16 ($$FMT,$$RCID,SET)^ABMERUTL
VA Fileman	1	EN^DIQ1

Package	Total	Caller Graph
Third Party Billing	9	ABMDF11X ABMDF28X ABMDF51X ABMEF10 ABMEF13 ABMEF16 ABMEF17 ABMER46 ABMER80
Local Area Programs	1	AZAXSND
Phoenix Devel Center	1	AZXDF11X

Entry Points

Name	Comments	DBIA/ICR reference
150	; EP ; Provider State (SOURCE: FILE=9999999.06 FIELD=.16) ; Form locator #1
EX(ABMX,ABMY)	;EXTRINSIC FUNCTION HERE
190	;Filler (National Use)
60	;Medicare Provider Number (SOURCE: FILE=9999999.181501, FIELD=.02)
130	; EP ; Provider Address (SOURCE: FILE=9999999.06, FIELD=9999999.06,.14) ; Form locator #1
110	; EP ; Provider Telephone Number (SOURCE: FILE=9999999.06 FIELD=.13) ; Form locator #1
80	; Champus Insurer Provider Number ; (SOURCE: FILE=9999999.181501, FIELD=.02)
170	;Provider FAX Number (SOURCE: FILE= FIELD=)
20	;Type of Batch (SOURCE: FILE=9002274.4, FIELD=.02)
40	; EP ; Federal Tax Number or EIN (SOURCE: FILE=9999999.06, FIELD=.21) ; 2/10/98 - LSL - Use Fed Tax Number of facility providing service ; not facility receiving payment. Per Santa Fe. ; form locator #5
180	;Country Code (SOURCE: FILE=, FIELD=)
200	;Filler (Local Use)
140	; EP ; Provider City (SOURCE: FILE=9999999.06, FIELD=.15) ; Form locator #1
120	; EP ; Provider Name (SOURCE: FILE=9002274.5, FIELD=.26) ; Form locator #1
START	;START HERE
70	;Medicaid Provider Number (SOURCE: FILE=9999999.181501, FIELD=.02)
90	; Other Insurer Provider Number 1 ; (SOURCE: FILE=9999999.181501, FIELD=.02)
100	;Other Insurer Provider Number 2 (SOURCE: FILE=9999999.18, FIELD=)
160	; EP ; Provider Zip (SOURCE: FILE=9999999.06, FIELD=.17) ; Form locator #1
10	;Record type
REPLNOT(X,P)	; EP - replace punctuation not in P in X with spaces ; return the result ; P is the punctuation you want to protect ; replaces control chars too
30	;Batch Number
DIQ2	;GET SITE PARAMETER INFO
50	;Federal Tax Submitter ID (SOURCE: FILE=, FIELD=)
DIQ1	;PULL LOCATION DATA VIA DIQ1
LOOP	;LOOP HERE

External References

Name	Field # of Occurrence
$$ENVOY^ABMEF16	130+5
$$FMT^ABMERUTL	20+2, 30+2, 40+8, 40+10, 50+2, 60+10, 70+6, 80+3, 90+8, 100+2 , 110+6, 120+6, 130+7, 140+5, 150+5, 160+6, 170+2, 180+2, 190+2, 200+2
$$RCID^ABMERUTL	40+7, 40+9, 70+5
SET^ABMERUTL	EX+8
EN^DIQ1	DIQ1+8, DIQ1+13, DIQ2+8

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDPARM(	DIQ1+9
^ABMEXLM("AA"	LOOP+3
^ABMNINS(	60+3, 70+3, 90+5
^AUTNINS - [#9999999.18]	40+12, 60+4, 70+4, 90+6
^AUTTLOC - [#9999999.06]	120+5, DIQ1+10
^DIC(5 - [#5]	150+4

Label References

Name	Line Occurrences
$$REPLNOT	130+6
@(	LOOP+2, LOOP+3, EX+10
DIQ1	40+5, 60+6, 90+4, 110+3, 130+3, 140+3, 150+3, 160+3
DIQ2	120+3
LOOP	START+3

Naked Globals

Name	Field # of Occurrence
^(	LOOP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	START+4!, EX+12!
ABM(	40+6, 60+7, 90+7, 110+4, 120+4, 130+4, 140+4, 150+4, 160+4, DIQ1+1 , DIQ2+1
ABME	START+4!, EX+12!
ABME("RTYPE"	START+2*
>> ABMEF("BATCH#"	30+1
>> ABMP("BCBS"	90+3
>> ABMP("BDFN"	EX+7*
>> ABMP("BTYP"	20+1
>> ABMP("EXP"	LOOP+3
>> ABMP("FMT"	EX+9, EX+13
>> ABMP("INS"	LOOP+3, 40+7, 40+9, 40+12, 60+3, 60+4, 70+3, 70+4, 70+5, 90+5 , 90+6
>> ABMP("ITYPE"	60+2, 70+2
>> ABMP("LDFN"	40+6, 60+3, 60+4, 60+7, 70+3, 70+4, 90+5, 90+6, 90+7, DIQ1+1 , DIQ1+6, DIQ1+10
>> ABMP("NOFMT"	LOOP+4, 110+5, 160+5, EX+9
>> ABMP("PAYDFN"	110+4, 130+4, 140+4, 150+4, 160+4, DIQ1+9, DIQ1+10, DIQ1+11
>> ABMP("VTYP"	60+3, 70+3, 90+5
>> ABMR(10	START+1!, LOOP+4, 10+1, 20+1, 20+2, 30+1, 30+2, 40+6, 40+8, 40+10 , 40+13, 40+14, 40+15, 40+16, 40+17, 40+19, 50+1, 50+2, 60+1, 60+3* , 60+4, 60+5, 60+7, 60+9, 60+10, 70+1, 70+3, 70+4, 70+5, 70+6* , 80+2, 80+3, 90+2, 90+5, 90+6, 90+7, 90+8, 100+1, 100+2, 110+4 , 110+5, 110+6, 120+4, 120+5, 120+6, 130+4, 130+6, 130+7, 140+4, 140+5 , 150+4, 150+5, 160+4, 160+5, 160+6, 170+1, 170+2, 180+1, 180+2, 190+1 , 190+2, 200+1, 200+2*
>> ABMR(20	EX+11, EX+12!
>> ABMREC(10	START+1!, LOOP+4*
>> ABMRT(95	40+19*
ABMX	EX~, EX+10, EX+11, EX+12!
ABMY	EX~, EX+7, EX+12!
>> DA	DIQ1+6, DIQ1+11, DIQ2+6*
>> DIC	DIQ1+5, DIQ2+5
DIQ	DIQ1+3, DIQ1+14!, DIQ2+3, DIQ2+8!
DIQ(0	DIQ1+4, DIQ2+4
>> DR	DIQ1+7, DIQ1+12, DIQ2+7*
DUZ(2	40+13, 40+14, 40+15, 40+16, 40+17, 120+5, DIQ1+9, DIQ2+1
I	LOOP+1, LOOP+2, LOOP+3, LOOP+4, REPLNOT+1~, DIQ1+2~, DIQ2+2~
P	REPLNOT~, REPLNOT+1
U	40+12, 60+3, 70+3, 90+5
X	REPLNOT~, REPLNOT+1*, REPLNOT+2
>> Y	EX+11*, EX+14

Customize PDF page

Package: Third Party Billing

Routine: ABMER10

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 11

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: