*****
FILE-CLOSE SECTION.
*****
CLOSE CHANNEL1.
CLOSE CHANNEL2.
CLOSE PR3.
FILE-CLOSE-EXIT.
EXIT.
*****