or requote as a function, I think it looks nicer

 cc=Listdsi(requote(ds))                                               
 . .                                                                   
Unquote: return strip(space(translate(arg(1)," ","'")))                
Requote: if arg(1)='' then return '';else return "'"Unquote(arg(1))"'" 
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to