Dynamic CALL test

Start main" SET SUB-PROG-1 TO TRUE CALL SUB-PROG-NAME END-CALL SET SUB-PROG-2 TO TRUE CALL SUB-PROG-NAME USING TEST-DATA TEST-DATA-LEN END-CALL ?>