24.12.2013 Views

TOPS-10 Monitor Calls Manual Volume 2 AA-K039D ... - Trailing-Edge

TOPS-10 Monitor Calls Manual Volume 2 AA-K039D ... - Trailing-Edge

TOPS-10 Monitor Calls Manual Volume 2 AA-K039D ... - Trailing-Edge

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

ENQC. [CALLI 153]<br />

On a skip return, the monitor returns a three-word status block<br />

each request, at buffer. The format of each block is:<br />

for<br />

Offset<br />

Symbol<br />

Meaning:<br />

0 .ENQCF<br />

Flags:<br />

Bits<br />

0<br />

1<br />

2<br />

3<br />

4-8<br />

9-17<br />

18-26<br />

27-35<br />

Symbol<br />

EQ.CFI<br />

EQ.CFO<br />

EQ.CFQ<br />

EQ.CFX<br />

EQ.CFL<br />

EQ.CFC<br />

EQ.CFJ<br />

Meaning:<br />

Invalid lock.<br />

This user is owner.<br />

This user is in queue for<br />

specified resource.<br />

Owner's access is exclusive.<br />

Reserved.<br />

Level number.<br />

The owner's context number.<br />

The owner's job number or an<br />

error code.<br />

1 .ENQCT<br />

2 .ENQCI<br />

A time stamp, in universal date-time format,<br />

indicating the time that the lock was granted; or<br />

0, indicating that the resource is available.<br />

The left half (EQ.CIQ) contains the number of<br />

users sharing the resource. The right half<br />

(EQ.CID) contains the r~quest-id of the owner of<br />

the lock.<br />

22.41.2 FUNCTION 1 (.ENQCG)<br />

Returns user's quota in ac.<br />

function is:<br />

The calling sequence for the .ENQCG<br />

MOVE ac, [XWD .ENQCG,addr]<br />

ENQC. ac,<br />

error return<br />

skip return<br />

addr: XWD O,jobno<br />

In the argument word, jobno is the number of the job whose ENQ quota<br />

is required. If jobno is -1, your own job is assumed.<br />

22.41.3 FUNCTION 2 (.ENQCC)<br />

Changes user's quota.<br />

is:<br />

The calling sequence for the<br />

.ENQCC<br />

function<br />

MOVE ac, [XWD .ENQCC,addr]<br />

ENQC. ac,<br />

error return<br />

skip return<br />

addr:<br />

XWD<br />

quota,jobno<br />

22-120

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!