ej[j_] := Module[{ejTemp = Table[0, {m}]}, ejTemp[[j]] = 1; ejTemp];
Sum[NIntegrate[f[xj,y] g[xj ej[j],y]],{xj,-infty,infty},{y,-infty,infty}],{j,1,m}]