AQAOPR2 ; IHS/ORDC/LJF - PRINT REVIEW WORKSHEETS ;
Source file <AQAOPR2.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 3 | ^%ZIS ^%ZISC ^%ZTLOAD |
Quality Assurance | 2 | ^AQAOPR21 KILL^AQAOUTIL |
VA Fileman | 2 | ^DIC ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
END | ||
LEVEL | ; >>> ask for review level for occurrences
|
|
DEV | ; >>> get print device
|
|
SUMM | ; >>> print summaries also?
|
|
ASK | ; >>> ask for occ id or patient name or indicator
|
|
WRKS | ; >>> print occ worksheets also?
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^AQAOC - [#9002167] | Classic Fileman Calls |
Name | Line Occurrences |
---|---|
END | LEVEL+3, SUMM+4, WRKS+4, DEV+1 |
LEVEL | ASK+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | DEV+1* |
AQAOARR | ASK+2!, ASK+8 |
AQAOARR( | ASK+7* |
>> AQAODEV | DEV+1* |
>> AQAORLEV | LEVEL+3* |
>> AQAORVW | ASK+1* |
>> AQAOSLV | DEV+2* |
>> AQAOSUM | SUMM+4* |
>> AQAOWKS | WRKS+4* |
DIC | ASK+3!* |
DIC("A" | ASK+4* |
DIC("S" | ASK+5* |
DIC(0 | ASK+3* |
DIR | LEVEL+1!, SUMM+1!, WRKS+1! |
DIR("?" | SUMM+2*, WRKS+2* |
DIR("A" | LEVEL+2*, SUMM+3*, WRKS+3* |
DIR("B" | SUMM+1*, WRKS+1* |
DIR(0 | LEVEL+1*, SUMM+1*, WRKS+1* |
>> DIRUT | LEVEL+3, SUMM+4, WRKS+4 |
>> I | DEV+4* |
IO("Q" | DEV+2, DEV+3! |
IO("S" | DEV+2 |
ION | DEV+1 |
>> POP | DEV+1 |
U | ASK+2, ASK+7 |
>> X | ASK+2*, ASK+6 |
>> Y | LEVEL+3, ASK+2*, ASK+6, ASK+7, SUMM+4, WRKS+4 |
>> ZTDESC | DEV+3* |
>> ZTRTN | DEV+3* |
>> ZTSAVE( | DEV+4* |
ZTSK | DEV+5! |