Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AQAOPC1

Package: Quality Assurance

Routine: AQAOPC1


Information

AQAOPC1 ; IHS/ORDC/LJF - OCC BY INDICATOR W/ CRITERIA ;

Source Information

Source file <AQAOPC1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Quality Assurance 4 CRIT^AQAOHOP2  ($$BDATE,$$EDATE,$$IND)^AQAOLKP  ^AQAOPC11  (EXPORT,KILL)^AQAOUTIL  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
DATES ; >> ask user to choose date range
END ; >>> eoj
DEV ; >>> get print device
CRIT ; >>> check criteria defined for this indicator
IND ; >>> occurrences for which indicator?
TYPE ; >>> ask user what type of report to print

External References

Name Field # of Occurrence
^%ZIS DEV+4
HOME^%ZIS END+1
^%ZISC DEV+12
^%ZTLOAD DEV+12
CRIT^AQAOHOP2 AQAOPC1+6
$$BDATE^AQAOLKP DATES+1
$$EDATE^AQAOLKP DATES+2
$$IND^AQAOLKP IND+1
^AQAOPC11 DEV+5
EXPORT^AQAOUTIL DEV+1
KILL^AQAOUTIL END+1
^DIR TYPE+7, CRIT+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are ",AQAOCNT," criteria defined for this indicator. Only"
  • Line Location: CRIT+13
Function Call: WRITE
  • Prompt: !,"14 can fit on the report. Please choose up to 14 from the list."
  • Line Location: CRIT+14
Function Call: WRITE
  • Prompt: !!
  • Line Location: CRIT+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: *7,"REMEMBER to use CONDENSED PRINT or WIDE PAPER!",!!
  • Line Location: DEV+3
Routine Call
  • %ZIS
  • Line Location:
    • END+1
Routine Call
  • DIR
  • Line Location:
    • TYPE+7
    • CRIT+18
Routine Call
  • %ZIS
  • Line Location:
    • DEV+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AQAO1(6 - [#9002169.6] CRIT+1, CRIT+4, CRIT+5

Label References

Name Line Occurrences
CRIT CRIT+19
DATES DATES+2, DEV+1
END TYPE+7, IND+1, CRIT+19, DEV+4
IND DATES+1
TYPE IND+1, CRIT+1

Naked Globals

Name Field # of Occurrence
^(0 CRIT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV+4*
AQAOAR CRIT+23!
AQAOAR( CRIT+17*, CRIT+22
>> AQAOBD DATES+1*
>> AQAOCNT CRIT+3*, CRIT+6*, CRIT+7, CRIT+13, CRIT+15
AQAOCR CRIT+3!
AQAOCR( CRIT+5*, CRIT+16, CRIT+17, CRIT+22!
>> AQAODLM DEV+8
>> AQAOED DATES+2*
>> AQAOIND IND+1*, IND+2*, CRIT+1, CRIT+4
AQAOIOMX CRIT+3!, CRIT+8*, DEV+3, DEV+9
>> AQAOTYP TYPE+7*, CRIT+7
>> AQAOUA("USER" DEV+1
>> AQAOXS DEV+11
>> AQAOXSN DEV+10
DIR TYPE+1!, CRIT+15!
DIR("?" TYPE+3*, TYPE+4*, TYPE+5*, TYPE+6*
DIR("A" TYPE+2*, CRIT+17*, CRIT+18*
DIR(0 TYPE+1*, CRIT+15*
>> DIRUT TYPE+7, CRIT+19
>> I CRIT+21*, DEV+7*
IO DEV+5
IO("Q" DEV+5, DEV+6!
>> POP DEV+4
U IND+1, CRIT+5, DATES+1, DATES+2, DEV+1
>> X CRIT+3*, CRIT+4*, CRIT+5, CRIT+15*, CRIT+16*, CRIT+17, CRIT+21*, CRIT+22*
Y TYPE+7, CRIT+15*, CRIT+17*, CRIT+19, CRIT+21, CRIT+23!, DEV+1
Y( CRIT+21*, CRIT+22
>> ZTDESC DEV+6*
>> ZTRTN DEV+6*
>> ZTSAVE( DEV+7*
>> ZTSAVE("AQAODLM" DEV+8*
>> ZTSAVE("AQAOIOMX" DEV+9*
>> ZTSAVE("AQAOXS(" DEV+11*
>> ZTSAVE("AQAOXSM" DEV+10*
>> ZTSAVE("AQAOXSN" DEV+10*
ZTSK DEV+12!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All