ABMDE31 ;IHS/SD/SDR - AMBULANCE - PAGE 3A ;
Source file <ABMDE31.m>
| Package | Total | Call Graph |
|---|---|---|
| Third Party Billing | 4 | (PAUSE,SUM)^ABMDE1 ^ABMDE31X (FLDS,SEL)^ABMDEOPT ^ABMDERR |
| VA Fileman | 3 | ^DIC ^DIE ^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OPT | ;EP
|
|
| DISP | ;
|
|
| C | ;;NEARNESS OF FAMILY MEMBERS
|
|
| B | ;;BENEFIT OF PREFERRED PHYSICIAN
|
|
| E | ;;TRANSFERRED TO REHAB FACILITY
|
|
| VALSTUFF | ;
|
|
| GETDEST(ABMDIEN) | ;EP - figure out data for destination - variable pointer
|
|
| A | ;;NEAREST FAC.-CARE OF SYMPTOMS/COMPLAINTS/BOTH
|
|
| D | ;;A SPECIALIST/AVAILABILITY OF SPECIALIZED EQUIP
|
|
| V1 | ;View data
|
|
| 2 | ;;.1214 Point of Pickup Modifier
|
|
| XIT | ;
|
|
| 4 | ;;.1216 Destination Modifier
|
|
| 7 | ;;.1215 Was ambulance transport considered MEDICALLY NECESSARY?
|
|
| 11 | ;;.1213
|
|
| 9 | ;;1218
|
|
| 8 | ;;.1211
|
|
| E1 | ;Edit data
|
|
| 10 | ;;.1212
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^ABMDCLM - [#9002274.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMCNDIN - [#9002274.34] | DISP+31 |
| ^ABMDCLM - [#9002274.3] | E1+21, E1+56, E1+73, DISP+6, DISP+14, DISP+29, DISP+30, XIT+1, VALSTUFF+14 |
| ^AUTTLOC - [#9999999.06] | GETDEST+10, GETDEST+12, GETDEST+13, GETDEST+14, GETDEST+15 |
| ^AUTTVNDR - [#9999999.11] | GETDEST+18, GETDEST+19, GETDEST+20, GETDEST+21, GETDEST+22 |
| ^DD(9002274.3 | E1+60, DISP+12, DISP+21, VALSTUFF+5 |
| ^DIC(4 - [#4] | E1+31, GETDEST+11 |
| ^DIC(5 - [#5] | DISP+10, GETDEST+6, GETDEST+14, GETDEST+21 |
| ^DPT - [#2] | GETDEST+4, GETDEST+5, GETDEST+6, GETDEST+7 |
| Name | Line Occurrences |
|---|---|
| $$GETDEST | DISP+15 |
| @( | OPT+17 |
| DISP | OPT+4 |
| OPT | OPT+19 |
| VALSTUFF | E1+24 |
| XIT | OPT+1, OPT+5, OPT+11, OPT+14, OPT+18, E1+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | OPT+2!, E1+7*, XIT+2! |
| ABM("DO" | OPT+15*, OPT+17 |
| ABM("I" | E1+7*, E1+8, E1+9 |
| >> ABMANS | E1+51*, E1+52, E1+69 |
| ABMAREC | DISP+6*, DISP+7, DISP+8, DISP+9, DISP+10, DISP+11, DISP+12, DISP+21, DISP+24, DISP+25 , DISP+27, DISP+33, DISP+34, DISP+37, DISP+46, DISP+49! |
| >> ABMCOND | DISP+30*, DISP+31 |
| >> ABMCONDI | DISP+28*, DISP+29*, DISP+30 |
| ABMDIEN | DISP+14*, DISP+15, GETDEST~, GETDEST+1, GETDEST+2, GETDEST+4, GETDEST+5, GETDEST+6, GETDEST+7, GETDEST+9 , GETDEST+10, GETDEST+12, GETDEST+13, GETDEST+14, GETDEST+15, GETDEST+17, GETDEST+18, GETDEST+19, GETDEST+20, GETDEST+21 , GETDEST+22 |
| >> ABMDREC | DISP+15*, DISP+16, DISP+17, DISP+18, DISP+19, DISP+20, GETDEST+1*, GETDEST+2, GETDEST+3*, GETDEST+4* , GETDEST+5*, GETDEST+6*, GETDEST+7*, GETDEST+9, GETDEST+10*, GETDEST+11*, GETDEST+12*, GETDEST+13*, GETDEST+14*, GETDEST+15* , GETDEST+17, GETDEST+18*, GETDEST+19*, GETDEST+20*, GETDEST+21*, GETDEST+22*, GETDEST+23 |
| >> ABMDVAR | E1+31* |
| ABME | OPT+2!, XIT+2! |
| ABME("CONT" | OPT+8*, OPT+10! |
| ABME(0 | OPT+7 |
| >> ABMENTRY | E1+56*, E1+58, E1+59 |
| >> ABMIEN | E1+72*, E1+73*, E1+74 |
| >> ABMP("C0" | XIT+1* |
| >> ABMP("CDFN" | E1+12, E1+18, E1+21, E1+28, E1+37, E1+44, E1+55, E1+56, E1+70, E1+73 , DISP+6, DISP+14, DISP+29, DISP+30, XIT+1, VALSTUFF+2, VALSTUFF+12, VALSTUFF+14 |
| >> ABMP("DDL" | DISP+3 |
| >> ABMP("FLDS" | E1+2*, E1+7, E1+8, E1+15, E1+26, E1+35, E1+42, E1+50 |
| >> ABMP("OPT" | OPT+3* |
| >> ABMP("QU" | OPT+2! |
| >> ABMP("WORKSHEET" | OPT+1 |
| >> ABMTRNST | DISP+37*, DISP+38*, DISP+44 |
| ABMV | XIT+2! |
| ABMZ | OPT+2! |
| ABMZ("PG" | DISP+2* |
| ABMZ("TITL" | V1+1*, DISP+1* |
| DA | E1+12*, E1+16!, E1+18*, E1+27!, E1+28*, E1+36!, E1+37*, E1+41!, E1+43!, E1+44* , E1+48!, E1+66*, E1+74*, VALSTUFF+1!, VALSTUFF+10!, VALSTUFF+11* |
| DA(1 | E1+55*, E1+57, E1+70*, E1+71, VALSTUFF+1!, VALSTUFF+2*, VALSTUFF+3, VALSTUFF+10!, VALSTUFF+12*, VALSTUFF+13 |
| DD | E1+62!, VALSTUFF+7! |
| DIC | E1+16!, E1+27!, E1+36!, E1+41!, E1+43!, E1+48!, E1+54!, E1+57*, E1+65, VALSTUFF+1! , VALSTUFF+3*, VALSTUFF+10! |
| DIC("A" | E1+59*, E1+61* |
| DIC("P" | E1+60*, VALSTUFF+5* |
| DIC("V" | E1+30* |
| DIC(0 | E1+58*, VALSTUFF+4* |
| DIE | E1+11*, E1+16!, E1+17*, E1+27!, E1+29*, E1+36!, E1+39*, E1+41!, E1+43!, E1+46* , E1+48!, E1+65*, VALSTUFF+13* |
| >> DIK | E1+71* |
| DIR | E1+27!, E1+36!, E1+41!, E1+43!, E1+48!, VALSTUFF+1!, VALSTUFF+10! |
| >> DIROUT | OPT+5, OPT+11, OPT+14, OPT+18, E1+5, DISP+3 |
| DO | E1+62!, VALSTUFF+7! |
| DR | E1+6*, E1+9*, E1+10*, E1+16!, E1+19*, E1+21*, E1+22*, E1+27!, E1+32*, E1+36! , E1+38*, E1+41!, E1+43!, E1+45*, E1+48!, E1+67*, E1+77!, VALSTUFF+1!, VALSTUFF+10!, VALSTUFF+14* |
| >> DTOUT | OPT+5, OPT+11, OPT+14, OPT+18, E1+5, E1+53, DISP+3 |
| DUOUT | OPT+2!, OPT+14, E1+5, E1+53, DISP+3 |
| DUZ(2 | E1+21, E1+29, E1+31, E1+39, E1+46, E1+56, E1+73, DISP+6, DISP+14, DISP+29 , DISP+30, XIT+1, VALSTUFF+14 |
| IOSL | DISP+3 |
| U | E1+21, E1+31, E1+56, E1+60, E1+64, DISP+7, DISP+8, DISP+9, DISP+10, DISP+11 , DISP+12, DISP+14, DISP+16, DISP+17, DISP+18, DISP+19, DISP+20, DISP+21, DISP+24, DISP+25 , DISP+27, DISP+30, DISP+31, DISP+33, DISP+34, DISP+37, DISP+46, GETDEST+4, GETDEST+5, GETDEST+6 , GETDEST+7, GETDEST+10, GETDEST+11, GETDEST+12, GETDEST+13, GETDEST+14, GETDEST+15, GETDEST+18, GETDEST+19, GETDEST+20 , GETDEST+21, GETDEST+22, VALSTUFF+5, VALSTUFF+14 |
| X | E1+16!, E1+27!, E1+51, VALSTUFF+6* |
| Y | OPT+14, OPT+15, E1+16!, E1+53, E1+64, E1+66, VALSTUFF+9, VALSTUFF+11 |
| Name | Field # of Occurrence |
|---|---|
| $T(@(4) | DISP+46 |
| $T(@ABM | E1+10 |