R LINK BIN:BUP,MAP:BUP=OBJ:BUP,SRC:ULBLIB// OBJ:BUPSUB OBJ:BUPBAK/O:1 OBJ:BUPDIR/O:1 OBJ:BUPRES/O:1 OBJ:BUPINI,BUPIMA,BUPSRM/O:2 OBJ:BUPCMD/O:2 OBJ:BUPDRS/O:2 OBJ:BUPDDI/O:2 OBJ:BUPMT1/O:2 OBJ:BUPMT2/O:2 // ^C