The procedure division defines the code to be executed when a type or member is invoked. The procedure division header defines
any parameters to pass in to the code and any returning item to pass back.
procedure-division-header
See the Core sample, which is available from
$COBDIR/demo.