Function
Initiates a Journal Accounting Program (JAP) job.
Format
SJPROC parameter list
Where parameters in the parameter list are as follows:
| Parameter | Meaning |
|---|---|
| SJFILE generation number | A manual startup of JAP is required at this generation of SJFILE. The default value of this parameter is the position corresponding to the last Dictionary update, or 1 if there has been no update |
| INVFILE generation number | This is the generation number of the invoice file to be used. The default value of this parameter is one more than the last time or 1 if there has been no Dictionary update |
| DRYRUN | User budgets in the Dictionary should no be updated (although invoices should still be produced) |
| CAREFUL | The JAP should HALT:-UP before updating the Dictionary |
| ALLJOBS | The JAP should generate invoices for all jobs regardless of the state of BILA when they finish (although the user budgets will only be updated if the job finished under BILA SJ) |
| ONESHOT | Do not start another job running when all data in the journal has been processed |
| WAIT time-interval | After the job is initiated it will wait time-interval before starting processing |
Note that the parameters may be specified by the first two letters only. For example, CA is sufficient to specify the parameter CAREFUL.
All the parameters are optional and may appear in any order.
Forbidden contexts
The macro may be issued either from the operator's console or under user :JOURNAL with jobname JAJOBA or JAJOBB (MOP or background).
Execution
The job :JOURNAL.JAJOBA or :JOURNAL.JAJOBB is initiated.
Example
SJPROC INVFILE2,ALLJOBS,CAREFUL
Library Entrants Accessed
:LIB.PROGRAM XK7S (Execute)
Messages Output by the JAP
| Program HALTS | Meaning |
|---|---|
| GP | Following ENTER 1. X0=generation number of current journal file. X1=generation number of current invoice file, X2=record count in current journal file |
| IN | At end of initialising JAP's core into 64 work blocks |
| PI | More than 60 peripherals used by a job recorded in the journal |
| LB | JAP cannot find one of its data blocks |
| NC | JAP has attempted to get more core and failed |
| UP | CAREFUL parameter specified to job description. JAP halts before updating Dictionary |
| NEXT SJFILE GEN n | The generation number of the next system journal file is n |
| NEXT INVOICE GEN n | The generation number of the next invoice file is n |
| SAVED FILE filename (n) | The JAP was SAVEd into filename generation number n |
| Program DISPLAYS | Meaning |
| BUILA STATE UNKNOWN | Current accounting state unknown |
| JOB CONTINUING NOT RECOGNISED | CONTINUING message from job SAVEd over the system break not recognised |
| JOBNO NOT UNIQUE | Two JOBSTARTED messages with same JOBNO |
| JOBNO NOT RECOGNISED | No preceding JOBSTARTED message found for this job |
| DU | Error after Dictionary update |
| PE | Operator's peripheral number greater than the maximum specified by the installation manager encountered |
| Program DELETES | Meaning |
| OK | After updating Dictionary if TIMENOW reached in current journal file |