$S-  -- Synonym translation OFF
-- ----------------------------------------------------------------
-- Data Listing    Date : 7  Aug 2023 10:34

ONERROR GOLABEL /ERROR3

INPUT BEGIN
NEW BTSET /BOLTSET_8M16
BDIA ( 16 )
BTYP CAP
BTHK ( ATTRIB RPRO THBO )
NOFF 8

NEW BLTP /BOLTSET_8M16-1
NUMB 1
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-2
NUMB 2
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-3
NUMB 3
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-4
NUMB 4
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-5
NUMB 5
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-6
NUMB 6
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-7
NUMB 7
BDIA ( 16 )
BTYP CAP

END
NEW BLTP /BOLTSET_8M16-8
NUMB 8
BDIA ( 16 )
BTYP CAP

END
END
INPUT END  BTSET /BOLTSET_8M16
INPUT FINISH
-- Switch synonyms back on if an error occurs.
LABEL /ERROR3
handle ANY
$S+
RETURN ERROR
endhandle

-- End Data Listing    Date : 7  Aug 2023 10:34
$S+  -- Synonym translation ON
-- ----------------------------------------------------------------