{
{ This procedure is used to assign a new FDE entry. It searchs the FDE array in job
{ fixed or mainframe wired (depending on table residency) and returns an SFID & pointer
{ to the first available entry found. On return from this procedure the entry is NOT locked
{ for the task that assigned it.
{
{ Most fields in the newly assigned FDE are initialized to a default value. See the module
{ GFM$FILE_TABLE_MANAGER for a definition of the values.
{
{
{     GFP$ASSIGN_FDE (RESIDENCE, SEGMENT_NUMBER, SFID, FDE_P)
{
{
{ RESIDENCE: (INPUT) Specifies whether the FDE should be assigned in job fixed or
{             mainframe wired.
{ SEGMENT_NUMBER: (INPUT) If residence is GFC$TR_NULL, then this parameter specifies
{            an alternate segment number for the job fixed segment.
{ SFID:      (OUTPUT) The SFID of entry assigned is returned here. The SFID.HASH
{             field in the SFID and FDE is initially set to ZERO by this procedure. The
{             caller is responsible for changing these fields.
{ FDE_P:     (OUTPUT) This parameter contains a pointer to the FDE assigned. The FDE
{             is NOT locked for task the created it.

