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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AQAOT941

Package: Quality Assurance

Routine: AQAOT941


Information

AQAOT941 ; GENERATED FROM 'AQAO LONG DISPLAY-E1' PRINT TEMPLATE (#1273) ; 05/13/96 ; (continued)

Source Information

Source file <AQAOT941.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 5 $$OUT^DIALOGU  CSTP^DIO2  Y^DIQ  ^DIWP  (,0,A,NX)^DIWW  
Quality Assurance 1 ^AQAOT942  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Quality Assurance 1 AQAOT94  

Entry Points

Name Comments DBIA/ICR reference
A2R ;
BEGIN ;
I1 ;
H1R ;
H1 ;
M
J1 ;
N
A2 ;
T
B2 ;
DT
I1R ;
J1R ;
B2R ;

External References

Name Field # of Occurrence
^AQAOT942 J1R+8
$$OUT^DIALOGU DT
CSTP^DIO2 T+1
Y^DIQ BEGIN+2, J1+4
^DIWP I1+1, B2+1
^DIWW I1R+2
0^DIWW I1R+1
A^DIWW B2R+1
NX^DIWW I1R+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: N+0
Function Call: WRITE
  • Prompt: $$OUT^DIALOGU(Y,"DD")
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: $P("JAN^FEB^MAR^APR^MAY^JUN^JUL^AUG^SEP^OCT^NOV^DEC",U,$E(Y,4,5))_" "
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: $J(Y#100\1,2)_","
  • Condition for execution: Y#100
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: Y\10000+1700
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: " "_$E(Y_0,9,10)_":"_$E(Y_"000",11,12)
  • Condition for execution: Y#1
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: Y
  • Line Location: DT+2
Function Call: WRITE
  • Prompt: $E(Y,1,22)
  • Line Location: BEGIN+2
Function Call: WRITE
  • Prompt: ?50
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: "Rev Date: "
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: ?0
  • Line Location: BEGIN+5
Function Call: WRITE
  • Prompt: "Adv Outcome Risk: "
  • Line Location: BEGIN+5
Function Call: WRITE
  • Prompt: $E(Y,1,30)
  • Line Location: BEGIN+6
Function Call: WRITE
  • Prompt: ?47
  • Line Location: BEGIN+7
Function Call: WRITE
  • Prompt: "Occ Outcome: "
  • Line Location: BEGIN+7
Function Call: WRITE
  • Prompt: $E(Y,1,30)
  • Line Location: BEGIN+8
Function Call: WRITE
  • Prompt: ?9
  • Line Location: BEGIN+9
Function Call: WRITE
  • Prompt: "Finding: "
  • Line Location: BEGIN+9
Function Call: WRITE
  • Prompt: X
  • Line Location: BEGIN+10
Function Call: WRITE
  • Prompt: ?41
  • Line Location: BEGIN+11
Function Call: WRITE
  • Prompt: X
  • Line Location: BEGIN+11
Function Call: WRITE
  • Prompt: $E(Y,1,50)
  • Line Location: BEGIN+12
Function Call: WRITE
  • Prompt: ?52
  • Line Location: BEGIN+13
Function Call: WRITE
  • Prompt: "Action: "
  • Line Location: BEGIN+13
Function Call: WRITE
  • Prompt: X
  • Line Location: BEGIN+14
Function Call: WRITE
  • Prompt: $E(X,1,10)
  • Line Location: BEGIN+15
Function Call: WRITE
  • Prompt: ?66
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: $E(X,1,10)
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: ?1
  • Line Location: H1R+1
Function Call: WRITE
  • Prompt: "Review Comments: "
  • Line Location: H1R+1
Function Call: WRITE
  • Prompt: ?4
  • Line Location: J1+1
Function Call: WRITE
  • Prompt: "Review Level: "
  • Line Location: J1+1
Function Call: WRITE
  • Prompt: $E(Y,1,4)
  • Line Location: J1+2
Function Call: WRITE
  • Prompt: ?23
  • Line Location: J1+3
Function Call: WRITE
  • Prompt: "by "
  • Line Location: J1+3
Function Call: WRITE
  • Prompt: $E(Y,1,22)
  • Line Location: J1+4
Function Call: WRITE
  • Prompt: ?50
  • Line Location: J1+5
Function Call: WRITE
  • Prompt: "Rev Date: "
  • Line Location: J1+5
Function Call: WRITE
  • Prompt: ?0
  • Line Location: J1+7
Function Call: WRITE
  • Prompt: "Adv Outcome Risk: "
  • Line Location: J1+7
Function Call: WRITE
  • Prompt: $E(Y,1,30)
  • Line Location: J1+8
Function Call: WRITE
  • Prompt: ?47
  • Line Location: J1+9
Function Call: WRITE
  • Prompt: "Occ Outcome: "
  • Line Location: J1+9
Function Call: WRITE
  • Prompt: $E(Y,1,30)
  • Line Location: J1+10
Function Call: WRITE
  • Prompt: ?9
  • Line Location: J1+11
Function Call: WRITE
  • Prompt: "Finding: "
  • Line Location: J1+11
Function Call: WRITE
  • Prompt: X
  • Line Location: J1+12
Function Call: WRITE
  • Prompt: ?52
  • Line Location: J1+13
Function Call: WRITE
  • Prompt: "Action: "
  • Line Location: J1+13
Function Call: WRITE
  • Prompt: X
  • Line Location: J1+14
Function Call: WRITE
  • Prompt: $E(X,1,10)
  • Line Location: J1+15
Function Call: WRITE
  • Prompt: ?66
  • Line Location: A2+1
Function Call: WRITE
  • Prompt: $E(X,1,10)
  • Line Location: A2+1
Function Call: WRITE
  • Prompt: ?1
  • Line Location: A2R+1
Function Call: WRITE
  • Prompt: "Review Comments: "
  • Line Location: A2R+1
Function Call: WRITE
  • Prompt: ?5
  • Line Location: J1R+1
Function Call: WRITE
  • Prompt: "Date Case Closed: "
  • Line Location: J1R+1
Function Call: WRITE
  • Prompt: ?44
  • Line Location: J1R+3
Function Call: WRITE
  • Prompt: "Final Review Level: "
  • Line Location: J1R+3
Function Call: WRITE
  • Prompt: $E(Y,1,4)
  • Line Location: J1R+4
Function Call: WRITE
  • Prompt: ?0
  • Line Location: J1R+5
Function Call: WRITE
  • Prompt: "Final Risk Assessment: "
  • Line Location: J1R+5
Function Call: WRITE
  • Prompt: $E(Y,1,30)
  • Line Location: J1R+6
Function Call: WRITE
  • Prompt: ?45
  • Line Location: J1R+7
Function Call: WRITE
  • Prompt: "Final Occ Outcome: "
  • Line Location: J1R+7
Routine Call
  • DIALOGU
  • Line Location:
    • DT

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AQAO(6 - [#9002168.6] J1+14
^AQAO(7 - [#9002168.7] J1+2, J1R+4
^AQAO(8 - [#9002168.8] J1+12
^AQAO1(2 - [#9002169.2] BEGIN+12
^AQAO1(3 - [#9002169.3] BEGIN+6, BEGIN+8, J1+8, J1+10, J1R+6
^AQAOC - [#9002167] BEGIN+8, BEGIN+12, BEGIN+16, H1R+2, I1+1, I1R+3, J1+2, J1+10, J1+16, A2R+2
, B2+1, J1R+2
^DD(9002167 BEGIN+2
^DD(9002167.01 J1+4
^UTILITY($J T

Label References

Name Line Occurrences
@( M
A2 J1+16
A2R J1+17
B2 A2R+2
B2R A2R+3
BEGIN AQAOT941+1
DT BEGIN+4, J1+6, J1R+2
H1 BEGIN+16
H1R BEGIN+17
I1 H1R+2
I1R H1R+3
J1 I1R+3
J1R I1R+4
N BEGIN+3, BEGIN+5, BEGIN+7, BEGIN+9, BEGIN+11, BEGIN+13, H1+1, H1R+1, J1+1, J1+3
, J1+5, J1+7, J1+9, J1+11, J1+13, A2+1, A2R+1, J1R+1, J1R+3, J1R+5
, J1R+7
T BEGIN+16, H1R+2, J1+1, J1+16, A2R+2, J1R+1

Naked Globals

Name Field # of Occurrence
^( BEGIN+16, H1R+2, I1R+3, J1+16, A2R+2
^(0 BEGIN+6, BEGIN+8, BEGIN+12, J1+2, J1+8, J1+10, J1+12, J1+14, J1R+4, J1R+6
^(1 T

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C BEGIN+2*, J1+4*
>> D0 BEGIN+8, BEGIN+10*, BEGIN+12, BEGIN+14*, BEGIN+16, H1R+2, I1+1, I1R+3, J1+2, J1+10
, J1+12*, J1+14*, J1+16, A2R+2, B2+1, J1R+2
>> D1 BEGIN+16*, H1R+2*, I1+1, I1R+3*, J1+2, J1+10, J1+12*, J1+14*, J1+16, A2R+2
, B2+1
>> D2 J1+16*, A2R+2*, B2+1
>> DILCT T+1*, BEGIN+1*
>> DIOT(2 T
DIP BEGIN+10!, BEGIN+11!, BEGIN+14!, BEGIN+15!, H1+1!, I1R+1!, J1+12!, J1+14!, J1+15!, A2+1!
DIP(101 BEGIN+10, BEGIN+14, J1+12*, J1+14*
DIP(2 BEGIN+11, BEGIN+15, H1+1*, J1+15, A2+1*
DIP(3 BEGIN+11*, BEGIN+15, J1+15
DIP(4 BEGIN+11*, BEGIN+15, J1+15
DIP(5 BEGIN+15, J1+15
DIP(6 BEGIN+15*, J1+15*
>> DISTP T+1*, BEGIN+1*
>> DIWF T
>> DIWL I1+1*, B2+1*
>> DIWR I1+1*, B2+1*
>> DIXX M
>> DN T, BEGIN+1*, BEGIN+3, BEGIN+5, BEGIN+7, BEGIN+9, BEGIN+10, BEGIN+11, BEGIN+13, BEGIN+14
, BEGIN+15, BEGIN+16, H1+1, H1R+1, H1R+2, I1R+1, J1+1, J1+3, J1+5, J1+7
, J1+9, J1+11, J1+12, J1+13, J1+14, J1+15, J1+16, A2+1, A2R+1, A2R+2
, J1R+1, J1R+3, J1R+5, J1R+7
>> DSC( BEGIN+16, I1R+3, J1+16
DUZ("LANG" DT
>> DXS(16 BEGIN+10
>> DXS(17 BEGIN+11
>> DXS(18 BEGIN+14
>> DXS(19 BEGIN+15
>> DXS(20 H1+1
>> DXS(21 J1+12
>> DXS(22 J1+14
>> DXS(23 J1+15
>> DXS(24 A2+1
>> I(0 BEGIN+10, BEGIN+14, J1+12, J1+14
>> I(1 BEGIN+16*, H1R+2*, I1R+3*, J1+12, J1+14
>> I(2 J1+16*, A2R+2*
IOSL T
>> J(1 BEGIN+16*, H1R+2*, I1R+3*
>> J(2 J1+16*, A2R+2*
U DT+1, BEGIN+2, BEGIN+4, BEGIN+6, BEGIN+8, BEGIN+10, BEGIN+12, BEGIN+14, J1+2, J1+4
, J1+6, J1+8, J1+10, J1+12, J1+14, J1R+2, J1R+4, J1R+6
>> X BEGIN+2, BEGIN+4, BEGIN+6, BEGIN+8*, BEGIN+10*, BEGIN+11*, BEGIN+12*, BEGIN+14*, BEGIN+15*, H1+1*
, I1+1*, J1+2*, J1+4, J1+6, J1+8, J1+10*, J1+12*, J1+14*, J1+15*, A2+1*
, B2+1*, J1R+2*, J1R+4, J1R+6
Y DT, DT+1, DT+2, BEGIN+2*, BEGIN+4*, BEGIN+6*, BEGIN+8*, BEGIN+10!, BEGIN+11!, BEGIN+12*
, BEGIN+14!, BEGIN+15*!, H1+1!, I1R+1!, J1+2*, J1+4*, J1+6*, J1+8*, J1+10*, J1+12!
, J1+14!, J1+15*!, A2+1!, J1R+2*, J1R+4*, J1R+6*
Y(0 BEGIN+6*, BEGIN+8*, J1+8*, J1+10*, J1R+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All