
  VAR
    binding_segment_attributes: [READ, oss$job_paged_literal]
      lot$segment_attributes := [[FALSE, osc$non_executable,
      osc$binding_segment, osc$non_writable], osc$tsrv_ring, osc$max_ring,
      [FALSE, FALSE, 0], FALSE, FALSE, FALSE, FALSE];

?? PUSH (LISTEXT := ON) ??
*copyc OSS$JOB_PAGED_LITERAL
?? POP ??
