©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
ABMDRCO2 ; IHS/ASDST/DMJ - CO VISITS REPORT (PRINT) ;
Source file <ABMDRCO2.m>
| Package | Total | Call Graph |
|---|---|---|
| Third Party Billing | 2 | (HEAD,PAGE,PRVTINS,TOTAL)^ABMDRCO3 $$SDT^ABMDUTL |
| VA Fileman | 1 | ^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| P2 | ||
| P3 | ||
| P1 | ||
| END | ||
| P4 | ||
| P5 | ||
| WRITE | ;print line
|
|
| INIT | ||
| ;
|
||
| MAIN |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUTNINS("B" | INIT+4 |
| ^AUTTBEN - [#9999999.25] | P5+2 |
| ^DIC(4 - [#4] | INIT+1 |
| ^DPT - [#2] | P5+5 |
| ^TMP("ABMDRCO" | INIT, END!, P1, P2, P3, P4, P5 |
| Name | Line Occurrences |
|---|---|
| END | INIT |
| P1 | P2 |
| P2 | P3 |
| P3 | P4 |
| P4 | P5 |
| P5 | WRITE+6, WRITE+9 |
| MAIN, MAIN+1, MAIN+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | P5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABMD | END+1! |
| ABMD("$J" | INIT, END, P1, P2, P3, P4, P5 |
| ABMD("BDT" | INIT+2* |
| ABMD("BEN" | PRINT+1*, P1*, P2, P3, P4, P5, P5+2 |
| ABMD("BENP" | P5+2*, P5+3, P5+4*, WRITE+2 |
| ABMD("CHMP" | INIT+4* |
| ABMD("COFLG" | P5+2*, P5+3! |
| ABMD("DFN" | P2*, P3*, P4, P5, P5+5 |
| ABMD("DSCH" | P5+1*, WRITE+7, WRITE+8 |
| ABMD("EDT" | INIT+3* |
| ABMD("FAC" | INIT+1* |
| ABMD("HRCN" | P5+1*, WRITE+2 |
| ABMD("II" | MAIN*, MAIN+1*, MAIN+2*, P1, P2, P3, P4, P5, P5+1, WRITE+3 , WRITE+6 |
| ABMD("NAME" | P1*, P2*, P3, P4, P5, WRITE+2 |
| ABMD("SSN" | P5+5*, P5+6*, WRITE+2 |
| ABMD("STOP" | INIT*, MAIN, MAIN+1, WRITE+1 |
| ABMD("STR" | P5*, P5+1 |
| ABMD("SUB" | P2*, P3, WRITE+2, WRITE+3, WRITE+6* |
| ABMD("TDEN" | MAIN+2 |
| ABMD("TIP" | MAIN+1 |
| ABMD("TOP" | MAIN |
| ABMD("TOT" | INIT*, WRITE+6*, WRITE+9* |
| ABMD("VDFN" | P4*, P5* |
| ABMD("VDT" | P3+2*, P4*, P5, WRITE+5, WRITE+8 |
| ABMDSTOP | END+1! |
| DUZ(2 | INIT+1 |
| IOSL | WRITE+1 |
| >> X | WRITE+8*, WRITE+9 |
| >> X1 | WRITE+8* |
| >> X2 | WRITE+8* |