Unit 2, Section 1: Writing a simple function in PL/I

From ZTPS - Z SW video management