Так в том случае, когда нельзя сделать связанными процедурами.

Приведённый пример ровно из этой оперы.

Есть системного назначения тип (для безопасности инкапсулированный в RECORD дескриптор).
И разные библиотеки в разных модулях вокруг него. Которые вообще делают через SYSTEM преобразование к Kernel.Type и Kernel.Module.

В прикладных случаях так бывает, когда реализация класса рассредоточена по нескольким модулям и объединяется каким-то неязыковым образом уже. Но наглядное имя такой процедуры-метода иметь хочется.