Return to Statement
This example demonstrates the use of the CPATT statement to save selected objects to a new part file.
ENTITY/OBJ(25) NUMBER/RESP IDENT/'Select Objects to Archive',OBJ,RESP IF/RESP==3,$ CPATT/'archive1',OBJ HALT