Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ONCOSCT2

Package: Oncology

Routine: ONCOSCT2


Information

ONCOSCT2 ;WASH ISC/SRR,MLH-CROSS TABS 2 ;8/21/93 11:09

Source Information

Source file <ONCOSCT2.m>

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: 1

Package Total Caller Graph
Oncology 1 ONCOSCT  

Entry Points

Name Comments DBIA/ICR reference
OUTPUT ;sum & write table
GETLAB ;get label
SETCOL ;setup col sum & get label
SUMLAB ;sum marginals & get labels
TOF ;top of form
WCHEAD ;write column header
WCH1
WCLAB ;write col label
WCLAB1
WPHEAD ;write page header
XX
YY
WROWS ;write rows
WR1 ;write row data lines

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Press Return for next table or '^' to Exit: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: OUTPUT+17
Function Call: WRITE
  • Prompt: !!,?POS,X,!
  • Line Location: WCHEAD+7
Function Call: WRITE
  • Prompt: !,$E($P(ROWDD,U,1),1,ROWHEAD),":",!
  • Line Location: WCH1+0
Function Call: WRITE
  • Prompt: ?+X,$P(X,";",2)
  • Line Location: WCH1+1
Function Call: WRITE
  • Prompt: ?Z,X
  • Line Location: WCLAB1+1
Function Call: READ
  • Formatting: "Press 'Return/Enter' to continue
  • Prompt: '^' to Exit: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: XX+0
Function Call: WRITE
  • Prompt: HLAB
  • Line Location: YY+1
Function Call: WRITE
  • Prompt: " Cross Tabs",?IOM-30,$P(HEADER,U,2)," Page ",NPG,!
  • Line Location: YY+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: YY+3
Function Call: WRITE
  • Prompt: !," Total",?CWID\2+ROWHEAD
  • Line Location: WROWS+4
Function Call: WRITE
  • Prompt: $J(^TMP($J,"CSUM",^TMP($J,"COL",C)),CWID)
  • Line Location: WROWS+5
Function Call: WRITE
  • Prompt: !," %",?CWID\2+ROWHEAD
  • Line Location: WROWS+6
Function Call: WRITE
  • Prompt: $J(^TMP($J,"CSUM",^TMP($J,"COL",C))*100/TOT,CWID,1)
  • Line Location: WROWS+7
Function Call: WRITE
  • Prompt: $J("100.0",CWID),!
  • Line Location: WROWS+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: WROWS+8
Function Call: WRITE
  • Prompt: !,X,?CWID\2+ROWHEAD
  • Line Location: WR1+3
Function Call: WRITE
  • Prompt: $J(X,CWID)
  • Line Location: WR1+4
Function Call: WRITE
  • Prompt: $J(^TMP($J,"RSUM",R),CWID)
  • Line Location: WR1+5
Function Call: WRITE
  • Prompt: !,?CWID\2+ROWHEAD
  • Line Location: WR1+6
Function Call: WRITE
  • Prompt: $J(X,CWID,1)
  • Line Location: WR1+7
Function Call: WRITE
  • Prompt: $J(^TMP($J,"RSUM",R)*100/TOT,CWID,1)
  • Line Location: WR1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: WR1+9
Function Call: WRITE
  • Prompt: "-"
  • Line Location: WR1+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J OUTPUT+10, OUTPUT+11*, OUTPUT+12*, SETCOL+3*, SETCOL+4*, SUMLAB+5*, SUMLAB+7, SUMLAB+8*, WCLAB+3, WROWS+3
WROWS+5, WROWS+7, WR1+2, WR1+4, WR1+5, WR1+7, WR1+8

Label References

Name Line Occurrences
GETLAB SETCOL+3, SUMLAB+4
SETCOL SUMLAB+7
SUMLAB OUTPUT+10
WCH1 WCHEAD+5
WCHEAD OUTPUT+16, WROWS+4, WR1+1
WCLAB WCHEAD+8
WCLAB1 WCHEAD+9
WPHEAD WCHEAD+5, WROWS+4, WR1+1
WR1 WROWS+3
WROWS OUTPUT+16

Naked Globals

Name Field # of Occurrence
^( SUMLAB+7
^(0 GETLAB+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GETLAB+8*
C OUTPUT+6~, OUTPUT+11*, OUTPUT+12*, SETCOL+3, SETCOL+4, SUMLAB+6*, SUMLAB+7*, WCHEAD+8*, WCH1+1*, WCLAB+3
WROWS+5*, WROWS+7*, WR1+4*, WR1+7*
COL OUTPUT+6~, OUTPUT+16*, SUMLAB+7*, WCHEAD+5, WCHEAD+6, WCHEAD+8, WROWS+5, WROWS+7, WR1+4, WR1+5
WR1+7, WR1+8
>> COLCUTS SUMLAB+6
>> COLDD OUTPUT+11, SUMLAB+5, SUMLAB+6, WCHEAD+5, WCHEAD+6, WCH1WROWS+5, WROWS+7, WR1+5, WR1+8
>> COLS OUTPUT+12*, OUTPUT+14*, OUTPUT+16, WCHEAD+6, WCHEAD+8, WR1+5, WR1+8
CUTS GETLAB+5, SUMLAB+4~*, SUMLAB+6*
CWID OUTPUT+6~, OUTPUT+9*, OUTPUT+15, WCHEAD+6, WCHEAD+7, WCHEAD+8, WCLAB+3, WCLAB1WROWS+4, WROWS+5
WROWS+6, WROWS+7, WROWS+8, WR1+3, WR1+4, WR1+5, WR1+6, WR1+7, WR1+8
DTIME OUTPUT+17, XX
>> FNAM OUTPUT+7*, OUTPUT+8
>> GBL OUTPUT+7
>> HEADER OUTPUT+8, YY+2
>> HLAB OUTPUT+8*, YY+1
IO OUTPUT+5
IOF YY
IOM OUTPUT+15, YY+2, YY+3, WROWS+8, WR1+9
IOSL WCHEAD+5, WROWS+4, WR1+1
LC OUTPUT+6~, OUTPUT+16*, WCHEAD+6, WCHEAD+8, WROWS+5, WROWS+7, WR1+4, WR1+7
LNCOLS OUTPUT+6~, OUTPUT+15*, OUTPUT+16, WR1+5, WR1+8
>> NPG WCHEAD+5, XX, YY*, YY+2
>> ONCOEX OUTPUT+16, OUTPUT+17*, WCHEAD+3, WCHEAD+5, WPHEAD+1, XX*, WROWS+3, WROWS+4, WR1+1
>> ONCOS("AF" OUTPUT+13
>> ONCOS("CW" OUTPUT+9
>> ONCOS("D" OUTPUT+17
>> ONCOS("RW" OUTPUT+9
>> OT OUTPUT+13*, OUTPUT+18
>> PCT WROWS+4, WROWS+6, WR1+1, WR1+6
POS WCHEAD+4~, WCHEAD+6*, WCHEAD+7*, WCHEAD+8*, WCLAB1
R OUTPUT+6~, OUTPUT+9*, OUTPUT+10*, SUMLAB+4, SUMLAB+5, SUMLAB+7, SUMLAB+8, WROWS+3*, WR1+2, WR1+4
WR1+5, WR1+7, WR1+8
RLWID OUTPUT+6~, OUTPUT+9*, OUTPUT+14
ROW OUTPUT+6~, WROWS+3*
ROW2 WCHEAD+4~*, WCH1+1, WCLAB1+2*
>> ROWCUTS SUMLAB+4
>> ROWDD OUTPUT+9, SUMLAB+4, WCH1
ROWHEAD OUTPUT+6~, OUTPUT+9*, OUTPUT+14*, OUTPUT+15, SUMLAB+6*, WCHEAD+6, WCHEAD+7, WCH1WROWS+4, WROWS+6
WR1+2, WR1+3, WR1+6
>> ROWS OUTPUT+10*, WROWS+3
RSUM SETCOL+4*, SUMLAB+4~, SUMLAB+6*, SUMLAB+8
>> TEMPL OUTPUT+8
>> TOT WROWS+6, WROWS+7, WR1+7, WR1+8
U OUTPUT+7, OUTPUT+8, OUTPUT+9, GETLAB+4, GETLAB+6, GETLAB+7, WCHEAD+6, WCH1WCH1+1, WCLAB1+2
YY+2
>> UNK GETLAB+3
VAL OUTPUT+6~, SETCOL+4, SUMLAB+7*
>> W OUTPUT+9*
>> X OUTPUT+17*, GETLAB+5*, GETLAB+8*, WCHEAD+6*, WCHEAD+7, WCHEAD+9*, WCH1+1*, WCLAB+3*, WCLAB1WCLAB1+1
WCLAB1+2, XX*, YY+3*, WROWS+8*, WR1+2*, WR1+3*, WR1+4*, WR1+7*, WR1+9*
>> XCRT OUTPUT+17, XX
>> Y GETLAB+3*, GETLAB+4*, GETLAB+5*, GETLAB+8*, SETCOL+3*, SUMLAB+4*, SUMLAB+5, SUMLAB+6, WCLAB1*, WR1+4*
WR1+7*
YDD GETLAB+4, GETLAB+6, GETLAB+7, SUMLAB+4~*, SUMLAB+6*
>> Z GETLAB+7*, GETLAB+8, WCLAB1*, WCLAB1+1, WCLAB1+2
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All