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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AQAOPOS1

Package: Quality Assurance

Routine: AQAOPOS1


Information

AQAOPOS1 ; IHS/ORDC/LJF - POST INIT ;

Source Information

Source file <AQAOPOS1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 ^DIC  FILE^DICN  ^DIE  ^DIR  
Quality Assurance 1 ^AQAOPOS2  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Quality Assurance 1 AQAOPOST  

Entry Points

Name Comments DBIA/ICR reference
INACT() ;EXTR VAR to ask if updating ind is allowed
DRSET() ;EXTR VAR to set dr string
DATA2A ;; data for step 2 drset extr var second loop
NEXT ; go to next rtn for more
CODE() ; EXTR VAR to add crit codes to file
2 ; step 2 - install indicators sent with pkg
UPD() ;EXTR VAR to ask if user wants indicator updated
CRIT ; SUBRTN to install criteria for ind
DATA2 ;; data for step 2 drset extr var

External References

Name Field # of Occurrence
^AQAOPOS2 NEXT+1
^DIC CRIT+23
FILE^DICN 2+23, CRIT+12, CRIT+30, CODE+7
^DIE 2+18
^DIR INACT+9, UPD+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"STEP 2 - INSTALL INDICATORS DISTRIBUTED WITH PACKAGE",!!
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: !,"I will install any indicator you do not already have PLUS"
  • Line Location: 2+2
Function Call: WRITE
  • Prompt: !,"those you do have but which are inactive.",!!
  • Line Location: 2+3
Function Call: WRITE
  • Prompt: !!,"INDICATOR FILE LOCKED! BYPASSING STEP 2!",!!
  • Line Location: 2+10
Function Call: WRITE
  • Prompt: !!,"QI REVIEW CRITERIA file locked!"
  • Line Location: CRIT+1
Function Call: WRITE
  • Prompt: !!,"QI CRITERIA CODES file locked"
  • Line Location: CRIT+2
Function Call: WRITE
  • Prompt: !!,"Can't ADD ",$P(^AQAOXX(6,AQAOC,0),U)," as criterion."
  • Line Location: CRIT+13
Routine Call
  • DIE
  • Line Location:
    • 2+18
Routine Call
  • DIC
  • Line Location:
    • CRIT+23
Routine Call
  • DIR
  • Line Location:
    • INACT+9
    • UPD+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AQAO(2 - [#9002168.2] Classic Fileman Calls
^AQAO1(4 - [#9002169.4] Classic Fileman Calls
^AQAO1(6 - [#9002169.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AQAO(2 - [#9002168.2] 2+6, 2+9, 2+14, 2+15, 2+16, 2+27*, 2+28*, 2+32*, 2+33*, 2+39
, CRIT+30
^AQAO1(4 - [#9002169.4] CRIT+2, CRIT+31, CODE+2, CODE+3
^AQAO1(6 - [#9002169.6] CRIT+1, CRIT+9, CRIT+21, CRIT+26, CRIT+27, CRIT+28, CRIT+31
^AQAOXX(2 2+11, 2+12, 2+26, 2+27, 2+31, 2+32, DRSET+2, DRSET+6
^AQAOXX(4 CRIT+19
^AQAOXX(6 2+36, CRIT+5, CRIT+6, CRIT+13, CRIT+17, CRIT+18

Label References

Name Line Occurrences
$$CODE CRIT+20
$$DRSET 2+18, 2+22
$$INACT 2+6
$$UPD 2+17
CRIT 2+37
NEXT 2+6, 2+10

Naked Globals

Name Field # of Occurrence
^(0 CRIT+6, CRIT+18, CRIT+21*, CRIT+28*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AQAOC CRIT+4*, CRIT+5*, CRIT+6, CRIT+13, CRIT+17, CRIT+18
>> AQAOCD CRIT+16*, CRIT+17*, CRIT+18
>> AQAOCIFN CRIT+14*, CRIT+21, CRIT+22, CRIT+26*, CRIT+27, CRIT+28, CRIT+29
>> AQAOCNT 2+25*, 2+26*, 2+27, 2+28, 2+30*, 2+31*, 2+32, 2+33
>> AQAOCOD CRIT+18*, CRIT+19
>> AQAOCODN CRIT+20*, CRIT+23
>> AQAOID 2+12*, 2+14, 2+15, 2+22, UPD+3
>> AQAOIFN 2+25*, 2+27, 2+28, 2+32, 2+33, CRIT+27, CRIT+30
>> AQAONUPD 2+14, 2+16*, 2+17*
>> AQAOS CRIT+6*, CRIT+9, CRIT+10, CRIT+11, CRIT+26
>> AQAOSS CRIT+19*, CODE+2, CODE+3, CODE+6
>> AQAOUPD 2+6*, 2+17
>> AQAOX 2+9*, 2+11*, 2+12, 2+26, 2+27, 2+31, 2+32, 2+36, CRIT+5, DRSET+2
, DRSET+6
>> DA 2+15*, 2+16, 2+18
>> DA(1 CRIT+22*, CRIT+29*
DD 2+21!, CRIT+10!, CODE+1~, CODE+7!
DIC 2+21!*, CRIT+10!*, CRIT+22*, CRIT+29*, CODE+1~, CODE+5*
DIC("DR" 2+22*, CRIT+11*, CODE+6*
DIC(0 2+21*, CRIT+10*, CRIT+23*, CRIT+30*, CODE+5*
>> DIE 2+18*
DIR INACT+1~, UPD+1~
DIR("A" INACT+3*, INACT+4*, INACT+5*, INACT+6*, INACT+7*, INACT+8*, INACT+9*, UPD+3*, UPD+4*
DIR("B" UPD+2*
DIR(0 INACT+2*, UPD+2*
DLAYGO 2+21*, CRIT+12*!, CODE+1~, CODE+5*
DO 2+21!, CRIT+10!, CODE+1~, CODE+7!
>> DR 2+18*, DRSET+1*, DRSET+5*, DRSET+9*, DRSET+10*, DRSET+11
DT 2+28, 2+33
>> J DRSET+3*, DRSET+7*
U 2+6, 2+12, 2+14, 2+16, 2+17, 2+28, 2+33, CRIT+9, CRIT+10, CRIT+11
, CRIT+13, CRIT+20, CRIT+26, CRIT+30, CODE+2, CODE+3, CODE+6, CODE+7, UPD+5, DRSET+5
, DRSET+9
X 2+22*, CRIT+10*, CRIT+23*, CRIT+30*, CODE+1~, CODE+2*, CODE+3, CODE+6*, CODE+7*, CODE+8
, UPD+1~, UPD+5*, UPD+6, DRSET+1~, DRSET+2*, DRSET+5, DRSET+6*, DRSET+9
Y 2+18*, 2+23, 2+25, CRIT+13, CRIT+14, CODE+1~, CODE+2*, CODE+3*, CODE+4, CODE+7
, INACT+1~, INACT+10, UPD+1~, UPD+5, DRSET+1~, DRSET+3*, DRSET+5, DRSET+7*, DRSET+9
>> Z DRSET+4*, DRSET+5, DRSET+8*, DRSET+9

Marked Items

Name Field # of Occurrence
$T(DATA2+J DRSET+3, DRSET+4
$T(DATA2A+J DRSET+7, DRSET+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All