Routine: ABMFOFS

Package	Total	Call Graph
VA Fileman	5	NOW^%DTC ^DIC ^DIE IX^DIK ^DIR
Kernel	4	^%ZIS ^%ZISC $$STATUS^%ZISH $$HTFM^XLFDT
Third Party Billing	3	$$CPT^ABMCVAPI $$TRIM^ABMUTLP $$EN^ABMVDF
IHS VA Utilities	1	^XBFMK

Package	Total	Caller Graph
Third Party Billing	6	ABMDEML ABMDEMLC ABMDTFEE ABMFEAPI ABMMLTIT ABMP2627

Entry Points

Name	Comments	DBIA/ICR reference
HK	;HOUSE CLEANING
DF	;DESCRIBE FLAT FILE
DINUM(ABMCODE)	;PEP - DINUM CPT for fee table
START	;START HERE
SEC	;WHAT SECTION?
FILE	;FILE CODE
DFILE	;FILE ADA CODE IN DENTAL SECTION
BY	;BYPASS WITH ABMTB DEFINED
EFFDT	;

External References

Name	Field # of Occurrence
NOW^%DTC	HK+46
^%ZIS	BY+4
^%ZISC	HK+1
$$STATUS^%ZISH	BY+5, BY+6
$$CPT^ABMCVAPI	FILE+8
$$TRIM^ABMUTLP	BY+8
$$EN^ABMVDF	START+2
^DIC	START+11, EFFDT+9, HK+49
^DIE	EFFDT+21, HK+18, HK+57
IX^DIK	HK+61
^DIR	START+5, START+19, START+25, DF+2, DF+3, DF+4, DF+21, DF+24, DF+28, DF+32 , HK+63
^XBFMK	START+15, START+22, EFFDT+1, EFFDT+11, HK+12, HK+41, HK+53
$$HTFM^XLFDT	BY+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"FEE SCHEDULE UPDATE FROM FOREIGN FILE" Line Location: START+1
Function Call: WRITE	Prompt: !!,$$EN^ABMVDF("RVN"),"NOTE:",$$EN^ABMVDF("RVF")," It is advisable to do a global save of global ^ABMDFEE prior to" Line Location: START+2
Function Call: WRITE	Prompt: !,"running this procedure.",! Line Location: START+3
Function Call: WRITE	Prompt: !!,"FOREIGN HOST FILE DESCRIPTION",! Line Location: DF+1
Function Call: WRITE	Prompt: !!,"Some providers of fee schedules (Medicode for example) break out" Line Location: DF+5
Function Call: WRITE	Prompt: !,"the professional and technical portions into separate records." Line Location: DF+6
Function Call: WRITE	Prompt: !,"The next section will determine how to identify the different" Line Location: DF+7
Function Call: WRITE	Prompt: !,"record types.",! Line Location: DF+8
Function Call: WRITE	Prompt: !,"This section will load the different record types (global/technical/professional)" Line Location: DF+19
Function Call: WRITE	Prompt: !!,"OPEN AND READ FOREIGN FILE",! Line Location: BY+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: BY+6
Function Call: WRITE	Prompt: !,ABMCODE_" "_ABMIVAL Line Location: BY+18
Function Call: WRITE	Prompt: !,ABMCODE_" "_ABMIVAL Line Location: BY+20
Function Call: WRITE	Prompt: !,ABMCODE_" "_ABMIVAL Line Location: BY+22
Function Call: WRITE	Prompt: !,ABMCODE_" "_ABMIVAL Line Location: BY+25
Function Call: WRITE	Prompt: "." Line Location: BY+32
Function Call: WRITE	Prompt: !!,"Will now ensure all global charges are populated where applicable..." Line Location: HK+3
Function Call: WRITE	Prompt: !!,"Records updated by category" Line Location: HK+22
Function Call: WRITE	Prompt: "SURGICAL " Line Location: HK+26
Function Call: WRITE	Prompt: "HCPCS " Line Location: HK+27
Function Call: WRITE	Prompt: "RADIOLOGY " Line Location: HK+28
Function Call: WRITE	Prompt: "LABORATORY " Line Location: HK+29
Function Call: WRITE	Prompt: "MEDICAL " Line Location: HK+30
Function Call: WRITE	Prompt: "DENTAL " Line Location: HK+31
Function Call: WRITE	Prompt: "ANESTHESIA " Line Location: HK+32
Function Call: WRITE	Prompt: "DRUG " Line Location: HK+33
Routine Call	DIE Line Location: EFFDT+21 HK+18 HK+57
Routine Call	DIC Line Location: START+11 EFFDT+9 HK+49
Routine Call	DIR Line Location: START+5 START+19 START+25 DF+2 DF+3 DF+4 DF+21 DF+24 DF+28 DF+32 HK+63
Routine Call	%ZIS Line Location: BY+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABMDFEE - [#9002274.01]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDFEE - [#9002274.01]	SEC+9, SEC+10, FILE+11, FILE+12, DFILE+4, DFILE+5*, HK+5, HK+7, HK+8, HK+9 , HK+10, HK+11, HK+17
^AUTTADA("B"	BY+19, DFILE+1
^DD(9002274.01	EFFDT+7, HK+45
^ICPT("B"	BY+21

Label References

Name	Line Occurrences
$$DINUM	FILE+10
DFILE	BY+31
EFFDT	FILE+15, DFILE+7
FILE	BY+30
HK	BY+33
SEC	BY+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	HK+47
>> %ZIS("B"	BY+4*
>> %ZIS("HFSMODE"	BY+3*
>> ABMCD	FILE+10, FILE+11, DINUM+2, DINUM+3, DINUM+4, EFFDT+4, EFFDT+14, HK+6, HK+7, HK+8 , HK+9, HK+10, HK+11, HK+14, HK+17
ABMCNT	DF+35!, BY+5*, BY+32, HK+64!
ABMCNT(	FILE+14, EFFDT+22, HK+24, HK+25, HK+36, HK+37
ABMCNT(21	DFILE+6*
ABMCODE	BY+9, BY+16, BY+17, BY+18, BY+19, BY+20, BY+21, BY+22, BY+25, SEC+1 , SEC+2, SEC+3, SEC+4, SEC+5, SEC+6, SEC+7, FILE+8, FILE+10, FILE+12, DINUM~ , DINUM+1, DINUM+2, DINUM+3, DINUM+4, DINUM+5, DFILE+1, DFILE+4, DFILE+5, EFFDT+4, EFFDT+14 , HK+64!
ABMCPC	DF+3*, BY+9, HK+64!
ABMDLM	DF+2*, BY+8, BY+9, BY+26, HK+64!
>> ABMEDFN	HK+9*, HK+10, HK+11, HK+16, HK+17
>> ABMEDT	START+21*, FILE+8, EFFDT+8, HK+8, HK+9
>> ABMENTRY	EFFDT+10*, EFFDT+16
>> ABMGVAL	DF+26*, BY+24, EFFDT+17
ABMIPC	DF+23*, BY+8, HK+64!
ABMIVAL	BY+8, BY+18, BY+20, BY+22, BY+24, BY+25, FILE+11, DFILE+4, EFFDT+17, EFFDT+18 , EFFDT+19, EFFDT+22, HK+35, HK+36*, HK+37, HK+64!
ABMPPC	DF+4*, BY+26, HK+64!
>> ABMPRCNT	START+27*, HK+48
ABMPRICE	BY+26, BY+28, FILE+11, DFILE+4, EFFDT+17, EFFDT+18, EFFDT+19, HK+64!
>> ABMPTR	FILE+8, FILE+9, FILE+11, FILE+12, DFILE+1, DFILE+2, DFILE+4, DFILE+5
>> ABMPVAL	DF+34*, BY+24, EFFDT+19
>> ABMRCNT	HK+23, HK+24, HK+25, HK+26, HK+27, HK+28, HK+29, HK+30, HK+31, HK+32 , HK+33, HK+36, HK+37
ABMSC	BY+30, BY+31, SEC+1, SEC+2, SEC+3, SEC+4, SEC+5, SEC+6, SEC+7, SEC+8 , SEC+9, SEC+10, FILE+11, FILE+12, FILE+14, EFFDT+4, EFFDT+5, EFFDT+7, EFFDT+14, EFFDT+15 , EFFDT+22, HK+4, HK+5, HK+7, HK+8, HK+9, HK+10, HK+11, HK+15, HK+17 , HK+64!
>> ABMTB	START+13*, SEC+9, SEC+10, FILE+11, FILE+12, DFILE+4, DFILE+5, EFFDT+2, EFFDT+12, HK+5 , HK+7, HK+8, HK+9, HK+10, HK+11, HK+13, HK+17, HK+42, HK+55, HK+60
>> ABMTVAL	DF+30*, BY+24, EFFDT+18
>> DA	EFFDT+16, HK+16, HK+55, HK+60
>> DA(1	EFFDT+4, EFFDT+5, EFFDT+14, EFFDT+15, HK+14, HK+15, HK+42, HK+43
>> DA(2	EFFDT+2, EFFDT+5, EFFDT+12, EFFDT+15, HK+13*, HK+15
DIC	START+7, START+11!, EFFDT+5, HK+43*
DIC("A"	START+9*
DIC("B"	START+10*
DIC("DR"	HK+48*
DIC("P"	EFFDT+7, HK+45
DIC(0	START+8, EFFDT+6, HK+44*
>> DIE	EFFDT+15, HK+15, HK+54*
>> DIK	HK+59*
DIR	START+5!, START+19!, START+25!, DF+2!, DF+3!, DF+4!, DF+21!, DF+24!, DF+28!, DF+32! , HK+63!
DIR("A"	START+4, START+17, START+24, DF+2, DF+3, DF+4, DF+21, DF+24, DF+28, DF+32
DIR("B"	START+4, START+18, DF+2, DF+3, DF+4, DF+21, DF+24, DF+28, DF+32*
DIR(0	START+4, START+16, START+23, DF+2, DF+3, DF+4, DF+21, DF+24, DF+28, DF+32 , HK+63*
>> DIRUT	START+20, START+26, DF+2, DF+3, DF+4
>> DR	EFFDT+17, EFFDT+18, EFFDT+19, EFFDT+20, HK+17, HK+56
DT	BY+1*, FILE+11, DFILE+4, EFFDT+20
DTIME	BY+6
DUZ	EFFDT+20, HK+48
DUZ(0	BY+18, BY+20, BY+22, BY+25
IO	BY+6
IO(0	BY+32
>> POP	BY+4
U	FILE+8, EFFDT+7, HK+10, HK+11, HK+17, HK+45
>> X	BY+6, BY+8, BY+9, BY+26, EFFDT+8, HK+47*
>> Y	START+6, START+12, START+13, START+21, START+27, DF+2, DF+3, DF+4, DF+22, DF+23 , DF+25, DF+26, DF+29, DF+30, DF+33, DF+34, EFFDT+10

Customize PDF page

Package: Third Party Billing

Routine: ABMFOFS

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: