DSolve[-(y[x]*(x*Cos[y[x]/x] + Sin[y[x]/x]*y[x])) + x*(-(x*Cos[y[x]/x]) + Sin[y[x]/x]*y[x])*Derivative[1][y][x] == 0,y[x],x]