!|using naked objects viewer for set up|
|on object|alias as|perform|using member|with arguments|
|maryBloggsCustomer|maryBloggsVisaPaymentMethod|invoke action|new payment method|creditCardPaymentMethodType|
|maryBloggsVisaPaymentMethod||set property|name|Visa|
||||card number|5555-4321-8765-0987|
||||expiry date|07/2011|
|||save||

!|using naked objects viewer for set up|
|on object|alias as|perform|using member|with arguments|
|maryBloggsCustomer|maryBloggsCashPaymentMethod|invoke action|new payment method|cashPaymentMethodType|
|maryBloggsCashPaymentMethod||set property|name|Cash|
|||save||
