©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
ABPVOP02 ;TALLY PRIVATE INSURANCE ELIG O/P VISIT REPORT; [ 06/02/91 12:49 PM ]
Source file <ABPVOP02.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| A | ||
| ZTLOAD | ||
| A1 | ||
| START | ||
| INIT | ||
| ZTLEND | ||
| XTRACT |
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | ZTLOAD+2 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZTSK - [#14.4] | START+1*, A1+7* |
| ^AAPCDATA | INIT+1 |
| ^AAPCRCDS( | INIT+1 |
| ^AUPNPRVT - [#9000006] | A1+5 |
| Name | Line Occurrences |
|---|---|
| A | A1+1 |
| A1 | A1+5, A1+8 |
| INIT | START |
| XTRACT | START+2 |
| ZTLOAD | START+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %IS | ZTLEND! |
| %ZIS | ZTLEND! |
| A | ZTLEND! |
| A("ADFN" | A+2*, A1+1*, A1+5, A1+7 |
| A("ADOS" | XTRACT*, A+1*, A1+7 |
| A("SVCS" | A1+3*, A1+4*, A1+6, A1+7 |
| ABPV | ZTLEND! |
| ABPV("BEG" | XTRACT |
| ABPV("END" | A+1 |
| ABPV("GLOB" | START, INIT+1*, A, A1, A1+2 |
| ABPV("HITS" | INIT*, A1+6* |
| ABPV("IND" | A*, A+1, A1*, A1+1, A1+2*, A1+3 |
| ABPV("IO" | ZTLOAD |
| ABPV("SITE" | A1+7 |
| ABPV("TASK" | INIT*, A1+7 |
| ABPV("TOTAL" | INIT*, A1+4* |
| DA | ZTLEND! |
| DIC | ZTLEND! |
| DIE | ZTLEND! |
| DR | ZTLEND+1! |
| I | ZTLEND+1! |
| R | ZTLEND+1! |
| X | A1+3*, ZTLEND! |
| Y | ZTLEND! |
| ZRTN | ZTLEND! |
| ZTDESC | ZTLOAD+1*, ZTLEND! |
| ZTDTH | ZTLOAD*, ZTLEND! |
| ZTIO | ZTLOAD*, ZTLEND+1! |
| >> ZTRTN | ZTLOAD* |
| ZTSAVE | ZTLEND! |
| ZTSAVE("ABPV(" | ZTLOAD* |
| ZTSK | START+1, INIT, ZTLEND! |