Routine: ABMCUFE

Package	Total	Call Graph
Third Party Billing	5	PAZ^ABMDRUTL $$SDT^ABMDUTL $$FMT^ABMERUTL $$ACTIVCPT^ABMP2627 $$EN^ABMVDF
VA Fileman	3	^DIE IX^DIK ^DIR
IHS VA Utilities	1	^XBFMK
Kernel	1	(BMES,MES)^XPDUTL

Package	Total	Caller Graph
Third Party Billing	1	ABMP2627

Entry Points

Name	Comments	DBIA/ICR reference
WRTLINES	;EP
MERGE	;EP
EDIT	;EP
MLTSEL	;EP
FIXCHK	;EP
REMOVE	;EP
START	;EP
FTSEL	;EP
FTCHK	;EP

External References

Name	Field # of Occurrence
PAZ^ABMDRUTL	ABMCUFE+18, START+3, FTSEL+22, FTSEL+23
$$SDT^ABMDUTL	WRTLINES+3
$$FMT^ABMERUTL	MLTSEL+12
$$ACTIVCPT^ABMP2627	MERGE+3
$$EN^ABMVDF	FTSEL+1, MLTSEL+2
^DIE	FTCHK+12, FTCHK+18, FIXCHK+6, MERGE+27
IX^DIK	MERGE+19
^DIR	FTSEL+19, MLTSEL+17, EDIT+22, EDIT+32
^XBFMK	FTCHK+8, FTCHK+13, FIXCHK+2, FTSEL+2, MLTSEL+4, EDIT+18, EDIT+28, MERGE+15, MERGE+22
BMES^XPDUTL	FTCHK+1
MES^XPDUTL	FTCHK+6, FTCHK+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This menu option will have you select a fee table from a list of tables owned" Line Location: ABMCUFE+8
Function Call: WRITE	Prompt: !,"by the facility logged into. It will go through every CPT entry in the selected" Line Location: ABMCUFE+9
Function Call: WRITE	Prompt: !,"fee table and will:" Line Location: ABMCUFE+10
Function Call: WRITE	Prompt: !?2,"- delete incomplete entries (where there is no effective date and no amount)" Line Location: ABMCUFE+11
Function Call: WRITE	Prompt: !?2,"- File the entries back so there is only one entry for each CPT code in",!?4,"each fee table" Line Location: ABMCUFE+12
Function Call: WRITE	Prompt: !!,"There could be instances where user intervention is needed to determine which" Line Location: ABMCUFE+13
Function Call: WRITE	Prompt: !,"charge amount should be used when two entries are present for the same CPT with" Line Location: ABMCUFE+14
Function Call: WRITE	Prompt: !,"the same effective date but different amounts. The user will be prompted with" Line Location: ABMCUFE+15
Function Call: WRITE	Prompt: !,"all the information and be asked to select which entry is correct before" Line Location: ABMCUFE+16
Function Call: WRITE	Prompt: !,"continuing." Line Location: ABMCUFE+17
Function Call: WRITE	Prompt: *7,!!,"Fee schedule is being updated by another user..." Line Location: START+3
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: FTSEL+1
Function Call: WRITE	Prompt: !?1,"FT",?5,"Owner",?20,"Title",?67,"Status" Line Location: FTSEL+3
Function Call: WRITE	Prompt: !!!!,"This fee schedule is already complete. Please select another." Line Location: FTSEL+22
Function Call: WRITE	Prompt: !!!!,"This fee schedule is owned by another facility. Please select another." Line Location: FTSEL+23
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: MLTSEL+2
Function Call: WRITE	Prompt: !!,"Fee Table "_ABMFT_": "_$P($G(^ABMDFEE(ABMFT,0)),U,2)_":",! Line Location: MLTSEL+3
Routine Call	DIE Line Location: FTCHK+12 FTCHK+18 FIXCHK+6 MERGE+27
Routine Call	DIR Line Location: FTSEL+19 MLTSEL+17 EDIT+22 EDIT+32

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDFEE - [#9002274.01]	FTCHK+4, FTCHK+5, FTSEL+6, FTSEL+8, FTSEL+22, FTSEL+23, FTSEL+24, MLTSEL+3, MERGE+5, MERGE+8
^ABMFTMP("ABM-FT"	FTCHK+19!
^ABMFTWC	START+3, START+8, FIXCHK+1, MLTSEL+1, MLTSEL+7, MLTSEL+8!, MLTSEL+12, EDIT+4, EDIT+5, EDIT+12 , EDIT+14, WRTLINES+2, WRTLINES+3, WRTLINES+4, REMOVE+2, REMOVE+4!, MERGE+1, MERGE+3, MERGE+5, MERGE+7 , MERGE+8, MERGE+10!, MERGE+11!, MERGE+12!
^AUTTLOC - [#9999999.06]	FTSEL+9
^DIC(19 - [#19]	FTCHK+9, FTCHK+15

Label References

Name	Line Occurrences
EDIT	START+7
FIXCHK	START+9
FTCHK	ABMCUFE+4, START+10
FTSEL	START+1, FTSEL+22, FTSEL+23
MERGE	EDIT+38
MLTSEL	START+5
REMOVE	EDIT+37
START	START+3
WRTLINES	EDIT+17, EDIT+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	EDIT+2!
ABM("CNTSV"	EDIT+11, EDIT+13, EDIT+19
ABM("CPTCNT"	EDIT+10, EDIT+12, EDIT+14, EDIT+15, EDIT+24*, WRTLINES+2, WRTLINES+3, WRTLINES+4, REMOVE+3, MERGE+2 , MERGE+3, MERGE+5, MERGE+7, MERGE+8
ABM("DCPT"	EDIT+3, EDIT+5, EDIT+12, EDIT+14, EDIT+15, EDIT+26, EDIT+36, WRTLINES+2, WRTLINES+3, WRTLINES+4 , REMOVE+2, REMOVE+4, MERGE+3, MERGE+5, MERGE+7, MERGE+8, MERGE+10, MERGE+11, MERGE+18, MERGE+24
ABM("IEN"	EDIT+14*, EDIT+15
ABM("MLTTOT"	EDIT+4*, EDIT+7
ABM("REC"	FTSEL+8*, FTSEL+9, FTSEL+10, FTSEL+11
ABM("WCIEN"	WRTLINES+1, WRTLINES+2, WRTLINES+3, WRTLINES+4
>> ABMA	FTCHK+14*, FTCHK+15
>> ABMENTRY	EDIT+1, EDIT+6, EDIT+7
>> ABMF("FTEDT"	FTSEL+24*
>> ABMF("IEN"	MERGE+2*
>> ABMFT	START+3, START+8, FTCHK+2, FTCHK+4, FTCHK+5, FIXCHK+1, FIXCHK+4, FTSEL+4, FTSEL+6, FTSEL+7 , FTSEL+8, FTSEL+15, FTSEL+21*, FTSEL+22, FTSEL+23, FTSEL+24, MLTSEL+1, MLTSEL+3, MLTSEL+7, MLTSEL+8 , MLTSEL+12, MLTSEL+16, EDIT+4, EDIT+5, EDIT+7, EDIT+12, EDIT+14, WRTLINES+2, WRTLINES+3, WRTLINES+4 , REMOVE+2, REMOVE+4, MERGE+1, MERGE+3, MERGE+5, MERGE+7, MERGE+8, MERGE+10, MERGE+11, MERGE+12 , MERGE+16, MERGE+23
>> ABMFTOK	ABMCUFE+3, ABMCUFE+5, FTCHK+3, FTCHK+5*, FTCHK+6
>> ABMHDR	EDIT+7*, EDIT+9
>> ABMHDR1	EDIT+8*, EDIT+9
>> ABMLST	FTSEL+5, FTSEL+15, FTSEL+17, MLTSEL+5, MLTSEL+13, MLTSEL+15
>> ABMMDT	MERGE+6, MERGE+7, MERGE+8
>> ABMMLT	MLTSEL+6, MLTSEL+7, MLTSEL+8, MLTSEL+9, MLTSEL+10, MLTSEL+12, MLTSEL+13, MLTSEL+19*, MLTSEL+20, EDIT+4 , EDIT+5, EDIT+7, EDIT+12, EDIT+14, WRTLINES+2, WRTLINES+3, WRTLINES+4, REMOVE+2, REMOVE+4, MERGE+1 , MERGE+3, MERGE+5, MERGE+7, MERGE+8, MERGE+10, MERGE+11, MERGE+12, MERGE+17, MERGE+25
>> ABMMLTN	MLTSEL+10, MLTSEL+11, MLTSEL+13, MLTSEL+20, EDIT+7
>> ABMOWN	FTSEL+9*, FTSEL+13
>> ABMST	FTSEL+11, FTSEL+12, FTSEL+13, FTSEL+15
>> ABMT	REMOVE+1, REMOVE+2, REMOVE+3, REMOVE+4
>> ABMTITLE	FTSEL+10, FTSEL+13, FTSEL+14, FTSEL+15
>> DA	FTCHK+9, FTCHK+15, FIXCHK+4, MERGE+18, MERGE+24*
>> DA(1	MERGE+16, MERGE+17, MERGE+23, MERGE+25
>> DIE	FTCHK+11, FTCHK+16, FIXCHK+3, MERGE+25
>> DIK	MERGE+17*
DIR	EDIT+32!
DIR("A"	FTSEL+16, FTSEL+18, MLTSEL+14, MLTSEL+16, EDIT+20, EDIT+21, EDIT+30*
DIR("B"	EDIT+31*
DIR(0	FTSEL+17, MLTSEL+15, EDIT+19, EDIT+29
>> DIROUT	START+2, START+4, START+6, FTSEL+20, MLTSEL+18, EDIT+5, EDIT+23, EDIT+33
>> DIRUT	START+2, START+4, START+6, FTSEL+20, MLTSEL+18, EDIT+5, EDIT+23, EDIT+33
>> DR	FTCHK+10, FTCHK+17, FIXCHK+5, MERGE+26
>> DTOUT	START+2, START+4, START+6, FTSEL+20, MLTSEL+18, EDIT+5, EDIT+23, EDIT+33
>> DUOUT	START+2, START+4, START+6, FTSEL+20, MLTSEL+1*, MLTSEL+18, EDIT+5, EDIT+23, EDIT+33
DUZ	MERGE+26
DUZ(2	FTSEL+23
U	FTCHK+5, FTSEL+9, FTSEL+10, FTSEL+11, FTSEL+22, FTSEL+23, FTSEL+24, MLTSEL+3, EDIT+14, WRTLINES+3 , WRTLINES+4, MERGE+3
>> Y	FTSEL+21, MLTSEL+19, EDIT+24, EDIT+34

Customize PDF page

Package: Third Party Billing

Routine: ABMCUFE

Information

Source Information

Call Graph

Call Graph Total: 10

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

Local Variables

Legend: