DSolve[Derivative[1][y][x] == (E^(y[x]/x)*(x/E^(y[x]/x) + x^2 + y[x]/E^(y[x]/x)))/x,y[x],x]