AQAOPC4 ; IHS/ORDC/LJF - OCC BY IND WITH FINDING/ACTIONS ;
Source file <AQAOPC4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DATES | ; >> ask user to choose date range
|
|
END | ; >>> eoj
|
|
TYPE | ; >>> ask user what type of report to print
|
|
DEV | ; >>> get print device
|
|
IND | ; >>> occurrences for which indicator?
|
|
OPEN | ; >>> ask user if wants to include open cases
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences |
---|---|
DATES | DATES+2, OPEN+7 |
END | TYPE+7, IND+1, DATES+1, DATES+2, OPEN+7, DEV+2 |
IND | DATES+1 |
OPEN | DEV+1 |
TYPE | IND+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | DEV+2* |
>> AQAOBD | DATES+1* |
>> AQAODLM | DEV+6 |
>> AQAOED | DATES+2* |
>> AQAOIND | IND+1*, IND+2* |
>> AQAOSTAT | OPEN+7* |
>> AQAOTYPE | TYPE+7* |
>> AQAOUA("USER" | DEV+1 |
>> AQAOXS | DEV+8 |
>> AQAOXSN | DEV+7 |
DIR | TYPE+1!, OPEN+1! |
DIR("?" | TYPE+3*, TYPE+4*, TYPE+5*, TYPE+6*, OPEN+3*, OPEN+4*, OPEN+5*, OPEN+6* |
DIR("A" | TYPE+2*, OPEN+2* |
DIR(0 | TYPE+1*, OPEN+1* |
>> DIRUT | TYPE+7, OPEN+7 |
>> I | DEV+5* |
IO | DEV+3 |
IO("Q" | DEV+3, DEV+4! |
>> POP | DEV+2 |
U | IND+1, DATES+1, DATES+2, DEV+1 |
>> X | OPEN+7 |
>> Y | TYPE+7, OPEN+7, DEV+1 |
>> ZTDESC | DEV+4* |
>> ZTRTN | DEV+4* |
>> ZTSAVE( | DEV+5* |
>> ZTSAVE("AQAODLM" | DEV+6* |
>> ZTSAVE("AQAOXS(" | DEV+8* |
>> ZTSAVE("AQAOXSM" | DEV+7* |
>> ZTSAVE("AQAOXSN" | DEV+7* |
ZTSK | DEV+9! |