AQAOPR9 ; IHS/ORDC/LJF - OCC AUDIT LISTINGS ;
Source file <AQAOPR9.m>
Package | Total | Call Graph |
---|---|---|
Quality Assurance | 3 | ($$BDATE,$$EDATE)^AQAOLKP KILL^AQAOUTIL PRTOPT^AQAOVAR |
VA Fileman | 3 | ^DIC EN1^DIP ^DIR |
Kernel | 1 | ^%ZISC |
Name | Comments | DBIA/ICR reference |
---|---|---|
DATES | ; >> choose date ranges
|
|
END | ||
RPT | ;;
|
|
; >>> set up variables for dip call
|
||
CHOOSE | ; >>> choose which entry
|
|
REPORT | ; >>> choose type of report to print
|
FileNo | Call Tags |
---|---|
^AQAGU - [#9002166.3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^VA(200 - [#200] | CHOOSE+3 |
Name | Line Occurrences |
---|---|
CHOOSE | CHOOSE+2 |
DATES | REPORT+7, DATES+2 |
END | REPORT+6 |
CHOOSE+3 | |
REPORT | CHOOSE+2, DATES+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AQAOBD | REPORT+2!, DATES+1*, PRINT+3 |
AQAOED | REPORT+2!, DATES+2*, PRINT+3 |
>> AQAOINAC | REPORT+1* |
>> AQAORPT | REPORT+7*, CHOOSE+3 |
>> AQAOSRT | REPORT+2*, CHOOSE+3*, PRINT+2 |
>> BY | PRINT+2* |
DIC | CHOOSE+1!*, PRINT+1!* |
DIC(0 | CHOOSE+1* |
DIR | REPORT+3! |
DIR("A" | REPORT+3* |
DIR(0 | REPORT+3*, REPORT+4*, REPORT+5* |
>> DIRUT | REPORT+6 |
>> DTOUT | CHOOSE+2 |
>> DUOUT | CHOOSE+2 |
>> FLDS | PRINT+1* |
>> FR | PRINT+2*, PRINT+3* |
>> L | PRINT+1* |
>> TO | PRINT+2*, PRINT+3* |
U | CHOOSE+3 |
>> X | REPORT+4*, REPORT+6 |
>> Y | REPORT+6, REPORT+7, CHOOSE+2, CHOOSE+3 |
Name | Field # of Occurrence |
---|---|
$T(RPT+AQAORPT | CHOOSE+1, PRINT+2 |
$T(RPT+X | REPORT+4 |