A. Housekeeping
1. Parameter lists, key lists, and work fields are defined.
B. Mainline
1. The program chains to the Calendar Date file (CT140M) with a calendar date and returns a shop date.