Option Explicit
'@Folder("Macros")
Public Sub AddSalesRep()
With New SalesRepPresenter
.Present New OrderSheetProxy, New SalesRepsSheetProxy
End With
End Sub
Public Sub AddCustomerAccount()
With New AccountsPresenter
.Present New OrderSheetProxy, New SalesRepsSheetProxy, New AccountsSheetProxy
End With
End Sub
Public Sub AddCustomerLocation()
With New LocationsPresenter
.Present New OrderSheetProxy, New SalesRepsSheetProxy, New AccountsSheetProxy, New LocationsSheetProxy