#delim ;
program define somers_p;
version 10.0;
/*
 Predict program for somersd
 (warning the user that predict should not be used
 after somersd)
*! Author: Roger Newson
*! Date: 03 June 2008
*/

syntax [newvarlist] [,*];

disp as error
 "predict should not be used after somersd";
error 498;

end;