M80811A: Other osteoporosis with current pathological fracture, right shoulder, initial encounter for fracture