Routine: ONCOSSA3

Information

ONCOSSA3 ;WASH ISC/SRR-Print life tables ;11/1/93 12:34

Name	Line Occurrences
Function Call: WRITE	Prompt: $P(HEADER,U,1),"Life Table",?IOM-30,$P(HEADER,U,2),NPG,! Line Location: WHEAD+1
Function Call: WRITE	Prompt: " ",$P(LEN,U,3),?11,"% Alive",?21,"# Left",?31,"Deaths",?41,"Losses",! Line Location: WHEAD+2
Function Call: WRITE	Prompt: "-" Line Location: WHEAD+3
Function Call: WRITE	Prompt: ! Line Location: WGRP+0
Function Call: WRITE	Prompt: "Group ",$C(GRP+64),": ",^TMP($J,"GRP",GRP),! Condition for execution: NGRPS>1 Line Location: WGRP+0
Function Call: READ	Formatting: ! Prompt: "Enter RETURN to continue or '^' to exit: " Variable: X Timeout: DTIME Line Location: TOF+1
Function Call: WRITE	Prompt: $J(INT,5),?12,$J(PSURV,5,1),?22,$J(LEFT,5),?32,$J(MORTS,5) Line Location: WINT+2
Function Call: WRITE	Prompt: ?42,$J(LOSSES,5),! Line Location: WINT+3