New procedure calculation of K-shell ionization cross sections by proton impact