
{ COMMON DECK BAHSEEK }

{   The purpose of this request is to provide the ring 3 interface to
{ amp$seek_direct.
{ It will position the file to the byte address specified in the call block.
{ Record and block manager tables are updated to reflect the new file
{ position.
{
{       BAP$SEEK_DIRECT (FILE_IDENTIFIER, CALL_BLOCK, FAP_LAYER_NUMBER,
{         STATUS)
{
{ FILE_IDENTIFIER: (input) This parameter specifies the file access identifier
{       established when the file was opened.
{
{ CALL_BLOCK: (input)  This parameter specifies the call block which carries
{       the file byte address.
{
{ FAP_LAYER_NUMBER: (input) This parameter specifies the fap layer number.
{
{ STATUS: (output) This parameter specifies the request status.
{
