*! 1.0.1 NJC 6 August 2004                                       
*! 1.0.0 NJC 8 December 1999 with code from Jeroen Weesie's -keyb- 
program def repcmd6
	version 6 
	if "`1'" == "" { error 198 } 
	
	gettoken cmd 0 : 0, parse(" ,")  
	local cmd : char _dta[`cmd']
	if `"`cmd'"' == "" { 
		di in r "no such characteristic" 
		exit 198 
	}	
	
	syntax [, Showonly ] 
        
        if `"$BUF_DISP"' != "" { di in wh `". `*'"' }                
        
        * put the command in the command buffer
        push `cmd'
        
        * execute the command (unless -showonly-) 
        if "`showonly'" == "" { `cmd' } 
end