/* Rexx */

Rc = 100; Say Rc
Address CMD 'Zip -h'; Say Rc
