TreatedPatient partially implemented
pbset3 b 4 complete
pbset3 complete