M80819K: Other osteoporosis with current pathological fracture, unspecified shoulder, subsequent encounter for fracture with nonunion