275B SetTerminalName¶
Stub MON 275B (189 decimal) · Mnemonic STRFI · Group: Monitor Calls for Terminal Handling (manual section 2.6)
Available from: All programs (manual compatibility box)
Emulation source: src/handlers/mon_275B_SetTerminalName.c
Description¶
Defines the file name to be used for terminals. This is normally TERMINAL:. Background users identify their own terminal with this file name.
- You may use this monitor call more than once. Each file name will identify the terminals.
Parameters¶
| Name | Type | Direction | Description |
|---|---|---|---|
TerminalName |
STRING | In | File name for terminals (64 chars), normally 'TERMINAL'. |
Direction: In = the program supplies the value, Out = the call returns it, In/Out = both.
See also¶
SetPeripheralName, @SET-TERMINAL-FILE
Compatibility¶
| Machines | Users | Programs |
|---|---|---|
| ND-100 and ND-500 | User SYSTEM | 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 | No | No | No |
Examples¶
From the manual (OCR text, not corrected).
BYTES : TerminalName(0:63)
assemble
ON ROUTINEERROR DO
IF ErrCode <> 0 THEN ...
ENDON
Monitor_Call('SetTerminalName', TerminalName)
CHARACTER TerminalName*64
...
Monitor_Call('SetTerminalName', TerminalName(1:64))
IF (ErrCode .NE. 0) THEN ...
01 TerminalName PIC X(64).
01 ErrCode COMP.
...
MONITOR-CALL "SetTerminalName" USING TerminalName.
CALL "CbError" USING ErrCode.
IF ErrCode NOT = 0 GO ...
assemble
FileName : STRINGDATA 'TERMINAL'...
ErrCode : W BLOCK 1
...
SetTerminalName : EQU 37B9 + 275B
CALLG SetTerminalName, 1, FileName
IF K GO ERROR
...
ERROR : W1 =. ErrCode %ErrorCode in W1 register.
assemble
LDX (NAME %Address of string containing terminal name.
MON 275 %Monitor call SetTerminalName.
...
NAME, 'TERMINAL' %Set terminal name to TERMINAL.
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_275B_SetTerminalName |
| Code lines | 6 (non-blank, non-comment lines in the file) |
Source¶
SINTRAN III Monitor Calls (ND-860228.2 EN), page 475.