Routine: ABME5NM1

Information

ABME5NM1 ; IHS/ASDST/DMJ - 837 NM1 Segment

Source Information

Source file <ABME5NM1.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Third Party Billing	4	($$AN,837)^ABMUTL8 ($$EIN,$$NPIUSAGE)^ABMUTLF ($$FNM,$$LNM,$$MI,$$SFX)^ABMUTLN ($$PNUM,$$RCID)^ABMUTLP
Kernel	1	$$NPI^XUSNPI
VA Fileman	1	$$GET1^DIQ

Caller Graph

Caller Graph Total: 11

Package	Total	Caller Graph
Third Party Billing	11	ABME5L1 ABME5L10 ABME5L12 ABME5L14 ABME5L15 ABME5L16 ABME5L2 ABME5L3 ABME5L7 ABME5L8 ABME5L9

Entry Points

Name	Comments	DBIA/ICR reference
10	;segment
20	;NM101 - Entity Identifier Code
120	;NM111 - Entity Identifier Code (Not used)
30	;NM102 - Entity Type Qualifier
50	;NM104 - Name First
40	;NM103 - Name Last or Organization Name
60	;NM105 - Name Middle
130	;NM112 - Name Last or Organization Name (Not used)
110	;NM110 - Entity Relationship Code (Not used)
70	;NM106 - Name Prefix (Not Used)
EP(X,Y)	;EP - START HERE
90	;NM108 - Identification Code Qualifier
80	;NM107 - Name Suffix
100	;NM109 - Identification Code
LOOP	;LOOP HERE

External References

Name	Field # of Occurrence
$$AN^ABMUTL8	100+68
837^ABMUTL8	LOOP+6
$$EIN^ABMUTLF	100+67
$$NPIUSAGE^ABMUTLF	90+1
$$FNM^ABMUTLN	50+5, 50+10, 50+15
$$LNM^ABMUTLN	40+22, 40+27, 40+38
$$MI^ABMUTLN	60+5, 60+9, 60+13
$$SFX^ABMUTLN	80+5, 80+9, 80+13
$$PNUM^ABMUTLP	100+60
$$RCID^ABMUTLP	100+10, 100+52
$$GET1^DIQ	40+47
$$NPI^XUSNPI	100+20, 100+25, 100+27, 100+30, 100+31, 100+66

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABMDBILL(2906 - [#9002274.4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDPARM(	100+19, 100+65
^ABMEXLM("AA"	LOOP+3, LOOP+6
^ABMNINS(	40+32, 100+9, 100+14, 100+15, 100+19, 100+51, 100+65
^ABMRECVR - [#9002274.095]	40+10, 100+7, 100+50
^ABMRECVR("C"	40+8, 40+9, 100+5, 100+6, 100+47, 100+49
^AUTNINS - [#9999999.18]	40+13, 40+14, 40+33, 40+34
^AUTTLOC - [#9999999.06]	100+21
^DIC(4 - [#4]	40+18, 40+42
^VA(200 - [#200]	100+25, 100+27

Label References

Name	Line Occurrences
@(	LOOP+2, LOOP+3
LOOP	EP+7

Naked Globals

Name	Field # of Occurrence
^(	LOOP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ABM("PRV"	40+26, 40+27, 40+28, 50+9, 50+10, 50+11, 60+13, 80+13, 100+30
ABMCHIEN	40+9, 40+10, 40+11!, 100+6, 100+7, 100+49*, 100+50
ABME	EP+8!
ABME("RTYPE"	EP+6*, LOOP+3, LOOP+6
ABMEIC	EP+3*, EP+8!, 20+1, 30+2, 40+5, 40+17, 40+21, 40+25, 40+31, 40+37 , 40+41, 40+46, 50+4, 50+8, 50+14, 60+4, 60+8, 60+12, 80+4, 80+8 , 80+12, 90+3, 90+4, 90+5, 90+6, 90+7, 100+2, 100+13, 100+17, 100+24 , 100+25, 100+27, 100+35, 100+57, 100+63
>> ABMIEN	100+25, 100+27
>> ABMLNPI	100+19, 100+20, 100+65, 100+66
>> ABMLOOP	100+48
>> ABMNIEN	EP+4*, 40+32, 40+33, 40+34, 100+47, 100+49, 100+50, 100+51, 100+52
>> ABMNPIU	90+1*, 100+18, 100+64
>> ABMP("BDFN"	40+47, 100+60
>> ABMP("EXP"	LOOP+3, LOOP+6
>> ABMP("INS"	LOOP+3, LOOP+6, 40+8, 40+9, 40+10, 40+13, 40+14, 90+1, 100+5, 100+6 , 100+7, 100+9, 100+10, 100+14, 100+15, 100+19, 100+65
>> ABMP("LDFN"	40+42, 90+1, 100+9, 100+19, 100+31, 100+65, 100+67
>> ABMP("PDFN"	40+22, 50+5, 60+5, 80+5
>> ABMP("PRV"	100+25, 100+27
>> ABMP("SNUM"	100+58
>> ABMP("VTYP"	40+32, 100+9, 100+14, 100+19, 100+51, 100+65
>> ABMPST	100+58
>> ABMR("NM1"	EP+5!, LOOP+5, 10+1, 20+1, 30+1, 30+2, 40+2, 40+10, 40+13, 40+14 , 40+18, 40+22, 40+27, 40+28, 40+32, 40+33, 40+34, 40+38, 40+42, 40+47 , 50+1, 50+5, 50+10, 50+11, 50+15, 60+1, 60+5, 60+9, 60+13, 70+1 , 80+1, 80+5, 80+9, 80+13, 90+2, 90+3, 90+4, 90+5, 90+6, 90+7 , 100+1, 100+7, 100+9, 100+10, 100+14, 100+15, 100+20, 100+21, 100+25, 100+27 , 100+30, 100+31, 100+50, 100+51, 100+52, 100+54, 100+58, 100+59, 100+60, 100+66* , 100+67, 100+68, 110+1, 120+1, 130+1*
>> ABMREC("NM1"	EP+5!, LOOP+4, LOOP+5
>> ABMSFILE	40+38, 50+15, 60+9, 80+9
>> ABMSIEN	40+38, 50+15, 60+9, 80+9
DUZ(2	40+18, 40+32, 100+14, 100+15, 100+21, 100+51
>> I	LOOP+1*, LOOP+2, LOOP+3, LOOP+5, LOOP+6
U	40+10, 40+14, 40+18, 40+34, 40+42, 100+7, 100+9, 100+14, 100+15, 100+19 , 100+20, 100+25, 100+27, 100+30, 100+31, 100+50, 100+51, 100+65, 100+66
X	EP~, EP+3
Y	EP~, EP+4, 100+36!

Customize PDF page

Package: Third Party Billing

Routine: ABME5NM1

Call Graph Total: 6

Caller Graph Total: 11