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  | All
Print Page as PDF
Routine: QANQTOT

Package: Incident Reporting

Routine: QANQTOT


Information

QANQTOT ;GJC/HISC-QUARTERLY REPORT OF INVESTIGATIONS (REGIONAL) ;9/3/93 12:17

Source Information

Source file <QANQTOT.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^%DT  WAIT^DICD  ^DIK  ^DIR  
Incident Reporting 2 ^QANQSDT  ^QANQTTL  
Kernel 1 KILL^XUSCLEAN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Incident Reporting 2 QAN INCIDENT SUMMARY SITE  QANSUMM  

Entry Points

Name Comments DBIA/ICR reference
EXIT ;Kill and quit
CHECK ;Check for existing quarterly data.
PATFND ;Find the proper patient's ien for the associated incident.
QUART ;Choose the quarter and the year.
ENTERQ ;Enter the Quarter in question.
TAB ;Setting up the variables for tabulation.
DTH ;For Death
INVNON ;Invest/Non Invest
PATTYPE ;Finds the appropriate patient type.

External References

Name Field # of Occurrence
^%DT ENTERQ+4
WAIT^DICD QANQTOT+19, CHECK+7
^DIK CHECK+10
^DIR CHECK+5
^QANQSDT QANQTOT+20
^QANQTTL QANQTOT+19
KILL^XUSCLEAN EXIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?12,*7,"This option CANNOT properly identify you, exiting."
  • Line Location: QANQTOT+4
Function Call: WRITE
  • Prompt: !!,*7,"No data found for the ",$S($G(QAQ2HED)]"":QAQ2HED,1:QUART),", exiting.",*7,!!
  • Line Location: QANQTOT+15
Function Call: WRITE
  • Prompt: !?5,"Quarterly Summary Data exists for the quarter beginning: ",Y
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: !?5,"Do you wish to delete this quarters data?",*7
  • Line Location: CHECK+4
Function Call: WRITE
  • Prompt: !!,*7,"Another person is editing this file, try again later.",!!,*7
  • Line Location: CHECK+9
Function Call: WRITE
  • Prompt: !!,"Enter Quarter Period and FY you wish to end with",!
  • Line Location: QUART+1
Function Call: READ
  • Formatting: !
  • Prompt: "Enter Quarter and Year: "
  • Variable: QUART
  • Timeout: DTIME
  • Line Location: ENTERQ+1
Function Call: WRITE
  • Prompt: !!,"Enter Quarter Period in this format: 2nd quarter 1988 would be 2-88, 2/88, 2 88",!
  • Line Location: ENTERQ+2
Function Call: WRITE
  • Prompt: " ??",*7,!!,"Enter Quarter 1 to 4 only",!
  • Line Location: ENTERQ+3
Routine Call
  • DIR
  • Line Location:
    • CHECK+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^QA(742.6 - [#742.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" CHECK+2
^DIC(42 - [#42] PATTYPE+5
^QA(742 - [#742] PATFND+6, PATFND+7, TAB+1
^QA(742.1 - [#742.1] TAB+6
^QA(742.14 - [#742.14] DTH+1
^QA(742.4 - [#742.4] QANQTOT+12, QANQTOT+13, PATFND+5, TAB+2
^QA(742.6 - [#742.6] CHECK+1, CHECK+8, CHECK+9, CHECK+10, CHECK+11
^SC - [#44] PATTYPE+3, PATTYPE+4
^UTILITY($J QANQTOT+14, QANQTOT+17, QANQTOT+18, EXIT+1!, PATFND+7*

Label References

Name Line Occurrences
CHECK QANQTOT+8
DTH TAB+6
ENTERQ ENTERQ+2, ENTERQ+3
EXIT QANQTOT+5, QANQTOT+7, QANQTOT+9, QANQTOT+16
INVNON TAB+7
PATFND QANQTOT+13
PATTYPE TAB+6
QUART QANQTOT+7
TAB QANQTOT+18

Naked Globals

Name Field # of Occurrence
^(0 DTH+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT ENTERQ+4!
>> DA CHECK+10*
DIK CHECK+10!*
DIR CHECK+4!, CHECK+5!
DIR("?" CHECK+5*
DIR(0 CHECK+4*
DT QANQTOT+11
DTIME ENTERQ+1
DUZ QANQTOT+3
>> QAN742 TAB+1*, TAB+5, PATTYPE+1
>> QAN7424 PATFND+5*, TAB+2*, TAB+3, TAB+4, TAB+5
>> QANALPV TAB+5*, INVNON+1, INVNON+2, INVNON+3, INVNON+4
>> QANARRY( INVNON+1*, INVNON+2*, INVNON+3*, INVNON+4*
>> QANARRY("QAN D" , DTH+2*, DTH+3*
>> QANBEG QANQTOT+10*, QANQTOT+12
>> QANDATE QANQTOT+11*
>> QANDEATH DTH+1*
>> QANDT QANQTOT+12*, QANQTOT+13
>> QANDTH TAB+4*, TAB+6, DTH+1, DTH+2, DTH+3
>> QANEND QANQTOT+10*, QANQTOT+12
>> QANIEN QANQTOT+13*, QANQTOT+17*, QANQTOT+18, PATFND+5, PATFND+6, PATFND+7, TAB+2
>> QANINCD TAB+3*, TAB+6, DTH+2, DTH+3, INVNON+1, INVNON+2, INVNON+3, INVNON+4
>> QANINVST TAB+4*, DTH+2, DTH+3, INVNON+1, INVNON+2, INVNON+3, INVNON+4
>> QANMED TAB+3*
>> QANMSSG QANQTOT+6*, QANQTOT+19, CHECK+7*
>> QANPT QANQTOT+18*, PATFND+6*, PATFND+7, TAB+1
>> QANPTTY DTH+2, DTH+3, INVNON+1, INVNON+2, INVNON+3, INVNON+4, PATTYPE+1*, PATTYPE+6*
>> QANSVLV TAB+5*, INVNON+3, INVNON+4
>> QANTODAY QANQTOT+11*
>> QANWD PATTYPE+1*, PATTYPE+2, PATTYPE+3, PATTYPE+4
>> QANWD(1 PATTYPE+4*, PATTYPE+5
>> QANWD(2 PATTYPE+5*, PATTYPE+6
>> QANXIT QANQTOT+6*, QANQTOT+9, CHECK+6*, CHECK+9*
>> QAQ2HED QANQTOT+15, ENTERQ+6*
>> QAQNBEG ENTERQ+6*
>> QAQNEND ENTERQ+6*
>> QAQQUIT QANQTOT+6*, QANQTOT+7, ENTERQ+1*
>> QU QANQTOT+10, QANQTOT+11, CHECK+1, CHECK+2, CHECK+10, ENTERQ+4*, ENTERQ+6
>> QUART QANQTOT+15, ENTERQ+1*, ENTERQ+2, ENTERQ+3, ENTERQ+4
>> QUBEG( QANQTOT+10, QANQTOT+11, CHECK+1, CHECK+2, CHECK+10, ENTERQ+6
>> QUBEG(1 ENTERQ+5*
>> QUBEG(2 ENTERQ+5*
>> QUBEG(3 ENTERQ+5*
>> QUBEG(4 ENTERQ+5*
>> QUEND( QANQTOT+10, ENTERQ+6
>> QUEND(1 ENTERQ+5*
>> QUEND(2 ENTERQ+5*
>> QUEND(3 ENTERQ+5*
>> QUEND(4 ENTERQ+5*
>> QUQUA( ENTERQ+6
>> QUQUA(1 ENTERQ+5*
>> QUQUA(2 ENTERQ+5*
>> QUQUA(3 ENTERQ+5*
>> QUQUA(4 ENTERQ+5*
U PATFND+5, TAB+3, TAB+4, TAB+5, DTH+1, PATTYPE+1, PATTYPE+5
>> X ENTERQ+4*
Y CHECK+2~*, CHECK+3, CHECK+6, ENTERQ+4
>> YR ENTERQ+4*, ENTERQ+5, ENTERQ+6
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  | All