Routine: ABMDF35X

Information

ABMDF35X ; IHS/SD/SDR - New HCFA-1500 (02/12) Format ;

Source Information

Source file <ABMDF35X.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Third Party Billing	2	BADDR^ABMDLBL1 $$EN^ABMVDF

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Third Party Billing	1	ABMDF35

Entry Points

Name	Comments	DBIA/ICR reference
54	;;12^23^33^50^62;;10D^10^14R^10C^17
TEXT	;;TABS;;FIELD LENGTH ; FORMAT ($-$ FORMAT,L-LNGTH REQ'D,C-CENTER,R-RIGHT,D-DATE)
OVER	;GET OVRRIDE VALUES FROM 3P INSURER FILE
50	;;65;;14
49	;;1^17^19^23^38^43^51^61;;15^1^1^14C^1^1^9$^8$
25	;;2^30^54^68;;17^17^10D^10D
26	;;30;;19
27	;;2^32^54^68;;26^10^10D^10D
23	;;6^37^56;;24C^10D^23
29	;;1^52^57^62;;48^1^1^8$
1	;;1^8^15^24^31^39^45^50;;1^1^1^1^1^1^1^29C
3	;;1^31^42^47^50;;28^10D^1^1^29C
5	;;1^33^38^42^47^50;;28^1^1^1^1^29C
7	;;1^27^50^75;;24^3^23C^4
9	;;1^14^50^64;;12^13^12C^13
XIT
LOOP2	;Loop thru the pieces of the line array
11	;;1^50;;28^29C
51	;;23^50;;26^29
13	;;1^35^41^53^68^75;;28^1^1^10D^1^1
MARG	;Set left and top margins
15	;;35^41^46^50;;1^1^2^29C
17	;;35^41^50;;1^1^29C
19	;;1^30^52^57;;28C^19C^1^1
32	;;3^16^29^42;;8^8^8^8
31	;;3^16^29^42^50;;8^8^8^8^29
30	;;42;;1
37	;;1^10^19^22^23^45^50^59^63^65^68;;8T^8T^2R^1R^19^4^8$^4C^2R^2R^10
36	;;1^65^68;;61^2^12
53	;;1^23^50;;21^26^29
52	;;1^23^50;;21^26^29
33	;;3^16^29^42^50;;8^8^8^10^29
FRMT
TEST
LOOP	;Loop thru line number array

External References

Name	Field # of Occurrence
BADDR^ABMDLBL1	LOOP+48
$$EN^ABMVDF	MARG+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: MARG+3
Function Call: WRITE	Prompt: ! Line Location: MARG+4
Function Call: WRITE	Prompt: ! Line Location: LOOP+40
Function Call: WRITE	Prompt: ?1,"XXX",?32,"Page "_ABMPGCNT_" of "_ABMPGTOT,?76,"XXX" Line Location: LOOP+43
Function Call: WRITE	Prompt: ?($P(ABM("TABS"),U,ABM("I"))+ABM("LM")) Line Location: LOOP+55
Function Call: WRITE	Prompt: ?($P(ABM("TABS"),U,ABM("I"))+ABM("LM")) Line Location: LOOP2+13
Function Call: WRITE	Prompt: ?52,"(CONT.)" Line Location: LOOP2+15
Function Call: WRITE	Prompt: $J($FN(+ABM("FLD"),",",2),ABM("LTH")) Line Location: FRMT+3
Function Call: WRITE	Prompt: $E(ABM("FLD"),4,5),$E(ABM("FLD"),6,7),$E(ABM("FLD"),1,3)+1700 Line Location: FRMT+5
Function Call: WRITE	Prompt: $E(ABM("FLD"),4,5),$E(ABM("FLD"),6,7),$E(ABM("FLD"),1,3)+1700 Line Location: FRMT+6
Function Call: WRITE	Prompt: $E(ABM("FLD"),4,5)," ",$E(ABM("FLD"),6,7)," ",$E(ABM("FLD"),2,3) Line Location: FRMT+7
Function Call: WRITE	Prompt: $E(ABM("FLD"),4,5)," ",$E(ABM("FLD"),6,7)," ",$E(ABM("FLD"),1,3)+1700 Line Location: FRMT+8
Function Call: WRITE	Prompt: $E(ABM("FLD"),4,7),$E(ABM("FLD"),1,3)+1700 Line Location: FRMT+9
Function Call: WRITE	Prompt: $E(ABM("FLD"),1,ABM("LTH")) Line Location: FRMT+13

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	LOOP+47
^ABMDEXP(35	MARG+2
^ABMNINS(	OVER+1, OVER+2, OVER+4, OVER+5, OVER+7
^AUTNINS - [#9999999.18]	LOOP+29, LOOP+46

Label References

Name	Line Occurrences
FRMT	LOOP+55, LOOP2+13
LOOP	LOOP+5, LOOP+56, LOOP2+16
LOOP2	LOOP+54
MARG	TEST+2
OVER	MARG+5
XIT	LOOP+1

Naked Globals

Name	Field # of Occurrence
^(0	MARG+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	TEST+1*, XIT!
ABM("ADD"	LOOP+50, LOOP+51
ABM("BLNK"	FRMT+12*
ABM("FL"	LOOP+8, LOOP+9, LOOP+10*
ABM("FLD"	LOOP+55, LOOP2+11, LOOP2+12, LOOP2+13, FRMT+2, FRMT+3, FRMT+6, FRMT+7, FRMT+8, FRMT+9 , FRMT+10, FRMT+11, FRMT+12, FRMT+13
ABM("FMAT"	LOOP+14*, LOOP+55, FRMT
ABM("I"	MARG+4, LOOP+4, LOOP+46, LOOP+47, LOOP+55, LOOP2+1*, LOOP2+2, LOOP2+3, LOOP2+5, LOOP2+6 , LOOP2+9, LOOP2+10, LOOP2+11, LOOP2+12, LOOP2+13, LOOP2+15, FRMT
ABM("INS"	LOOP+44!, LOOP+47*
ABM("J"	LOOP+46*, LOOP+47
ABM("LM"	MARG+1, MARG+2, LOOP+55, LOOP2+13
ABM("LN"	MARG+1, LOOP+1, LOOP+4, LOOP+8, LOOP+9, LOOP+10, LOOP+40, LOOP2+1, LOOP2+3, LOOP2+5 , LOOP2+6, LOOP2+9, LOOP2+10, LOOP2+11, LOOP2+12, LOOP2+15, FRMT+2, FRMT+3
ABM("LTH"	FRMT, FRMT+2, FRMT+3, FRMT+6, FRMT+7, FRMT+8, FRMT+9, FRMT+10, FRMT+11, FRMT+12 , FRMT+13
ABM("LTOT"	LOOP2+12, FRMT+2, FRMT+3
ABM("RT"	FRMT+12*
ABM("TABS"	LOOP+13*, LOOP+55, LOOP2+2, LOOP2+13
ABM("TM"	MARG+1, MARG+2, MARG+4, LOOP+40, LOOP+41, LOOP+43, LOOP+45, LOOP+51
ABMCHK	LOOP+21, LOOP+22, LOOP+26!, LOOP+32, LOOP+33, LOOP+37!
ABMF	XIT+1!
ABMF(	LOOP+1, LOOP+9, LOOP+10, LOOP+20, LOOP+21, LOOP+24, LOOP+25, LOOP+31, LOOP+32, LOOP+35 , LOOP+36, LOOP2+1, LOOP2+6, LOOP2+10, LOOP2+11, TEST+1, OVER+9, OVER+10, OVER+12, OVER+13*
ABMF("TEST"	LOOP+42, LOOP+54, TEST*, TEST+1
ABMF("TMP"	LOOP+23, LOOP+25, LOOP+26!, LOOP+34, LOOP+36, LOOP+37!
ABMF(17	LOOP+18, LOOP2+5, LOOP2+9, FRMT+2, FRMT+6
ABMF(37	LOOP+23, LOOP+24, LOOP+34, LOOP+35
ABMLOOP	LOOP+19, LOOP+20, LOOP+21, LOOP+22, LOOP+24, LOOP+25, LOOP+26!, LOOP+30, LOOP+31, LOOP+32 , LOOP+33, LOOP+35, LOOP+36, LOOP+37!
ABMOLN	OVER+1*, OVER+2, OVER+4, OVER+5, OVER+7, OVER+8, OVER+11, OVER+13, OVER+14!
ABMOPC	OVER+2*, OVER+4, OVER+5, OVER+7, OVER+12, OVER+13, OVER+14!
ABMOVTYP	OVER+3!, OVER+4, OVER+5, OVER+6, OVER+7, OVER+14!
>> ABMP("BDFN"	LOOP+46, LOOP+47
>> ABMP("INS"	MARG+5, LOOP+29, LOOP+44, LOOP+46, OVER+1, OVER+2, OVER+4, OVER+5, OVER+7
>> ABMP("ITYPE"	LOOP+29
>> ABMP("LDFN"	OVER+1, OVER+2, OVER+4, OVER+5, OVER+7
>> ABMP("MORE"	LOOP2+12
>> ABMP("PTOT"	LOOP2+12, LOOP2+15
>> ABMP("VTYP"	LOOP+18, OVER+5
>> ABMPGCNT	LOOP+43*, LOOP2+3
>> ABMPGTOT	LOOP+43
>> ABMR("MORE"	LOOP2+15, XIT+1
ABMVALUE	OVER+7*, OVER+12, OVER+13, OVER+14!
DUZ(2	LOOP+47
I	OVER+8~*, OVER+9, OVER+10, OVER+11, OVER+12
>> IOT	MARG+2
U	MARG+2, LOOP+18, LOOP+21, LOOP+29, LOOP+32, LOOP+46, LOOP+51, LOOP+55, LOOP2+1, LOOP2+2 , LOOP2+5, LOOP2+6, LOOP2+9, LOOP2+10, LOOP2+11, LOOP2+13, FRMT, FRMT+2, FRMT+6

Customize PDF page

Package: Third Party Billing

Routine: ABMDF35X

Call Graph Total: 2

Caller Graph Total: 1