Series[(E^(x+y)),{x,0,3},{y,0,4}]

ser=Sum[a[i,j]x^i y^j, {i,0,3}, {j,0,2}]

ser1=(ser /. {x->x h, y-> y h})+O[h]^3

(ser1^2)