These three files contain a simple demonstration of implementing aggregation:
(example-edit-file "com/com/aggregation-defsys")
(example-edit-file "com/com/aggregation-idl.idl")
(example-edit-file "com/com/aggregation")
LispWorks COM/Automation User Guide and Reference Manual - 23 Mar 2017