/* Daten auf Default setzen */

ADDRESS CHAOSPRO.REXX
options results
do forever
GetPicture 0
if RC>0 then break
DelPicture result
end