©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
BAR277IQ ; IHS/SD/LSL - BAR Inquire to Status Response ;
Source file <BAR277IQ.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | ^DIC ^DIK ^DIR |
| IHS Accounts Receivable | 2 | DIQ^BAR277LM GIS^BARACSI |
| IHS VA Utilities | 1 | EN^XBVK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INQ(ENT) | ;-- inquire an entry
|
|
| EOJ | ;-- kill variables
|
|
| ENT() | ;-- get an entry
|
|
| DEL(DA) | ;-- delete entry
|
|
| ASKV() | ;-- ask to mark all as verified
|
|
| MAIN | ;EP - this is the main routine driver
|
|
| LOOP | ;-- loop the xref and call VER
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BARECLST - [#90056.08] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BARECLST - [#90056.08] | LOOP+2 |
| Name | Line Occurrences |
|---|---|
| $$ASKV | MAIN+3 |
| $$ENT | MAIN+5 |
| EOJ | MAIN+2, MAIN+6, MAIN+8, MAIN+10 |
| INQ | MAIN+7 |
| LOOP | MAIN+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BARENT | MAIN+5*, MAIN+6, MAIN+7 |
| >> BARGIS | MAIN+2 |
| >> BARVDA | LOOP+2*, LOOP+5 |
| >> BARVQ | LOOP+2, LOOP+3 |
| >> BARYN | MAIN+3*, MAIN+4 |
| DA | INQ+1*, INQ+2, LOOP+5*, LOOP+6, DEL~ |
| DIC | ENT+1!, ENT+2*, INQ+1*, INQ+2, LOOP+1*, LOOP+6 |
| DIC("A" | ENT+3* |
| DIC(0 | ENT+2* |
| >> DIK | DEL+1* |
| DIR | ASKV+3! |
| DIR("A" | ASKV+1* |
| DIR(0 | ASKV+1* |
| ENT | INQ~, INQ+1 |
| IOF | LOOP+4 |
| >> Y | ASKV+4, ENT+5 |