(Note the different MinRecursion values.)
NIntegrate[MyD[0.001, Ez, Ep, 10, 2, WLU, WRD, mLUPi, m1i, mRDOWNi], {Ez, -((mRDOWNi/mLUPi)*WRD +
e*0.001), -((mRDOWNi/mLUPi)*(WRD + e*0.001))}, {Ep, (-e*0.001 - Ez), (mRDOWNi/(mLUPi - mRDOWNi))*(Ez + WRD + e*0.001)}, MinRecursion -> **4**]
OUT= 1.08254*10^-13 + 7.38211*10^-35 I
NIntegrate[MyD[0.001, Ez, Ep, 10, 2, WLU, WRD, mLUPi, m1i, mRDOWNi], {Ez, -((mRDOWNi/mLUPi)*WRD +
e*0.001), -((mRDOWNi/mLUPi)*(WRD + e*0.001))}, {Ep, (-e*0.001 - Ez), (mRDOWNi/(mLUPi - mRDOWNi))*(Ez + WRD + e*0.001)}, MinRecursion -> **5**]
OUT= 1.08254*10^-13
You can check the attached file
Attachments: