OpenEdge® Getting Started:ABL Essentials
Using the UNDO statement