Creating a TicketItem Object
Next, we create a new TicketItem object, to hold information about the show for which tickets are being ordered.
// Create a new TicketItem object
Set itm = ##class(Cinema.TicketItem).%New()
This code is added to the AddShow method:
—Utils.AddShow—
Utils.AddShow
ClassMethod AddShow(ShowID As %String)
{
// Get an order object
If $data(%session.Data("Order")) {
Set ord = ##class(Cinema.TicketOrder).%OpenId(%session.Data("Order"))
}
Else {
Set ord=##class(Cinema.TicketOrder).%New()
// ...
}
// Create a new TicketItem object
Set itm = ##class(Cinema.TicketItem).%New()
// ...
// Save incomplete order and remember its Id in %session.
Do ord.%Save()
Set %session.Data("Order") = ord.%Id()
}