
  VAR
    fmv$attachment_values: [XDCL, oss$job_pageable] fmt$attachment_values :=
      [
        {attached_file} FALSE,
        {attached_access_modes_set} FALSE,
        {attached_access_modes} $fst$file_access_options [],
        {attached_share_modes_set} FALSE,
        {attached_share_modes} $fst$file_access_options [],
        {explicit_detach_allowed_set} FALSE,
        {explicit_detach_allowed} TRUE,
        {implicit_detach_required_set} FALSE,
        {implicit_detach_required} FALSE,
        {hide_attachment_set} FALSE,
        {hide_attachment} FALSE,
        {scope_set} FALSE,
        {scope} fsc$job_scope,
        {block_handle_set} FALSE,
        {block_handle.segment_offset}
        {block_handle.assignment_counter} [0,0]
        {recend} ];

?? PUSH (LISTEXT := ON) ??
*copyc fmt$attachment_values
*copyc fst$attachment_options
*copyc fst$attachment_scope
*copyc osv$job_pageable_heap
?? POP ??
