<USE "GLUE">
<GROUP-LOAD "MARC;TVGUTS NBIN">
<GROUP-LOAD "MARC;TVFROB NBIN">
<GROUP-LOAD "MARC;TVCRFT NBIN">
<SET MCC (!.TVGUTS !.TVCRFT !.TVFROB)>
<GROUP-GLUE MCC>
<GROUP-DUMP "MARC;TVHACK GBIN" MCC ,PRINT>