/*****************************************************************************
***                                                                     ******
*** UPN:     patient ID;                                                ******
*** EFS:     event free survival;                                       ******
*** EFSCEN:  censoring indicator for EFS;                               ******
*** OS:      Overall survival;                                          ******
*** OSCEN:   censoring indicator for OS;                                ******
*** DTANC5:  days to reach ANC > 500 after transplantation;             ******
***                                                                     ******
*****************************************************************************/
options ls = 80;
libname fu '../../sdata';
data w1;
	set fu.graft;
proc contents;
/* time-dependent covariate of absolute neutrophil recovery (DTANC500) */
proc phreg;
	model efs * efscen(0) = anc5cat /rl; 
	if dtanc5 = . or efs < dtanc5 then anc5cat = 0; else anc5cat = 1;
run;