Skip to content

140B ReservationInfo

Stub   MON 140B (96 decimal) · Mnemonic WHDEV · Group: Device Handling (manual section 2.11)

Available from: All programs (manual compatibility box)

Emulation source: src/handlers/mon_140B_ReservationInfo.c

Description

Checks that a device is not reserved. If it is reserved, you will receive information about which RT program that reserves it.

  • Some devices have both an input and an output part. You have to use ReservationInfo for each part.

Parameters

Name Type Direction Description
DeviceNumber INTEGER2 In Logical device number. See appendix B.
IOFlag INTEGER2 In Input/output flag. 0=input part, 1=output part.
ReturnValue INTEGER2 Out RT description address of reserving RT program (output). 0=not reserved, -1=error.

Direction: In = the program supplies the value, Out = the call returns it, In/Out = both.

See also

ReserveResource, ReleaseResource, and @LIST-DEVICE

Compatibility

Machines Users Programs
ND-100 and ND-500 All users All programs

The manual's compatibility box for this call, word for word.

Yes/no fields from the YAML extraction (not in the manual's words):

ND-100 ND-500 User programs RT programs System programs
Yes Yes Yes Yes No

Examples

From the manual (OCR text, not corrected).

INTEGER : DeviceNumber, IOFlag, ReturnValue
...
Monitor_Call('ReservationInfo', DeviceNumber, IOFlag, ReturnValue)
INTEGER DeviceNo, IOFlag, ReturnValue
...
Monitor_Call('ReservationInfo', DeviceNo, IOFlag, ReturnValue)
DeviceNumber, IOFlag, ReturnValue : INTEGER2;
...
ReservationInfo(DeviceNumber, IOFlag, ReturnValue);
01 DeviceNumber COMP.
01 IOFlag COMP.
01 ReturnValue COMP.
...
MONITOR-CALL "ReservationInfo" USING DeviceNumber, IOFlag, ReturnValue.
DeviceNumber : W BLOCK 1
IOFlag : W BLOCK 1
ReturnValue : W BLOCK 1
ReservationInfo : EQU 37B9 + 140B
...
CALLG ReservationInfo, 2, DeviceNumber, IOFlag
W1 =: ReturnValue %Result is returned in W1 register.
LDA   (PAR   %Load register A with address of parameter list.
MON   140    %Monitor call ReservationInfo.
STA   STAT   %Store status returned.
AAA   -1     %Test if -1. JAN not applicable because of RT
JAZ   ERROR  %addresses above 100000.
...
...
ERROR, ...
STAT, 0      %RT description address if any.
PAR, DEVNO  %Logical device number.
IOF         %Input or output flag.
DEVNO, ...
IOF, ...

ndmonlib implementation

Stub Registered MON_STATUS_NOT_IMPLEMENTED: the handler is a stub. mon_dispatch() in src/core/mon_dispatch.c reports the call as unimplemented without calling it.

Handler mon_140B_ReservationInfo
Code lines 7 (non-blank, non-comment lines in the file)

Source

SINTRAN III Monitor Calls (ND-860228.2 EN), page 415.