©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ABMEH40 ; IHS/ASDST/DMJ - HFCA-1500 EA0 (Claim Record) ;
Source file <ABMEH40.m>
| Package | Total | Call Graph |
|---|---|---|
| Third Party Billing | 3 | $$DX^ABMCVAPI $$Y2KD2^ABMDUTL ($$FMT,$$RCID,S90,SET)^ABMERUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 150 | ;54-54 Same/Similar Symp Ind
|
|
| 210 | ;95-119 Reserved
|
|
| 450 | ;252-266 Resub Reference #
|
|
| EX(ABMX,ABMY) | ||
| 310 | ;184-188 Diagnosis Code 2
|
|
| 380 | ;242-242 Documentation Ind
|
|
| 190 | ;72-79 Disability To Date
|
|
| 60 | ;25-25 Symptom Ind
|
|
| 430 | ;249-249 Supv Prov Ind
|
|
| 130 | ;45-45 Release if Info Ind
|
|
| 110 | ;42-43 Accident Hour
|
|
| 80 | ;34-38 Ext Cause OF Accident
|
|
| 230 | ;140-151 Refer Prov First
|
|
| 250 | ;153-154 Refer Prov State
|
|
| 170 | ;63-63 Disability Type
|
|
| 20 | ;4-5 Reserved
|
|
| 490 | ;284-293 Filler (National)
|
|
| 320 | ;189-193 Diagnosis Code 3
|
|
| 40 | ;23-23 Empl Related Ind
|
|
| 180 | ;64-71 Disability From Date
|
|
| 500 | ;294-320 Filler (Local)
|
|
| 340 | ;199-199 Prov Assign Ind
|
|
| 400 | ;244-245 Functnl Status Code
|
|
| 280 | ;171-171 Lab Ind
|
|
| 480 | ;283-283 Homebound Ind
|
|
| 360 | ;201-208 Prov Signature Date
|
|
| 200 | ;80-94 Refer Prov ID #
|
|
| 140 | ;46-53 Release of Info Date
|
|
| 300 | ;179-183 Diagnosis Code 1
|
|
| 440 | ;250-251 Resubmission Code
|
|
| 460 | ;267-274 Date Last Seen
|
|
| 330 | ;194-198 Diagnosis Code 4
|
|
| 120 | ;44-44 Abuse Ind
|
|
| START | ;start here
|
|
| 260 | ;155-162 Admission Date
|
|
| 240 | ;152-152 Refer Prov MI
|
|
| 70 | ;26-33 Accident/Symptom Date
|
|
| 90 | ;39-39 Responsibility Ind
|
|
| 100 | ;40-41 Accident State
|
|
| 160 | ;55-62 Same/Similar Symp Date
|
|
| 220 | ;120-139 Refer Prov Last
|
|
| 10 | ;1-3 Record ID
|
|
| GET17 | ;GET DIAGNOSES CODES FROM BILL FILE
|
|
| 420 | ;248-248 Champus Nonavail Ind
|
|
| 270 | ;163-170 Discharge Date
|
|
| 30 | ;6-22 Patient Control Number
|
|
| 50 | ;24-24 Accident Ind
|
|
| 470 | ;275-282 Date Document Sent
|
|
| 390 | ;243-243 Type of Documentation
|
|
| 410 | ;246-247 Special Program Ind
|
|
| 290 | ;172-178 Lab Charges
|
|
| 350 | ;200-200 Prov Signature Ind
|
|
| 370 | ;209-241 Facility/Lab Name
|
|
| LOOP | ;LOOP HERE
|
| Name | Field # of Occurrence |
|---|---|
| $$DX^ABMCVAPI | 80+3, GET17+8 |
| $$Y2KD2^ABMDUTL | 70+2, 70+4, 140+2, 160+2, 260+2, 270+2, 360+3 |
| $$FMT^ABMERUTL | 20+2, 30+2, 70+5, 80+5, 90+2, 100+2, 110+2, 120+2, 130+3, 140+3 , 150+4, 160+3, 170+2, 180+2, 190+2, 200+2, 210+2, 220+15, 230+2, 240+2 , 250+2, 260+3, 270+3, 280+4, 290+2, 300+3, 310+2, 320+2, 330+2, 340+2 , 350+2, 360+4, 370+2, 380+2, 390+2, 400+2, 410+2, 420+2, 430+2, 440+6 , 450+2, 460+2, 470+2, 480+2, 490+2, 500+2 |
| $$RCID^ABMERUTL | 440+5 |
| S90^ABMERUTL | START+5 |
| SET^ABMERUTL | START+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | 40+1, 50+1, 60+2, 70+1, 70+3, 80+1, 110+1, 130+1, 160+1, 200+1 , 220+3, 260+1, 270+1, 290+1, 360+1, 450+1, GET17+3, GET17+5, GET17+7 |
| ^ABMDEXP - [#9002274.08] | GET17+9 |
| ^ABMEXLM("AA" | LOOP+3 |
| ^AUPNPAT - [#9000001] | 140+1 |
| ^DIC(4 - [#4] | 370+1 |
| Name | Line Occurrences |
|---|---|
| 160 | 150+2 |
| 290 | 280+2 |
| 450 | 440+2 |
| @( | LOOP+2, LOOP+3, EX+8 |
| GET17 | 300+1 |
| LOOP | START+4 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LOOP+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | START+1!, START+6! |
| ABM(17 | 300+2, 310+1, 320+1, 330+1, GET17+7*, GET17+8*, GET17+10*, GET17+11* |
| ABME | START+1!, START+6! |
| ABME("RTYPE" | START+2* |
| >> ABMP("BDFN" | 40+1, 50+1, 60+2, 70+1, 70+3, 80+1, 110+1, 130+1, 160+1, 200+1 , 220+3, 260+1, 270+1, 290+1, 360+1, 450+1, GET17+3, GET17+5, GET17+7 |
| >> ABMP("EXP" | LOOP+3, GET17+9 |
| >> ABMP("FMT" | EX+7*, EX+10* |
| >> ABMP("INS" | LOOP+3, 440+5 |
| >> ABMP("NOFMT" | LOOP+4, EX+7 |
| >> ABMP("PCN" | 30+1 |
| >> ABMP("PDFN" | 140+1 |
| >> ABMP("VDT" | 80+3, GET17+8 |
| >> ABMR(40 | START+1!, LOOP+4, 10+1*, 20+1*, 20+2*, 30+1*, 30+2*, 40+1*, 40+2*, 50+1* , 50+2*, 50+3*, 50+4*, 60+1*, 60+2*, 70+1*, 70+2*, 70+3*, 70+4*, 70+5* , 80+1*, 80+3*, 80+4*, 80+5*, 90+1*, 90+2*, 100+1*, 100+2*, 110+1*, 110+2* , 120+1*, 120+2*, 130+1*, 130+2*, 130+3*, 140+1*, 140+2*, 140+3*, 150+1*, 150+3* , 150+4*, 160+1*, 160+2*, 160+3*, 170+1*, 170+2*, 180+1*, 180+2*, 190+1*, 190+2* , 200+1*, 200+2*, 210+1*, 210+2*, 220+1*, 220+5*, 220+14*, 220+15*, 230+1*, 230+2* , 240+1*, 240+2*, 250+1*, 250+2*, 260+1*, 260+2*, 260+3*, 270+1*, 270+2*, 270+3* , 280+1*, 280+3*, 280+4*, 290+1*, 290+2*, 300+2*, 300+3*, 310+1*, 310+2*, 320+1* , 320+2*, 330+1*, 330+2*, 340+1*, 340+2*, 350+1*, 350+2*, 360+1*, 360+2*, 360+3* , 360+4*, 370+1*, 370+2*, 380+1*, 380+2*, 390+1*, 390+2*, 400+1*, 400+2*, 410+1* , 410+2*, 420+1*, 420+2*, 430+1*, 430+2*, 440+1*, 440+3, 440+4*, 440+5*, 440+6* , 450+1*, 450+2*, 460+1*, 460+2*, 470+1*, 470+2*, 480+1*, 480+2*, 490+1*, 490+2* , 500+1*, 500+2*, EX+9, EX+11! |
| >> ABMREC(40 | START+1!, LOOP+4* |
| >> ABMRP | 220+3*, 220+4, 220+5, 220+6, 220+10, 220+11*, 220+12, 220+13, 220+14 |
| ABMRPF | 220+2!, 220+6*, 220+7, 220+9*, 220+10, 220+12*, 230+1 |
| ABMRPM | 220+2!, 220+7*, 220+8*, 220+13*, 240+1 |
| ABMX | EX~, EX+8, EX+9, EX+11! |
| ABMY | EX~, EX+11! |
| >> CNT | GET17+2*, GET17+6*, GET17+7, GET17+8, GET17+10 |
| DUZ(2 | 40+1, 50+1, 60+2, 70+1, 70+3, 80+1, 110+1, 130+1, 160+1, 200+1 , 220+3, 260+1, 270+1, 290+1, 360+1, 370+1, 450+1, GET17+3, GET17+5, GET17+7 |
| I | LOOP+1*, LOOP+2, LOOP+3, LOOP+4, GET17+1~, GET17+2*, GET17+3*, GET17+5, GET17+11* |
| J | GET17+1~, GET17+4*, GET17+5*, GET17+7 |
| U | 40+1, 80+1, 80+3, 260+1, 290+1, 370+1, GET17+7, GET17+8 |
| >> Y | EX+9*, EX+12 |