Routine: ABMEF10

Information

ABMEF10 ; IHS/ASDST/DMJ - Medicare Electronic UB-92 Version 041 ;

Call Graph

Call Graph Total: 24

Package	Total	Call Graph
Third Party Billing	15	^ABMER01 ^ABMER10 ^ABMER20 ^ABMER30 ^ABMER40 ^ABMER41 ^ABMER50 ^ABMER60 ^ABMER61 ^ABMER70 ^ABMER80 ^ABMER90 ^ABMER95 ^ABMER99 $$RCID^ABMERUTL
VA Fileman	4	^DIC ^DIE $$GET1^DIQ ^DIR
Kernel	2	^%ZISC OPEN^%ZISH
MailMan	2	XMZ^XMA2 ENT1^XMD
IHS VA Utilities	1	$$JDT^XBFUNC

Entry Points

Name	Comments	DBIA/ICR reference
WRITE	;
START	;
OPEN	; ; OPEN FILE
LOOP	; ; LOOP THROUGH BILLS
CLOSE	;

External References

Name	Field # of Occurrence
^%ZISC	CLOSE+2
OPEN^%ZISH	OPEN+44
^ABMER01	LOOP+6
^ABMER10	LOOP+31
^ABMER20	LOOP+38
^ABMER30	LOOP+42
^ABMER40	LOOP+51
^ABMER41	LOOP+57
^ABMER50	LOOP+65
^ABMER60	LOOP+72
^ABMER61	LOOP+80
^ABMER70	LOOP+86
^ABMER80	LOOP+90
^ABMER90	LOOP+96
^ABMER95	LOOP+28, LOOP+104
^ABMER99	LOOP+108
$$RCID^ABMERUTL	LOOP+7, LOOP+8, LOOP+25
^DIC	START+7, OPEN+7
^DIE	START+25, LOOP+102
$$GET1^DIQ	START+11
^DIR	START+15, OPEN+17, OPEN+25, OPEN+41
$$JDT^XBFUNC	OPEN+31
XMZ^XMA2	OPEN+52
ENT1^XMD	CLOSE+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"File could not be created/opened.",! Line Location: START+21
Function Call: WRITE	Prompt: !,"BATCH #",ABMR(1,170),! Line Location: LOOP+7
Function Call: WRITE	Prompt: !,"BATCH #",ABMR(1,170),! Line Location: LOOP+8
Function Call: WRITE	Prompt: !,"Writing bills to file.",! Line Location: LOOP+9
Function Call: WRITE	Prompt: !!,"Finished.",!! Line Location: LOOP+112
Function Call: WRITE	Prompt: !,"MM SEND TO DOMAIN NOT DEFINED.",! Line Location: OPEN+48
Routine Call	DIE Line Location: START+25 LOOP+102
Routine Call	DIC Line Location: START+7 OPEN+7
Routine Call	DIR Line Location: START+15 OPEN+17 OPEN+25 OPEN+41

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIZ(8980 - [#8980]	Classic Fileman Calls
^ABMDTXST - [#9002274.6]	Classic Fileman Calls
^AUTNINS - [#9999999.18]	Classic Fileman Calls, GET1^DIQ
^AUTTINTY - [#9999999.181]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	LOOP+17, LOOP+18, LOOP+19, LOOP+56
^ABMDPARM(	START+18, OPEN+24, OPEN+47
^ABMDTXST - [#9002274.6]	START+3, LOOP+15, LOOP+16
^ABMNINS("ALF"	OPEN+32, OPEN+45*
^AUTNINS - [#9999999.18]	OPEN+28
^AUTTLOC - [#9999999.06]	OPEN+50
^DIC(4.2 - [#4.2]	OPEN+49
^DIZ(8980 - [#8980]	OPEN+12, OPEN+19!, WRITE+4, CLOSE+3
^XMB(3.9 - [#3.9]	WRITE+11, CLOSE+5

Label References

Name	Line Occurrences
CLOSE	LOOP+111
OPEN	START+20
WRITE	LOOP+11, LOOP+30, LOOP+33, LOOP+40, LOOP+46, LOOP+49, LOOP+55, LOOP+61, LOOP+69, LOOP+76 , LOOP+84, LOOP+88, LOOP+94, LOOP+98, LOOP+106, LOOP+110

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	LOOP+113!
>> ABMBIL0	LOOP+19*, LOOP+20, LOOP+21, LOOP+22
ABME	LOOP+113!
ABMEF	LOOP+113!
ABMEF("BATCH#"	LOOP+3, LOOP+25, LOOP+26
ABMEF("LINE"	LOOP+10, LOOP+29, LOOP+32, LOOP+39, LOOP+45, LOOP+48, LOOP+54, LOOP+60, LOOP+68, LOOP+75 , LOOP+83, LOOP+87, LOOP+93, LOOP+97, LOOP+105, LOOP+109, WRITE+4, WRITE+7, WRITE+11
ABMFN	START+24, LOOP+113!, OPEN+11, OPEN+37, OPEN+40, OPEN+43, OPEN+44, OPEN+45, OPEN+54
>> ABMJDT	OPEN+31*, OPEN+33, OPEN+37
ABMLF	LOOP+113!, OPEN+32, OPEN+33, OPEN+34
ABMLNUM	LOOP+113!, OPEN+34, OPEN+35, OPEN+36*, OPEN+37
>> ABMP("BDFN"	LOOP+16*, LOOP+17, LOOP+18, LOOP+19, LOOP+56, LOOP+100
>> ABMP("BTYP"	LOOP+20*, LOOP+23, LOOP+34, LOOP+63, LOOP+78
>> ABMP("DOMAIN"	OPEN+47, OPEN+48, OPEN+49, CLOSE+6
>> ABMP("FILE#"	OPEN+10*, OPEN+12, OPEN+19, WRITE+4, CLOSE+3
>> ABMP("FTYPE"	START+18, START+19, OPEN+2, OPEN+21, OPEN+46, WRITE+2, WRITE+5, WRITE+9, CLOSE+2, CLOSE+3 , CLOSE+4
>> ABMP("INS"	START+2, START+3, START+4, START+9, START+11, START+12, LOOP+7, LOOP+8, LOOP+25, OPEN+28 , OPEN+32, OPEN+45
>> ABMP("ITYPE"	START+11*
>> ABMP("L#"	LOOP+2, WRITE+3, WRITE+4, WRITE+10*, WRITE+11, CLOSE+5
>> ABMP("LDFN"	LOOP+21*, LOOP+23, LOOP+35
>> ABMP("MP"	LOOP+4*
>> ABMP("OBTYP"	LOOP+13, LOOP+23, LOOP+27, LOOP+34
>> ABMP("OLDFN"	LOOP+12, LOOP+23, LOOP+35
>> ABMP("ORD"	LOOP+14, LOOP+15, LOOP+16
>> ABMP("VTYP"	LOOP+22*
>> ABMP("XMIT"	START+3, START+23, LOOP+15, LOOP+16, LOOP+101
ABMPATH	LOOP+113!, OPEN+27*, OPEN+44
ABMR	LOOP+5!, LOOP+37!, LOOP+41!, LOOP+50!, LOOP+64!, LOOP+71!, LOOP+79!, LOOP+85!, LOOP+89!, LOOP+95! , LOOP+103!, LOOP+107!, LOOP+113!
ABMR(1	LOOP+7, LOOP+8
ABMR(50	LOOP+70
>> ABMRCID	OPEN+28, OPEN+29, OPEN+30, OPEN+37
ABMREC	LOOP+113!
ABMREC(1	LOOP+10
ABMREC(10	LOOP+32
ABMREC(20	LOOP+39
ABMREC(30	LOOP+44, LOOP+45
ABMREC(31	LOOP+47, LOOP+48
ABMREC(40	LOOP+53, LOOP+54
ABMREC(41	LOOP+59, LOOP+60
ABMREC(50	LOOP+67, LOOP+68
ABMREC(60	LOOP+74, LOOP+75
ABMREC(61	LOOP+82, LOOP+83
ABMREC(70	LOOP+87
ABMREC(80	LOOP+92, LOOP+93
ABMREC(90	LOOP+97
ABMREC(95	LOOP+29, LOOP+105
ABMREC(99	LOOP+109
ABMRT	LOOP+5!
ABMRV	LOOP+113!
>> DA	START+23, LOOP+100
DIC	START+5, OPEN+4, OPEN+8!
DIC("S"	OPEN+6*
DIC(0	START+6, OPEN+5
>> DIE	START+22, LOOP+99
DIR	START+14*, START+16!, OPEN+18!, OPEN+25!, OPEN+41!
DIR("A"	OPEN+14, OPEN+23, OPEN+39*
DIR("B"	OPEN+16, OPEN+24, OPEN+40*
DIR(0	OPEN+15, OPEN+22, OPEN+38*
>> DR	START+24, LOOP+101
DT	OPEN+31, CLOSE+3, CLOSE+5
DUZ	OPEN+51
DUZ(2	START+3, START+18, LOOP+15, LOOP+16, LOOP+17, LOOP+18, LOOP+19, LOOP+56, OPEN+24, OPEN+47 , OPEN+50
>> I	LOOP+43, LOOP+44, LOOP+45, LOOP+47, LOOP+48, LOOP+52, LOOP+53, LOOP+54, LOOP+58, LOOP+59 , LOOP+60, LOOP+66, LOOP+67, LOOP+68, LOOP+73, LOOP+74, LOOP+75, LOOP+81, LOOP+82, LOOP+83 , LOOP+91, LOOP+92, LOOP+93, CLOSE+3
IO	WRITE+6
IO(0	WRITE+8
>> POP	START+21, OPEN+3, OPEN+9, OPEN+20, OPEN+26, OPEN+42, OPEN+45, OPEN+48, OPEN+53*
U	LOOP+20, LOOP+21, LOOP+22, OPEN+49
>> XMDUZ	OPEN+51*
>> XMSUB	OPEN+50*
>> XMY(".5@"	CLOSE+6*
>> XMZ	OPEN+53, OPEN+54, OPEN+55, WRITE+11, CLOSE+5
>> Y	START+8, START+9, OPEN+9, OPEN+10, OPEN+11, OPEN+19, OPEN+20, OPEN+26, OPEN+27, OPEN+42 , OPEN+43

Customize PDF page

Package: Third Party Billing

Routine: ABMEF10

Information

Source Information

Call Graph

Call Graph Total: 24

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: