Chilton::ACL::SPROGS Supplement

6. SPROGS MACRO

A few alterations have been necessary to the SPROGS macro (*A12) to take account of the Secure Jobwell and additional TASK features.

6.1 LINK Parameter

The TASK call within SPROGS now includes the LINK parameter. Thus it is no longer necessary to include SEMICOMPILED or LIBRARY statements in front of the Program Description Segment. Semicompiled routines can be included in the macro call by SEMI (if all the routines in the file are to be included) or LIB (if the file is to be scanned as a library). It is thus possible to use the standard SPROGS program description when more semicompiled routines are needed.

6.2 MT and 7T Parameters

Following the details of the Jobwell system, the parameters 7T, MT can be included if the SPROGS macro is called directly, so that the correct JD parameter can be issued in the background job. If an SD4020 tape is required, a 7T parameter will be included automatically.

6.3 ONLINE Parameter

Normally, a call to the SPROGS macro from MOP will cause a background job to be issued. If the user wishes to access the Tektronix cross-hairs, however, it is necessary to be on-line to the job. Such a job should be compiled, consolidated and saved beforehand, and then run using the RUN parameter and the additional parameter ONLINE:

SPROGS RUN MYSAVEDPROG,ONLINE,#TP0,#TR0,JT30SECS

This facility should only be used in consultation with Operations Branch for permission to have an on-line core image.

6.4 Program Description Segment

The following Program Description Segment will be used as default:

PROGRAM(SPRG)
ABNORMAL FUNCTIONS
COMPRESS INTEGER AND LOGICAL
OUTPUT 98,(MONITOR)=LP0
OUTPUT 12=LP5
OUTPUT 13-LP6
OUTPUT99=LP10
USE97=/ARRAY
INPUT 1,5=CR0
OUTPUT 2,6=LP9
END

This will have the following effects:

Users can write to the Hewlett-Packard pen plotter by setting up LP10 in the macro.
Use can be made of DEFBUF on FORTRAN stream 97 (5.9).
The standard FORTRAN default streams 1, 2, 5 and 6 are available. However, LP9 must be set up in the macro if streams 2 or 6 are used.
The standard internal stream number for file listings, error, trace and LP output is 98 (instead of 1).

Note also that this should only affect those who use OUTPUT stream 1 in their programs. There is no need to assign files to LP9 and LP10 if the corresponding streams are not used.