©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
BARPMUP1 ; IHS/SD/LSL - MANUAL UPLOAD PROCESS JAN 15,1997 ;
Source file <BARPMUP1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | ^DIC $$GET1^DIQ ^DIR |
| IHS Accounts Receivable | 1 | $$SDT^BARDUTL |
| IHS VA Utilities | 1 | $$DIC^XBDIQ1 |
| Third Party Billing | 1 | (BLNM,EXT)^ABMAPASS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LOOP3P | ;
|
|
| SELSAT | ; checking for satellite selection
|
|
| FINDBILL | ;
|
|
| SELSATE | ;
|
|
| ONE | ;EP
|
|
| L2 | ;
|
|
| CHOOSE | ;
|
| 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 |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^ABMDBILL(2906 - [#9002274.4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | FINDBILL+4, LOOP3P+8, L2+2 |
| ^BARBL( | L2+20 |
| Name | Line Occurrences |
|---|---|
| CHOOSE | SELSATE+11 |
| FINDBILL | SELSATE+9 |
| L2 | SELSATE+15 |
| LOOP3P | FINDBILL+4 |
| SELSATE | SELSAT+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ABMA("BLNM" | L2+4*, L2+8 |
| >> ABMA("PTNM" | L2+5* |
| >> ABMA("VSLC" | L2+6* |
| >> BAR1 | CHOOSE+3*, CHOOSE+4*, CHOOSE+5, CHOOSE+6, CHOOSE+7 |
| BAR3DOS | FINDBILL+2~, LOOP3P+8*, LOOP3P+10 |
| BAR3PAT | SELSATE+1~, FINDBILL+2~, LOOP3P+7*, LOOP3P+10 |
| BAR3PBIL | SELSATE+1~, SELSATE+8*, LOOP3P+3 |
| BARBILLS | SELSATE+1~, SELSATE+10, FINDBILL+1! |
| BARBILLS( | SELSATE+13, SELSATE+14, LOOP3P+10*, CHOOSE+4, CHOOSE+5 |
| >> BARBLNM | L2+8*, L2+9, L2+20, L2+29 |
| BARCNT | SELSATE+1~, SELSATE+11, SELSATE+12, SELSATE+13, SELSATE+14, FINDBILL+1!, LOOP3P+9*, LOOP3P+10, CHOOSE+1!, CHOOSE+13* |
| >> BARCNT2 | CHOOSE+6* |
| >> BARD | CHOOSE+5*, CHOOSE+7 |
| BARDA | ONE+1~ |
| BARDUZ2 | SELSAT+8*, SELSAT+10, SELSAT+11!, L2+20 |
| BARQUIT | SELSAT+1! |
| BARSTAT | ONE+1~, L2+28* |
| BASR3DOS | SELSATE+1~ |
| >> DA | L2+3*, L2+28 |
| >> DA(1 | SELSAT+4* |
| DD | LOOP3P+4! |
| DIC | ONE+1~, SELSAT+3*, LOOP3P+1* |
| DIC(0 | SELSAT+5*, LOOP3P+2* |
| DIR | SELSATE+3!, CHOOSE+8!, L2+10!, L2+15!, L2+27! |
| DIR("A" | SELSATE+4*, CHOOSE+9*, L2+11* |
| DIR("B" | L2+12*, L2+24* |
| DIR(0 | SELSATE+5*, CHOOSE+10*, L2+13*, L2+25* |
| >> DIRUT | SELSAT+9, SELSATE+7, CHOOSE+12 |
| DO | LOOP3P+4! |
| DUZ(2 | SELSAT+4, SELSAT+8, SELSAT+10*, SELSATE+14*, FINDBILL+3*, FINDBILL+4*, LOOP3P+8, LOOP3P+10, L2+2 |
| U | SELSATE+13, SELSATE+14, LOOP3P+8, LOOP3P+10, CHOOSE+7, L2+4, L2+5, L2+6 |
| >> X | LOOP3P+3* |
| Y | SELSAT+7, SELSATE+1~, SELSATE+8, SELSATE+13*, SELSATE+15, LOOP3P+6, LOOP3P+7, LOOP3P+8, LOOP3P+10, CHOOSE+13 , L2+2, L2+3, L2+16, L2+20 |
| Y(0 | LOOP3P+10, L2+2*, L2+4, L2+5, L2+6 |