©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
ABMECS ; IHS/ASDST/DMJ - ELECTRONIC CLAIMS SUBMISSION ;
Source file <ABMECS.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 5 | NOW^%DTC FILE^DICN ^DIE $$GET1^DIQ ^DIR |
| Third Party Billing | 3 | EMCREAT^ABMECDSP ($$FMT,GCNMULT,MSG)^ABMERUTL $$SBR^ABMUTLP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEWB | ;
; Create a new batch (Make entry in 3P TX STATUS) |
|
| START | ;
|
|
| FILE | ;
; File bills to 3P TX STATUS FILE |
|
| CHFILE | ;
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | NEWB+2 |
| EMCREAT^ABMECDSP | START+5 |
| $$FMT^ABMERUTL | NEWB+14 |
| GCNMULT^ABMERUTL | NEWB+17 |
| MSG^ABMERUTL | CHFILE+87, FILE+14 |
| $$SBR^ABMUTLP | CHFILE+107, FILE+34 |
| FILE^DICN | CHFILE+97, FILE+24, NEWB+7 |
| ^DIE | CHFILE+105, CHFILE+109, CHFILE+115, CHFILE+123, FILE+32, FILE+36, FILE+43, FILE+52, NEWB+15 |
| $$GET1^DIQ | CHFILE+78, FILE+5 |
| ^DIR | START+19, CHFILE+126 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^ABMDTXST - [#9002274.6] | Classic Fileman Calls |
| ^AUTNINS - [#9999999.18] | GET1^DIQ |
| ^AUTTINTY - [#9999999.181] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | CHFILE+101, CHFILE+102, CHFILE+113, FILE+28, FILE+29, FILE+41 |
| ^ABMDTXST - [#9002274.6] | CHFILE+89*, FILE+16* |
| ^ABMDVTYP - [#9002274.8] | NEWB+22 |
| ^TMP($J | START+16, CHFILE+61, CHFILE+63, CHFILE+65, CHFILE+67, CHFILE+73, CHFILE+77, CHFILE+80, CHFILE+82, CHFILE+83 , CHFILE+92, FILE+10, FILE+11, FILE+19 |
| Name | Line Occurrences |
|---|---|
| @( | CHFILE+118, FILE+47 |
| CHFILE | START+16 |
| FILE | START+17 |
| NEWB | CHFILE+85, FILE+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | NEWB+3 |
| ABMAPOK | CHFILE+90*, CHFILE+116!, FILE+17*, FILE+45! |
| ABMAPRV | CHFILE+101*, CHFILE+102*, CHFILE+103, CHFILE+104, CHFILE+106!, FILE+28*, FILE+29*, FILE+30, FILE+31, FILE+33! |
| >> ABMCH | CHFILE+2* |
| >> ABMDA | CHFILE+91*, CHFILE+92*, CHFILE+93, CHFILE+101, CHFILE+102, CHFILE+107, CHFILE+112, CHFILE+113, CHFILE+114, FILE+18* , FILE+19*, FILE+20, FILE+28, FILE+29, FILE+34, FILE+39, FILE+41, FILE+42 |
| ABME | START+1! |
| ABMER | START+1!, START+5, START+21!, CHFILE+128! |
| ABMER( | CHFILE+2, CHFILE+68*, CHFILE+75, CHFILE+118, FILE+3, FILE+6, FILE+7, FILE+47, NEWB+13 |
| ABMER("CNT" | CHFILE+1*, CHFILE+74*, CHFILE+84*, FILE+2*, NEWB+14 |
| ABMER("LAST" | CHFILE+1*, CHFILE+58*, CHFILE+75*, FILE+2* |
| >> ABMEXP | CHFILE+66*, CHFILE+67*, CHFILE+68, CHFILE+69, CHFILE+81*, CHFILE+82*, CHFILE+85, CHFILE+86, CHFILE+92, FILE+7* , FILE+19 |
| >> ABMEXPSV | CHFILE+66*, CHFILE+68, CHFILE+69*, CHFILE+81*, CHFILE+85, CHFILE+86* |
| ABMGCN | START+15!, FILE+12! |
| >> ABMINS | CHFILE+62*, CHFILE+63*, CHFILE+65, CHFILE+67 |
| >> ABMINS("IEN" | CHFILE+76*, CHFILE+77*, CHFILE+78, CHFILE+80, CHFILE+82, CHFILE+83, CHFILE+92, FILE+3*, FILE+5, FILE+10 , FILE+11, FILE+19, NEWB+13 |
| >> ABMITYP | CHFILE+78*, FILE+5*, NEWB+13 |
| >> ABMLOC | CHFILE+59*, CHFILE+61*, CHFILE+63, CHFILE+65, CHFILE+67, CHFILE+68, CHFILE+69, CHFILE+71*, CHFILE+73*, CHFILE+75 , CHFILE+77, CHFILE+80, CHFILE+82, CHFILE+83, CHFILE+85, CHFILE+86, CHFILE+92, FILE+9*, FILE+10*, FILE+11 , FILE+19, NEWB+20 |
| >> ABMLOCSV | CHFILE+59*, CHFILE+68, CHFILE+69*, CHFILE+72*, CHFILE+85, CHFILE+86* |
| ABMP | START+21!, CHFILE+128! |
| ABMP("XMIT" | CHFILE+113, CHFILE+121, FILE+41, FILE+50, NEWB+10* |
| >> ABMREX("BATCHSELECT" | NEWB+17 |
| >> ABMREX("BDFN" | CHFILE+114*, FILE+42* |
| >> ABMREX("BILLSELECT" | NEWB+17 |
| ABMSBR | CHFILE+107*, CHFILE+108, CHFILE+110!, FILE+34*, FILE+35, FILE+37! |
| ABMSEQ | START+5, START+6, START+16, START+21!, CHFILE+2, CHFILE+118, CHFILE+128!, FILE+3, FILE+6, FILE+7 , FILE+47, NEWB+13 |
| >> ABMVTYP | CHFILE+64*, CHFILE+65*, CHFILE+67 |
| >> ABMVTYPE | CHFILE+68, CHFILE+69, CHFILE+79*, CHFILE+80*, CHFILE+82, CHFILE+83, CHFILE+85, CHFILE+86, CHFILE+92, FILE+6* , FILE+11, FILE+19, NEWB+22 |
| >> ABMVTYPS | CHFILE+64*, CHFILE+68, CHFILE+69*, CHFILE+79*, CHFILE+85, CHFILE+86* |
| >> DA | CHFILE+99*, CHFILE+112*, CHFILE+121*, FILE+26*, FILE+39*, FILE+50*, NEWB+12*, NEWB+18 |
| >> DA(1 | CHFILE+89, FILE+16, NEWB+18* |
| DD | CHFILE+97!, FILE+24!, NEWB+7! |
| >> DIC | CHFILE+94*, FILE+21*, NEWB+4*, NEWB+11 |
| >> DIC(0 | CHFILE+95*, FILE+22*, NEWB+5* |
| >> DIE | CHFILE+100*, CHFILE+111*, CHFILE+120*, FILE+27*, FILE+38*, FILE+49*, NEWB+11* |
| >> DINUM | CHFILE+96*, FILE+23* |
| DIR | START+20!, CHFILE+127! |
| DIR(0 | START+18*, CHFILE+125* |
| DLAYGO | NEWB+6*, NEWB+8! |
| DO | CHFILE+97!, FILE+24!, NEWB+7! |
| >> DR | CHFILE+104*, CHFILE+108*, CHFILE+113*, CHFILE+122*, FILE+31*, FILE+35*, FILE+41*, FILE+51*, NEWB+13*, NEWB+14* |
| DUZ | NEWB+13 |
| DUZ(2 | CHFILE+89, CHFILE+101, CHFILE+102, CHFILE+113, FILE+16, FILE+28, FILE+29, FILE+41 |
| >> POP | CHFILE+119, FILE+48 |
| U | CHFILE+2, CHFILE+102, CHFILE+113, CHFILE+118, FILE+3, FILE+6, FILE+7, FILE+29, FILE+41, FILE+47 , NEWB+13, NEWB+22 |
| >> X | CHFILE+93*, CHFILE+96, FILE+20*, FILE+23, NEWB+3* |
| >> Y | CHFILE+87, CHFILE+98, CHFILE+99, FILE+14, FILE+25, FILE+26, NEWB+9, NEWB+10, NEWB+12 |