proc to set locale