R MACRO
OBJ:V,LST:V/C=SRC:V
^C
R LINK
BIN:VBGEXE,MAP:V/W=OBJ:V/M/Y:20000/X
VBGSTK
.VOVLY
^C
RUN BIN:SPLIT
VBGEXE.001,,VBGEXE.002=BIN:VBGEXE.SAV/B:4:20
^C
COPY/CONCATENATE VBGEXE.00(1,2) BIN:VBGEXE.SAV/PREDELETE
DELETE VBGEXE.00(1,2)