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

Package: Patient Representative

Routine: QACSPRD1


Information

QACSPRD1 ;HINES/CEW - Spreadsheet report selections ;1/12/99

Source Information

Source file <QACSPRD1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Patient Representative 3 PAUSE^QACGEN  (LOOP1,ZIS1)^QACSPRD  INST^QACUTL0  
Kernel 1 ^%ZISC  
VA FileMan 1 DD^%DT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Patient Representative 3 QACSPRD  QACSPRD2  QACSPRD3  

Entry Points

Name Comments DBIA/ICR reference
CONTSK1 ;
TSK ;
TRTCTSK ;
WRIT2 ;
SOURTSK ;
TALL(QACENTRY) ;tally the entry
TRTITSK ;
SOURCE ;
SET1 ;multidivisional
CONTACT ;
CONTSK ;
TREATC ;
SET2 ;for each division or not multi-divisional, initialize counts
SET3 ;multi-divisional, but entry has no division, initialize counts
SOURTSK1 ;
EXIT ;
TRTCTSK1 ;
WRIT ;output
TRTITSK1 ;
QACSET(QACFLD,QACENTRY,QACTITLE) ;subroutines to set up counters for
; fields that are sets of codes
TREATI ;

External References

Name Field # of Occurrence
DD^%DT WRIT+3, WRIT+4
^%ZISC EXIT+1
PAUSE^QACGEN WRIT2+5
LOOP1^QACSPRD TSK+3
ZIS1^QACSPRD CONTACT+3, SOURCE+3, TREATC+3, TREATI+4
INST^QACUTL0 WRIT+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !!?15,$G(QACTITLE)_"Spreadsheet Report"
  • Line Location: WRIT+2
Function Call: WRITE
  • Prompt: !?20,"Date Range: "_QACBEG_" to "_QACEND
  • Line Location: WRIT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: WRIT+6
Function Call: WRITE
  • Prompt: !!,"Division: "_$S(DDD=0:"Unknown",1:QACDV)
  • Line Location: WRIT+12
Function Call: WRITE
  • Prompt: !,QACLABEL(EE)_", "_COUNT(QACDIV(DDD),QACPCE(EE))
  • Line Location: WRIT2+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: WRIT2+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(745.1 QACSET+3
^DG(40.8 - [#40.8] SET1+8
^DIC(4 - [#4] SET1+9
^QA(745.1 - [#745.1] CONTSK1+2, SOURTSK1+2, SOURTSK1+6, SOURTSK1+7, TRTCTSK1+2, TRTITSK1+2, TRTITSK1+4

Label References

Name Line Occurrences
EXIT CONTACT+3, CONTACT+4, SOURCE+3, SOURCE+4, TREATC+3, TREATC+4, TREATI+4, TREATI+5, TSK+5
QACSET SOURTSK+2, TSK+2
SET2 SET1+6, SET1+12, SET1+17
SET3 TALL+5
TALL CONTSK1+3, SOURTSK1+3, SOURTSK1+8, TRTCTSK1+3, TRTITSK1+5
TSK CONTSK+3, SOURTSK+3, TRTCTSK+3, TRTITSK+3
WRIT WRIT2+5, TSK+4
WRIT2 WRIT+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EXIT+2!
BB EXIT+3!, SET3+3*, SET3+4
COUNT EXIT+3!
COUNT( SET2+4*, TALL+8*, WRIT2+4
COUNT(0 SET3+4*
DDD EXIT+3!, WRIT+9*, WRIT+10*, WRIT+11, WRIT+12, WRIT2+4
EE EXIT+3!, SET2+1*, SET2+2, SET2+4, SET3+5*, SET3+7*, TALL+6*, TALL+8, TALL+9*, WRIT2+1~
, WRIT2+2*, WRIT2+3*, WRIT2+4
IO TSK+1
IOF WRIT+1
IOP EXIT+2!
IOSL WRIT2+5
IOST WRIT+1, WRIT2+5
MM EXIT+3!, SET3+1*
POP EXIT+2!
QAC EXIT+4!, SET2+2*
QAC1DIV EXIT+4!, SET1+2, SET1+13, SET1+15, TALL+5
QACAA EXIT+4!, TALL+1*, TALL+2*, TALL+3
QACBEG EXIT+4!, WRIT+3*, WRIT+5
QACCMB EXIT+4!
QACCNT EXIT+4!, QACSET+2*, QACSET+4*, QACSET+5, SET3+3, SET3+7, TALL+6, TALL+9
QACD0 CONTSK1+2, SOURTSK1+2, SOURTSK1+6, SOURTSK1+7, TRTCTSK1+2, TREATI+4, TRTITSK1+2, TRTITSK1+4, EXIT+4!, TSK+3
QACDIV EXIT+4!, TALL+3, TALL+8
QACDIV( SET1+10*, SET2+4, SET3+1, TALL+2, TALL+3, WRIT+10, WRIT+11, WRIT2+4
QACDIV(0 SET1+6*, SET3+2*
QACDIV(1 SET1+15*
QACDT EXIT+4!
QACDV EXIT+4!, WRIT+11, WRIT+12
QACEE SOURTSK1+5*, SOURTSK1+6*, SOURTSK1+7, TRTITSK1+3*, TRTITSK1+4*, EXIT+5!, QACSET+4*, QACSET+5*, QACSET+6, QACSET+7
QACEND EXIT+5!, WRIT+4*, WRIT+5
QACENTRY CONTSK1+1!, CONTSK1+2*, CONTSK1+3, SOURTSK1+1!, SOURTSK1+2*, SOURTSK1+3, SOURTSK1+4, SOURTSK1+7*, SOURTSK1+8, TRTCTSK1+1!
, TRTCTSK1+2*, TRTCTSK1+3, TRTITSK1+1!, TRTITSK1+2*, TRTITSK1+5, QACSET~, SET3+5, TALL~, TALL+6
QACFLD CONTSK+2*, SOURTSK+2*, TRTCTSK+2*, TRTITSK+2*, QACSET~, QACSET+3, TSK+2
QACIFLG EXIT+5!, WRIT+7
QACISSUE EXIT+5!
QACLABEL EXIT+5!
QACLABEL( QACSET+6*, WRIT2+3, WRIT2+4
QACNODE EXIT+5!, QACSET+3*, QACSET+4
QACPCE EXIT+5!
QACPCE( QACSET+4*, QACSET+6, QACSET+7*, SET2+1, SET2+2, SET2+4, SET3+3, SET3+4, SET3+5, TALL+6
, TALL+8, WRIT2+4
QACPFLG WRIT+1, WRIT+7, WRIT2+5*, WRIT2+6!
QACPOP CONTACT+3, SOURCE+3, TREATC+3, TREATI+4, EXIT+5!
QACROU CONTSK+1*, SOURTSK+1*, TRTCTSK+1*, TRTITSK+1*, EXIT+5!, TSK+3
QACRTN CONTACT+2*, CONTACT+3, SOURCE+2*, SOURCE+3, TREATC+2*, TREATC+3, TREATI+2*, TREATI+4, EXIT+6!
QACSOUR EXIT+2!
QACTITLE CONTACT+2*, CONTACT+3, SOURCE+2*, SOURCE+3, TREATC+2*, TREATC+3, TREATI+2*, TREATI+4, QACSET~, WRIT+2
QACTR EXIT+6!
QACXFLG CONTACT+3, CONTACT+4, SOURCE+3, SOURCE+4, TREATC+3, TREATC+4, TREATI+5, EXIT+6!
QACY7E EXIT+6!
QACYES EXIT+6!, TALL+1*, TALL+3*
QAQNBEG EXIT+7!, WRIT+3, TSK+3
QAQNEND EXIT+7!, WRIT+4, TSK+3
RR EXIT+3!, SET1+1~, SET1+7*, SET1+11*, TALL+5*
RRR SET1+1~, SET1+6*, SET1+7*, SET1+8*, SET1+9, SET1+10, SET1+16*, SET2+4
U CONTSK1+2, SOURTSK1+2, TRTCTSK1+2, TRTITSK1+2, QACSET+3
>> Y WRIT+3*, WRIT+4*
ZTDESC EXIT+2!
>> ZTQUEUED EXIT+1
>> ZTREQ EXIT+1*
ZTRTN EXIT+2!
ZTSAVE EXIT+2!
ZTSAVE("QACENTRY" TREATI+3*
ZTSK EXIT+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All