Multiscale reduction of discrete nonlinear Schrodinger equations