CLOSE
CLOSE source[,option-list];
SOURCES
file-name - MPE or KSAM file
$FORMLIST - VPLUS spool file
$PRINT - TRANLIST print file
$VPLS - active formfile
- TurboIMAGE data set
set-name(base-name)
@[(base-name)] - TurboIMAGE database
OPTIONS
ERROR=label([item-name])
NOMSG
STATUS
Example
CLOSE KDATA;