proc script