Routine: ABME3DA1

Information

ABME3DA1 ; IHS/ASDST/DMJ - HCFA-1500 NSF 3.01 EMC RECORD DA1 (Insurance Information) ;

Source file <ABME3DA1.m>

Package	Total	Call Graph
Third Party Billing	2	ISET^ABMERINS ($$FMT,PAYED,S90,SET)^ABMERUTL

Package	Total	Caller Graph
Third Party Billing	1	ABME3DA0

Name	Comments	DBIA/ICR reference
150	;156-156 Zero Pay Indicator
210	;166-166 Champus Spnsr Status
310	;239-253 Bene Check\EFT Trace No
380	;312-312 Contract Agreement Indicator
190	;163-163 Champus Spnsr Branch
60	;83-102 Payor City
130	;142-148 Coinsurance Amount
110	;128-134 Allowed Amount
80	;105-113 Payor Zip
230	;175-182 Ins Card Term Date
250	;190-197 Eomb Date 1
170	;159-160 Adjudication Ind 2
20	;4-5 Sequence #
320	;254-261 Bene Check Date
40	;23-52 Payor Address Line 1
180	;161-162 Adjudication Ind 3
340	;271-285 Prov Check\EFT Trace No
280	;214-221 Eomb Date 4
360	;294-302 Interest Paid
200	;164-165 Champus Spnsr Grade
140	;149-155 Payor Amount Payed
300	;230-238 Amt Paid to Bene
330	;262-270 Amt Paid to Prov
120	;135-141 Deductible Amount
START	;START HERE
260	;198-205 Eomb Date 2
240	;183-189 Balance Due
70	;103-104 Payor State
90	;114-120 Dissallowed Cost Cont
100	;121-127 Disallowed Other
160	;157-158 Adjucation Ind 1
220	;167-174 Ins Card Effect Date
10	;1-3 Record ID
ADDR	;Payor Address Info
270	;206-213 Eomb Date 3
30	;6-22 Patient Control Number
50	;53-82 Payor Address Line 2
390	;313-320 Filler National
290	;222-229 Claim Receipt Date
350	;286-293 Prov Check Date
370	;303-311 Approved Amt
EX(ABMX,ABMY,ABMZ)	;EXTRINSIC FUNCTION HERE
LOOP	;LOOP HERE

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	EX+11
^ABMEXLM("AA"	LOOP+3
^AUTNINS - [#9999999.18]	ADDR+2
^DIC(5 - [#5]	ADDR+3

Name	Field # of Occurrence
^(	LOOP+3