©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
ABMDVS11 ; IHS/ASDST/DMJ - PCC VISIT STUFF, LABORATORY ;
Source file <ABMDVS11.m>
| Package | Total | Call Graph |
|---|---|---|
| Third Party Billing | 2 | ($$CPT,$$IHSCAT,$$IHSCPT)^ABMCVAPI $$ONE^ABMFEAPI |
| VA Fileman | 2 | FILE^DICN ^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;START HERE
|
|
| LAB(VFILE) | ;VFILE is the V file global name
|
|
| CPTSTR | ;Parse CPTSTR and edit claim
|
|
| CLAIM | ;-- claim file stuff
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDCLM - [#9002274.3] | CLAIM+20 |
| ^ABMNINS( | CLAIM+6, CLAIM+11, CLAIM+13, CLAIM+14, CLAIM+15 |
| ^DD(9002274.3 | CLAIM+7, CLAIM+30 |
| Name | Line Occurrences |
|---|---|
| CLAIM | CPTSTR+18 |
| CPTSTR | LAB+20 |
| LAB | START+1, START+2, START+3, START+4, START+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABMI | CPTSTR+5~, CPTSTR+6*, CPTSTR+7 |
| >> ABMIDONE | ABMDVS11+15 |
| >> ABMIIEN | CLAIM+14*, CLAIM+15 |
| >> ABMP("CDFN" | CLAIM+9, CLAIM+20, CLAIM+22 |
| >> ABMP("CORRSDIAG" | CLAIM+17 |
| >> ABMP("EXP" | CLAIM+12 |
| >> ABMP("FEE" | CLAIM+5 |
| >> ABMP("INS" | CLAIM+6, CLAIM+11, CLAIM+13, CLAIM+14, CLAIM+15 |
| >> ABMP("LDFN" | CLAIM+6, CLAIM+11, CLAIM+13, CLAIM+14, CLAIM+15 |
| >> ABMP("VDT" | CPTSTR+11, CPTSTR+14, CPTSTR+16, CLAIM+5 |
| >> ABMP("VTYP" | CLAIM+6 |
| >> ABMSRC | CPTSTR+7*, CLAIM+10, CLAIM+20 |
| >> ABMVDFN | LAB+6 |
| COLDATE | LAB+5~, LAB+14*, CLAIM+10 |
| CPT | LAB+5~, CPTSTR+8*, CPTSTR+11, CPTSTR+14, CLAIM+5, CLAIM+9, CLAIM+11, CLAIM+13, CLAIM+14 |
| CPTCTIEN | CPTSTR+13~, CPTSTR+14*, CPTSTR+15, CPTSTR+16 |
| CPTSTR | LAB+5~, LAB+17*, CPTSTR+6 |
| >> DA | CLAIM+20*, CLAIM+21*, CLAIM+23 |
| >> DA(1 | CLAIM+22* |
| DD | CLAIM+8!, CLAIM+31!, CLAIM+32! |
| DIC | CLAIM+8!, CLAIM+9*, CLAIM+21, CLAIM+25 |
| DIC("DR" | CLAIM+10*, CLAIM+16*, CLAIM+17*, CLAIM+19*, CLAIM+26 |
| DIC("P" | CLAIM+7*, CLAIM+30* |
| DIC(0 | CLAIM+29* |
| >> DIE | CLAIM+25* |
| DO | CLAIM+8!, CLAIM+31!, CLAIM+32! |
| DR | CLAIM+24!, CLAIM+26* |
| DUZ(2 | CLAIM+9, CLAIM+20 |
| FEE | CLAIM+1~, CLAIM+5*, CLAIM+6, CLAIM+10 |
| FILEN | LAB+5~, LAB+18*, CPTSTR+7 |
| J | CPTSTR+5~, CPTSTR+10*, CLAIM+18*, CLAIM+19 |
| L | LAB+5~, LAB+6*, LAB+8, LAB+9, LAB+12, LAB+16, LAB+17, LAB+19, CPTSTR+7 |
| L11 | LAB+5~, LAB+9*, LAB+10, LAB+11 |
| L12 | LAB+5~, LAB+12*, LAB+13, LAB+14, LAB+15 |
| M | CPTSTR+9*, CPTSTR+10, CPTSTR+19! |
| MODIFIER | LAB+5~, CLAIM+18 |
| MODIFIER( | CPTSTR+10*!, CLAIM+18, CLAIM+19 |
| ORDPROV | LAB+5~, LAB+15* |
| >> RESULT | LAB+19*, CLAIM+16 |
| REVCODE | CPTSTR+5~, CPTSTR+11*, CPTSTR+12, CPTSTR+16*, CPTSTR+17*, CLAIM+10 |
| T | LAB+5~, LAB+8* |
| U | LAB+10, LAB+11, LAB+13, LAB+15, LAB+17, LAB+18, LAB+19, CPTSTR+11, CPTSTR+14, CPTSTR+16 , CLAIM+5, CLAIM+6, CLAIM+7, CLAIM+15, CLAIM+30 |
| VFILE | LAB~, LAB+6, LAB+8, LAB+9, LAB+12, LAB+16, LAB+17, LAB+18, LAB+19 |
| X | CPTSTR+5~, CPTSTR+6*, CPTSTR+8, CPTSTR+9, CLAIM+9*, CLAIM+26 |