[gl00mie]

По-моему, в приведенном выше куске кода выполняется "закат солнца вручную". Схожий по смыслу, но более лаконичный код можно найти в ГАКе, например, \Data Dictionary\Tables\DirPersonUser\Methods\createDirPersonUser.