We present a new model of the occurence of credit events such as rating changes and defaults for risk analyses of some portfolio credit derivatives. The framework of our model is based on a so-called top-down approach. Specifically, we first consider modeling the point process of each type of credit event in the whole economy using a self-exciting intensity process. Next, we characterize the point processes of credit events in the underlying sub-portfolio using random thinning processes specified by the distribution of credit ratings in the sub-portfolio. One of the main features of our model is that the model can capture credit risk contagion simultaneously among several credit portfolios. We present a credit event simulation algorithm based on our model and illustrate an application of the model to risk analyses of loan portfolios.