ABMEH01 ; IHS/ASDST/DMJ - HCFA-1500 EMC RECORD AA0 (Submitter Data) ;
Source file <ABMEH01.m>
Package | Total | Call Graph |
---|---|---|
Third Party Billing | 2 | $$Y2KD2^ABMDUTL ($$FMT,$$RCID,SET,SOP)^ABMERUTL |
VA Fileman | 1 | EN^DIQ1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
150 | ;213-220 Creation Date
|
|
210 | ;254-257 Test/Prod Indicator
|
|
EX(ABMX,ABMY) | ;EXTRINSIC FUNCTION HERE (X=data element, Y=bill internal entry number)
|
|
190 | ;244-248 Version Code-National
|
|
60 | ;41-73 Submitter Name
|
|
130 | ;170-202 Submitter Contact
|
|
110 | ;156-164 Submitter Zip
|
|
80 | ;104-133 Submitter Address-2
|
|
230 | ;266-266 Retransmission Status
|
|
250 | ;283-283 Vendor Application Cat.
|
|
170 | ;227-242 Receiver ID
|
|
20 | ;4-19 Submitter ID
|
|
40 | ;29-34 Submission Type
|
|
180 | ;243-243 Receiver Type
|
|
280 | ;291-292 Filler (National Use)
|
|
200 | ;249-253 Version Code-Local
|
|
140 | ;203-212 Submitter Telephone Number
|
|
120 | ;165-169 Submitter Region
|
|
START | ;START HERE
|
|
260 | ;284-288 Vendor Software Version
|
|
240 | ;267-282 Original Submitter ID
|
|
70 | ;74-103 Submitter Address-1
|
|
90 | ;134-153 Submitter City
|
|
100 | ;154-155 Submitter State
|
|
160 | ;221-226 Submission Time
|
|
220 | ;258-265 Password
|
|
10 | ;1-3 Record type
|
|
270 | ;289-290 Vendor Software Update
|
|
30 | ;20-28 Reserved
|
|
DIQ2 | ;GET LOCATION INFORMATION
|
|
50 | ;35-40 Submission #
|
|
DIQ1 | ;PULL BILL DATA VIA DIQ1
|
|
290 | ;293-320 Filler (Local Use)
|
|
LOOP | ;LOOP HERE
|
FileNo | Call Tags |
---|---|
^AUTTLOC - [#9999999.06] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMEXLM("AA" | LOOP+3 |
^ABMNINS( | 20+4, 20+5, 20+6, 210+1, 220+1 |
^AUTTLOC - [#9999999.06] | 20+1 |
^DIC(5 - [#5] | 100+2 |
Name | Line Occurrences |
---|---|
@( | LOOP+2, LOOP+3, EX+3 |
DIQ2 | 60+1, 70+1, 90+1, 100+1, 110+1, 140+1 |
LOOP | START+3 |
Name | Field # of Occurrence |
---|---|
^( | LOOP+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | START+5!, EX+5! |
ABM( | 60+1, 70+1, 90+1, 100+1, 110+1, 140+1, DIQ1+1, DIQ2+1 |
ABME | START+5!, EX+5! |
ABME("FLD" | DIQ1+1 |
ABME("RTYPE" | START+2* |
>> ABMP("BDFN" | DIQ1+1, DIQ1+2, EX+1* |
>> ABMP("EXP" | LOOP+3 |
>> ABMP("FMT" | EX+2*, EX+6* |
>> ABMP("INS" | LOOP+3, 20+3, 20+4, 20+5, 20+6, 50+1, 170+1, 210+1, 220+1 |
>> ABMP("LDFN" | 20+4, 20+5, 60+1, 70+1, 90+1, 100+1, 110+1, 140+1, 210+1, 220+1 , DIQ2+1, DIQ2+2 |
>> ABMP("NOFMT" | LOOP+4, EX+2 |
>> ABMP("SOP" | 40+2 |
>> ABMP("SUBID" | 20+8* |
>> ABMP("VTYP" | 20+4 |
>> ABMP("XMIT" | 50+4 |
>> ABMR(1 | START+1!, LOOP+4, 10+1*, 20+1*, 20+2*, 20+4*, 20+5*, 20+6*, 20+7*, 20+8 , 30+1*, 30+2*, 40+2*, 40+3*, 50+2*, 50+3*, 50+4*, 50+5*, 50+6*, 50+7* , 50+8*, 60+1*, 60+2*, 70+1*, 70+2*, 80+1*, 80+2*, 90+1*, 90+2*, 100+1* , 100+2*, 100+3*, 110+1*, 110+2*, 120+1*, 120+2*, 130+1*, 130+2*, 140+1*, 140+2* , 140+3*, 150+1*, 160+1*, 160+2*, 170+1*, 170+2*, 180+1*, 180+2*, 180+3*, 190+1* , 200+1*, 210+1*, 210+2*, 210+3*, 220+1*, 220+2*, 230+1*, 240+1*, 240+2*, 250+1* , 260+1*, 270+1*, 280+1*, 290+1*, 290+2* |
>> ABMR(20 | EX+4, EX+5! |
>> ABMREC(1 | START+1!, LOOP+4* |
>> ABMRT(99 | START+4* |
ABMX | EX~, EX+3, EX+4, EX+5! |
ABMY | EX~, EX+1, EX+5! |
>> DA | DIQ1+2*, DIQ2+2* |
>> DIC | DIQ1+2*, DIQ2+2* |
DIQ | DIQ1+2*, DIQ1+4!, DIQ2+2*, DIQ2+4! |
DIQ(0 | DIQ1+2*, DIQ2+2* |
>> DR | DIQ1+3*, DIQ2+3* |
DT | 150+1 |
DUZ(2 | 20+1, 20+6, 50+6 |
I | LOOP+1*, LOOP+2, LOOP+3, LOOP+4, DIQ1+2~, DIQ2+2~ |
>> Y | EX+4*, EX+7 |