{
{ the purpose of this request is to provide a mechanism for saving
{ routing information in the system file label.
{
{        BAP$PUT_ROUTE_INFO (FILE_IDENTIFIER,QLABEL,STATUS)
{
{ FILE_IDENTIFIER: (input) this parameter specifies the file access
{        identifier established when the file was opened.
{
{ QLABEL: (input) this parameter specifies an array in the calling
{        programs address space from which the routing information label
{        is to be retrieved. the size of the array is assumed to be 400
{        bytes.
{
{ STATUS: (output) this parameter specifies the request status
