TEST6 TESTS %%LIST, %%TYPE, %%PROMPT, %%COPY, %%FORMAT, %%FREAD, AND %%OUTPUT. THE PRECEDING LINE TESTS %%%%. %FORMAT F10 %SET NOUT NUMBER Number in F10 format is %COPY NOUT Number in F10.4 format is %FORMAT F10.4 %SET NOUT NUMBER %COPY NOUT Number in E10.4 format is %FORMAT E10.4 %SET NOUT NUMBER %COPY NOUT %FORMAT F20.7 The next 3 lines on the terminal should be: 1 2 REPLY1 is ... 3 where ... is C() %OUT SY0:REPORT.LST NCC %TYPE %type 1 %prompt 2 REPLY1 is %list REPLY1 %TYPE %type 3 1 2 REPLY1 is %copy REPLY1 3 %output ti: The same three lines were output to REPORT.LST. Here is REPORT.LST: %FREAD REPORT.LST LINE %COPY LINE %FREAD REPORT.LST LINE %COPY LINE %FREAD REPORT.LST LINE %COPY LINE Now we delete REPORT.LST. %FREAD 'TEST3.RPI' LINE %OUTPUT REPORT.LST DELETE %OUTPUT TI: The next line is from TEST7 %IN TEST7 The next line is from TESTLIB!TEST8, which in turn calls TESTLIB!TEST9. %IN TESTLIB!TEST8 The next line is from TESTLIB!TEST10. %IN TESTLIB!TEST10