{
{   This procedure is the site procedure which validates the initialization of
{ each tape volume.  It is called after existing labels on the tape volume have
{ been read but prior to presenting a menu to the operator.  The procedure can
{ modify the EXPIRATION_DATE, FILE_ACCESSIBILITY_CODE, INTERNAL_CODE,
{ LABEL_STANDARD_VERSION, OWNER_IDENTIFIER, RECORDED_VSN and
{ VOLUME_ACCESSIBILITY_CODE in the tape volume initialization information that
{ is used to initialize the volume.  The site procedure must call
{ RMP$COMPLETE_TAPE_VOLUME_INIT to complete the tape volume initialization.
{
{       RMP$VALIDATE_TAPE_VOLUME_INIT (VALIDATION_STATE, OLD_VOLUME_INIT_INFO,
{         NEW_VOLUME_INIT_INFO, STATUS)
{
{ VALIDATION_STATE: (input)  This parameter specifies the tape validation state
{       which is set to ON or OFF by the CHANGE_TAPE_VALIDATION operator
{       command.
{
{ OLD_VOLUME_INIT_INFO: (input)  This parameter contains information which
{       describes the content of the existing tape volume.
{
{ NEW_VOLUME_INIT_INFO: (input)  This parameter contains information specified
{       by the INITIALIZE_TAPE_VOLUME command.
{
{ STATUS: (output) This parameter specifies the request status.  If the site
{       validation procedure returns abnormal status, the initialization will
{       not be completed and this status variable will be used to create the
{       error message that is returned by the INITIALIZE_TAPE_VOLUME command.
{
{       IDENTIFIER: rmc$resource_management_id.
{
