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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AQAOCHK4

Package: Quality Assurance

Routine: AQAOCHK4


Information

AQAOCHK4 ; IHS/ORDC/LJF - PRINT TICKLER REPORT ;

Source Information

Source file <AQAOCHK4.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Quality Assurance 3 $$OVERDUE^AQAOCHK0  (HEADING,INIT,KILL,NEWPG)^AQAOUTIL  PRTOPT^AQAOVAR  
Kernel 1 ^%ZISC  
VA Fileman 1 Y^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Quality Assurance 1 AQAOCHK2  

Entry Points

Name Comments DBIA/ICR reference
MAP ; -- SUBRTN to print out map to find options
ALLREF ; >> SUBRTN to print all referrals for qi staff user
END ;ENTRY POINT called by AQAOCHK1
HDG1 ; >> SUBRTN to print 2nd half of heading
PRINTA ; >> SUBRTN to print action plan items
MSG ;;
OCCPRNT ; -- SUBRTN to print out cases
PRINT ;ENTRY POINT >>> print selected range of items
LOOP ; -- SUBRTN to loop thru ^TMP to find cases to display

External References

Name Field # of Occurrence
^%ZISC END+2
$$OVERDUE^AQAOCHK0 OCCPRNT+3, ALLREF+10
HEADING^AQAOUTIL PRINT+4
INIT^AQAOUTIL PRINT+2
KILL^AQAOUTIL END+2
NEWPG^AQAOUTIL PRINT+7, OCCPRNT+1, MAP+1, ALLREF+8, PRINTA+1
PRTOPT^AQAOVAR PRINT+12
Y^DIQ OCCPRNT+19, OCCPRNT+21, ALLREF+15, ALLREF+17, PRINTA+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"#",$P(^AQAOC(+AQAOIFN,0),U)
  • Line Location: OCCPRNT+2
Function Call: WRITE
  • Prompt: $$OVERDUE^AQAOCHK0
  • Line Location: OCCPRNT+3
Function Call: WRITE
  • Prompt: ?10,Y
  • Line Location: OCCPRNT+4
Function Call: WRITE
  • Prompt: ?32,$P(^AQAO(2,AQAOIND,0),U)
  • Line Location: OCCPRNT+7
Function Call: WRITE
  • Prompt: ?60
  • Line Location: OCCPRNT+10
Function Call: WRITE
  • Prompt: $P($G(^SC(X,0)),U,2),"/"
  • Line Location: OCCPRNT+11
Function Call: WRITE
  • Prompt: $P($G(^DIC(49,X,0)),U,2)
  • Line Location: OCCPRNT+12
Function Call: WRITE
  • Prompt: ?43,"Referred by: ",$E(Y,1,23)
  • Line Location: OCCPRNT+20
Function Call: WRITE
  • Prompt: !?43,"Referred to: ",$E(Y,1,23)
  • Line Location: OCCPRNT+22
Function Call: WRITE
  • Prompt: !!,">>To find Occurrence Data Entry options, follow this path:"
  • Line Location: MAP+2
Function Call: WRITE
  • Prompt: !?5,"D for Data Collection Menu;"
  • Line Location: MAP+3
Function Call: WRITE
  • Prompt: !?10,"ODE for Occurrence Data Entry Menu;"
  • Line Location: MAP+4
Function Call: WRITE
  • Prompt: !?15,"And then POW for Print Occurrence Worksheets;"
  • Line Location: MAP+5
Function Call: WRITE
  • Prompt: !?21,"Or OCC for Enter/Edit Occurrence Record;"
  • Line Location: MAP+6
Function Call: WRITE
  • Prompt: !?21,"Or PRW for Print Review Worksheets;"
  • Line Location: MAP+7
Function Call: WRITE
  • Prompt: !?21,"Or REV for Enter/Edit Occurrence Review."
  • Line Location: MAP+8
Function Call: WRITE
  • Prompt: !,"#",$P(^AQAOC(+AQAOIFN,0),U)
  • Line Location: ALLREF+9
Function Call: WRITE
  • Prompt: $$OVERDUE^AQAOCHK0
  • Line Location: ALLREF+10
Function Call: WRITE
  • Prompt: ?10,Y
  • Line Location: ALLREF+11
Function Call: WRITE
  • Prompt: ?32,$P(^AQAO(2,AQAOIND,0),U)
  • Line Location: ALLREF+14
Function Call: WRITE
  • Prompt: ?43,"Referred by: ",$E(Y,1,23)
  • Line Location: ALLREF+16
Function Call: WRITE
  • Prompt: !?43,"Referred to: ",$E(Y,1,23)
  • Line Location: ALLREF+18
Function Call: WRITE
  • Prompt: !,"#",$P(^AQAO(5,+AQAOIFN,0),U)
  • Line Location: PRINTA+2
Function Call: WRITE
  • Prompt: ?12,"Indicator: ",$P(^AQAO(2,AQAOIND,0),U)
  • Line Location: PRINTA+3
Function Call: WRITE
  • Prompt: ?32,$E(Y,1,25)
  • Line Location: PRINTA+5
Function Call: WRITE
  • Prompt: ?22,"(Occurrences & Action Plans Pending)"
  • Line Location: HDG1+1
Function Call: WRITE
  • Prompt: !?20,"[""*"" after Case ID means overdue for review]",!,AQAOLINE
  • Line Location: HDG1+2
Function Call: WRITE
  • Prompt: !,"Case ID",?10,"Occ/Rev Dt",?23,"Chart #",?32,"Indicator"
  • Line Location: HDG1+3
Function Call: WRITE
  • Prompt: ?43,"Comments",!,AQAOLIN2,!
  • Line Location: HDG1+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AQAO(2 - [#9002168.2] OCCPRNT+7, ALLREF+14, PRINTA+3
^AQAO(5 - [#9002168.5] PRINTA+2, PRINTA+6
^AQAO(6 - [#9002168.6] OCCPRNT+16, PRINTA+7
^AQAO(7 - [#9002168.7] OCCPRNT+15
^AQAOC - [#9002167] OCCPRNT+2, OCCPRNT+5, OCCPRNT+10, OCCPRNT+11, OCCPRNT+12, ALLREF+9, ALLREF+12
^AUPNPAT - [#9000001] OCCPRNT+6, ALLREF+13
^DD("DD" OCCPRNT+4, ALLREF+11
^DD(9002167 OCCPRNT+19, OCCPRNT+21, ALLREF+15, ALLREF+17
^DD(9002168.5 PRINTA+4
^DIC(49 - [#49] OCCPRNT+12
^SC - [#44] OCCPRNT+11
^TMP("AQAOCHK" LOOP+3, LOOP+5, LOOP+7, LOOP+9, END+1!, ALLREF+3, ALLREF+5, ALLREF+6

Label References

Name Line Occurrences
ALLREF LOOP+8
END PRINT+13
HDG1 PRINT+4, PRINT+7, OCCPRNT+1, MAP+1, ALLREF+8, PRINTA+1
LOOP PRINT+9
MAP PRINT+11
OCCPRNT LOOP+12
PRINTA LOOP+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AQAOALL END+1!, ALLREF+7
AQAODT LOOP+1~, LOOP+4*, LOOP+5*, LOOP+7, LOOP+9, OCCPRNT+4, ALLREF+3, ALLREF+5, ALLREF+6, ALLREF+11
, PRINTA+4
>> AQAOHCON PRINT+3*
>> AQAOI PRINT+6*
AQAOIFN LOOP+1~, LOOP+6*, LOOP+7*, LOOP+9, OCCPRNT+2, OCCPRNT+5, OCCPRNT+10, OCCPRNT+11, OCCPRNT+12, ALLREF+3
, ALLREF+5, ALLREF+6, ALLREF+9, ALLREF+12, PRINTA+2, PRINTA+6
AQAOIND LOOP+1~, LOOP+2*, LOOP+3*, LOOP+5, LOOP+7, LOOP+9, OCCPRNT+7, ALLREF+3, ALLREF+5, ALLREF+6
, ALLREF+14, PRINTA+3
>> AQAOLIN2 HDG1+4
>> AQAOLINE HDG1+2
AQAON1 ALLREF+1~, ALLREF+2*, ALLREF+3*, ALLREF+5, ALLREF+6
AQAON2 ALLREF+1~, ALLREF+4*, ALLREF+5*, ALLREF+6
AQAOR1 END+1!
AQAOR2 END+1!
>> AQAOSTOP PRINT+6, PRINT+7, LOOP+3, LOOP+5, LOOP+7, OCCPRNT+1, ALLREF+3, ALLREF+5, ALLREF+8, PRINTA+1
>> AQAOSTR LOOP+9*, LOOP+11, OCCPRNT+15, OCCPRNT+16, OCCPRNT+19, OCCPRNT+21, ALLREF+6*, ALLREF+7, ALLREF+15, ALLREF+17
>> AQAOTY PRINT+3*
>> AQAOX PRINT+6*, LOOP+3, LOOP+5, LOOP+7, LOOP+8, LOOP+9, LOOP+10, OCCPRNT+3, OCCPRNT+9, OCCPRNT+14
, ALLREF+3, ALLREF+5, ALLREF+6, ALLREF+7, ALLREF+10
AQAOXYZ PRINT+11, LOOP+8, END+1!
AQAOXYZ(4 PRINT+6
>> C OCCPRNT+19*, OCCPRNT+21*, ALLREF+15*, ALLREF+17*, PRINTA+4*
DUZ ALLREF+7
DUZ(2 OCCPRNT+6, ALLREF+13
IOSL PRINT+7, OCCPRNT+1, MAP+1, ALLREF+8, PRINTA+1
IOST PRINT+12
U PRINT+6, PRINT+7, LOOP+3, LOOP+5, LOOP+7, OCCPRNT+1, OCCPRNT+2, OCCPRNT+5, OCCPRNT+6, OCCPRNT+7
, OCCPRNT+10, OCCPRNT+11, OCCPRNT+12, OCCPRNT+15, OCCPRNT+16, OCCPRNT+19, OCCPRNT+21, ALLREF+3, ALLREF+5, ALLREF+7
, ALLREF+8, ALLREF+9, ALLREF+12, ALLREF+13, ALLREF+14, ALLREF+15, ALLREF+17, PRINTA+1, PRINTA+2, PRINTA+3
, PRINTA+4, PRINTA+6, PRINTA+7
>> X OCCPRNT+5*, OCCPRNT+6, OCCPRNT+11*, OCCPRNT+12*, OCCPRNT+16*, ALLREF+12*, ALLREF+13, PRINTA+6*, PRINTA+7
>> Y OCCPRNT+4*, OCCPRNT+19*, OCCPRNT+20, OCCPRNT+21*, OCCPRNT+22, ALLREF+11*, ALLREF+15*, ALLREF+16, ALLREF+17*, ALLREF+18
, PRINTA+4*, PRINTA+5
>> ZTQUEUED PRINT+12

Marked Items

Name Field # of Occurrence
$T(MSG+AQAOX PRINT+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All