
{ COMMON DECK CMHGDF }

{   The purpose of this request is to retrieve a named device file from
{ the system device and to copy it into a segment access bam file.  If
{ the named device file does not exist on the system device, an error
{ status is returned.
{
{       CMP$GET_DEVICE_FILE (DEVICE_FILE_NAME, SEGMENT_FILE_FID, STATUS)
{
{ DEVICE_FILE_NAME: (input)  This parameter specifies the name of the device
{       file to be retrieved.
{
{ SEGMENT_FILE_FID: (input)  This parameter specifies the segment access file
{       identifier of the file to receive the data in the device file.  The
{       file is treated as a sequence.
{
{ STATUS: (output)  This parameter sepecifies the request status.
{
