How to use a procedure pointer? Other than procedures where pointers concept can be applicable in AS/400?