Routine: ONCOSSA2

Package	Total	Call Graph
Oncology	2	GETYES^ONCOSINP (CHKCOND,SETFD)^ONCOSSA1
VA FileMan	1	^DIC

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Oncology	1	ONCOSSA1

Entry Points

Name	Comments	DBIA/ICR reference
SETGRPS	;define group variables from ONCOS("G") input variable.
SET1
SET2
SET3
SET4
SUBGRPS	;get subgroups
SUB1
SUB2
SUB3
SUB4

External References

Name	Field # of Occurrence
^DIC	SUB2+1
GETYES^ONCOSINP	SET1+2
CHKCOND^ONCOSSA1	SET3
SETFD^ONCOSSA1	SET4+1, SUB4+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You may enter an expression that evaluates between 1 and ",NGRPS Line Location: SET1+0
Function Call: WRITE	Prompt: !,"or separate conditions for each sub-group." Line Location: SET1+1
Function Call: WRITE	Prompt: !,"The cases that do not evaluate between 1 and ",NGRPS," are dropped." Line Location: SET3+2
Function Call: WRITE	Prompt: !,"Enter truth tests that will categorize the cases into ",NGRPS," groups." Line Location: SUBGRPS+5
Function Call: WRITE	Prompt: !,?6,"-",CONDCT+1,"- Search for field: " Line Location: SUB1+0
Function Call: WRITE	Prompt: !,?6,"Enter a field name." Line Location: SUB1+1
Function Call: WRITE	Prompt: !," Only ",NGRPS," sub-groups will be considered.",! Line Location: SUB2+0
Function Call: WRITE	Prompt: *7,"???" Line Location: SUB2+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: SUB3+0
Function Call: WRITE	Prompt: !,?6,"-",CONDCT+1,"- Condition: " Line Location: SUB3+0
Function Call: WRITE	Prompt: !,"Choose from EQUAL TO, LESS THAN, GREATER THAN, CONTAINS, ",!," MATCHES or NULL",! Line Location: SUB3+2
Function Call: WRITE	Prompt: " [",$P("EQUAL TO^GREATER THAN^LESS THAN^CONTAINS^MATCHES^NULL",U,OP),"]" Line Location: SUB3+3
Function Call: READ	Variable: VAL Timeout: DTIME Line Location: SUB4+0
Function Call: WRITE	Prompt: !?6,"-",CONDCT+1,"- Value: " Line Location: SUB4+0
Function Call: WRITE	Prompt: !,"Enter a value." Line Location: SUB4+1
Routine Call	DIC Line Location: SUB2+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	SET3+1, SET4, SUB4+6*

Label References

Name	Line Occurrences
SET1	SETGRPS+1, SETGRPS+2, SET1+3
SET2	SET3
SET3	SETGRPS+2
SET4	SETGRPS+3
SUB1	SUB1+1, SUB2+1, SUB4+7
SUB2	SUB3, SUB4
SUB3	SUB3+2
SUB4	SUB4+1
SUBGRPS	SET1+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SUB4+3*
>> COND	SETGRPS+3, SETGRPS+4, SET1+4, SET3+1, SET4
>> COND(	SET4, SUB4+5
CONDCT	SUBGRPS+4~, SUB1, SUB2, SUB3, SUB4, SUB4+5, SUB4+6, SUB4+7
DTIME	SET2, SUB1, SUB3, SUB4
>> FLDDAT(	SUB4+2
FLDNAM	SUBGRPS+4~, SUB2+2*, SUB4+6
FLDNUM	SUBGRPS+4~, SUB2+2*, SUB4+2, SUB4+5
>> GRPEXP	SET3+1*
IVAL	SUBGRPS+4~, SUB4+2, SUB4+3, SUB4+4*, SUB4+5
>> NGRPS	SET1, SET1+3, SET2+1, SET3+1, SET3+2, SUBGRPS+5, SUB2*, SUB4+7
>> ONCOS("G"	SETGRPS+1, SETGRPS+2, SETGRPS+3, SETGRPS+4!
OP	SUBGRPS+4~, SUB3+1, SUB3+2, SUB3+3, SUB3+4, SUB4, SUB4+4*, SUB4+5, SUB4+6
>> P	SET3
>> TIN	SETGRPS+2, SET2, SET2+1, SET3+1
>> TOU	SET3+1
U	SETGRPS+2, SET2+1, SET4, SUB2, SUB2+2, SUB3, SUB3+3, SUB4, SUB4+3
VAL	SUBGRPS+4~, SUB3+4, SUB4, SUB4+1, SUB4+2, SUB4+3, SUB4+4*, SUB4+6
>> X	SET1+3, SET3+1, SET4+1, SUB1, SUB1+1, SUB2, SUB3, SUB3+1, SUB4, SUB4+2 , SUB4+3*
>> Y	SETGRPS+3, SET1+2, SET1+3, SET4, SET4+1, SUB2+1, SUB2+2, SUB4+2, SUB4+3
>> Z	SET1+2*

Customize PDF page

Package: Oncology

Routine: ONCOSSA2

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: