version 9
capture log close
set more off
log using ehc5.log, replace

use rrdat1, clear

gen des = tfin ~= ti          /*destination state*/
gen tf  = tfin - tstart + 1   /*ending time*/

stset tf, f(des)   /*define single episode data*/

sts list /*list survivor and cumulative hazard functions*/

log close