424B ClearCapability¶
Stub MON 424B (276 decimal) · Mnemonic CAPCLE · Group: Segment Administration (manual section 2.12)
Available from: All programs (manual compatibility box)
Emulation source: src/handlers/mon_424B_ClearCapability.c
Description¶
Clears a capability. A capability describes each logical segment in a domain. The protection of the segment is removed. See the manual ND Linker User Guide and Reference Manual (ND-60289).
- The logical segment is available for other physical segments.
Parameters¶
| Name | Type | Direction | Description |
|---|---|---|---|
LogicalSegmentNo |
INTEGER2 | In | Logical segment number in your domain. |
SegmentType |
INTEGER2 | In | Segment type: 0=data segments, 1=program segments. |
Direction: In = the program supplies the value, Out = the call returns it, In/Out = both.
See also¶
Compatibility¶
| Machines | Users | Programs |
|---|---|---|
| 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 |
|---|---|---|---|---|
| No | Yes | No | No | No |
Examples¶
From the manual (OCR text, not corrected).
INTEGER : LogicalSegmentNo; SegType
...
ON ROUTINEERROR DO
IF ErrCode > 0 THEN ...
ENDON
Monitor_Call('ClearCapability', LogicalSegmentNo, SegType)
INTEGER LogicalSegmentNo, SegType
...
Monitor_Call('ClearCapability', LogicalSegmentNo, SegType)
IF (ErrCode .NE. 0) THEN ...
LogicalSegmentNo, SegType : LONGINT;
...
ClearCapability(LogicalSegmentNo, SegType);
IF ErrCode <> 0 THEN ...
01 LogicalSegmentNo COMP.
01 SegType COMP.
01 ErrCode COMP.
...
MONITOR-CALL "ClearCapability" USING LogicalSegmentNo, SegType.
CALL "CbError" USING ErrCode.
IF ErrCode NOT = 0 GO ...
LogicalSegmentNo : W BLOCK 1
SegType : W BLOCK 1
ErrCode : W BLOCK 1
ClearCapability : EQU 37B9 + 424B
...
CALLG ClearCapability, 2, LogicalSegmentNo, SegType
IF K GO ERROR
...
ERROR : W1 =: ErrCode %ErrorCode in W1 register.
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_424B_ClearCapability |
| Code lines | 7 (non-blank, non-comment lines in the file) |
Source¶
SINTRAN III Monitor Calls (ND-860228.2 EN), page 111.