Уважаемый satir!
На форме 5741 "Перемещение Заказ Субформа" во всем известном свойстве AutoSplitKey стоит значение Yes. В первичном ключе таблицы 5741 "Перемещение Строка" включено поле Line No. - Integer. Свойство AutoSplitKey как раз и отвечает за автоматическое присвоение целочисленному полю в первичном ключе нового значения. Попробуйте закомментировать указанные Марией строки кода и проверьте работу перемещения. Боюсь, что результат Вас удивит.
Как раз с целью понимания смысла этих строк и был задан вопрос.
А отправлять человека учить мат. часть и при этом в следующем же посте указывать на свою несостоятельность, как минимум, неэтично.