Estimation of the JT-60U vessel current by a magnetic fitting code