Примечание. В подобной ситуации крайне важно сохранить запись (с помощью метода DoCmd

В подобной ситуации крайне важно сохранить запись (с помощью метода DoCmd. RunCommand, как показано в примере). В противном случае запись заказа останется в режиме редактирования и новый статус не сохранится в БД. Другие работники могут начать выполнять его, поскольку у них нет возможности узнать о том, что вы изменили статус этого заказа.

Теперь самое время запустить форму ReviewOrderDetails,которая выводит предназна­ченное только для чтения представление всех компонентов заказа (рис. 17.15). Форма от­крывается в диалоговом режиме, который блокирует открытие формы ShipOrdersдо тех пор, пока не завершится процесс выполнения заказа:

DoCmd.OpenForm "ReviewOrderDetails", , , _

"OrderID =" & ID, , acDialog End If

End Function

Форма ReviewOrderDetailsпредоставляет сотрудникам склада два варианта для выбора. Если они щелкают мышью кнопку Ship(доставить), программа Access изменяет статус за­каза на Shipped (отправлен) и процесс завершается.

Private Sub Ship_Click( ) ' Эта форма закрывается DoCmd.Close

' Обратный переход к форме ShipOrders DoCmd.OpenForm "ShipOrders"

' Обновление заказа

' StatusID для статуса Shipped равен 4 Forms ("ShipOrders").StatusID = 4 DoCmd.RunCommand acCmdSaveRecord

End Sub

Рис. 17.15.В форму ReviewOrderDetailsне нужно включать подробности, касающиеся цены товара. Она разработана просто для того, чтобы представить наиболее эффективным способом работникам склада нужную им информацию. Форма ReviewOrderDetailsприменяет запрос с объединением для получения некоторых связанных данных, например, поля PartNumberиз таблицы Products

В свойствах Кнопка оконногоменю (Control Box) и Кнопка закрытия(Close Button) формы ReviewOrderDetailsустановлено значение Нет. В этом случае работники склада ни при каких обстоятельствах не могут закрыть это окно без щелчка мышью кнопки Ship (доставить) или Cancel(отмена). (Если не применять такой подход, придется писать до­полнительный код, который переустанавливает статус заказа, когда кто-нибудь щелкнет мышью пиктограмму х в правом верхнем углу окна, чтобы закрыть форму ReviewOrder­Details.)