436B SetND500Param¶
Stub MON 436B (286 decimal) · Mnemonic 5PASET · Group: Monitor Calls for Error Handling (manual section 2.8)
Available from: All programs (manual compatibility box)
Emulation source: src/handlers/mon_436B_SetND500Param.c
Description¶
Sets information about an ND-500 program. Use GetND500Param to read the 5 parameters when a program is terminated.
- SINTRAN III sets some of the parameter values if you give the command @ENABLE-TERMINATION-HANDLING first.
Parameters¶
| Name | Type | Direction | Description |
|---|---|---|---|
Buffer |
INTEGER2[5] | In | 5-word buffer: [0]=user/dir index (bits 24:16=user, 15:0=directory), [1]=terminal device number, [2]=error number or -1 if ESCAPE, [3][4]=user parameters. |
Direction: In = the program supplies the value, Out = the call returns it, In/Out = both.
See also¶
TerminationHandling, GetUserParam, SetUserParam, and GetND500Param
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 ARRAY : Buffer(0:4)
...
Monitor_Call('SetND500Param', Buffer(0))
INTEGER Buffer(5)
...
Monitor_Call('SetND500Param', Buffer(1))
Buffer : RECORD...END;
...
SetND500Param(Buffer);
01 Buffer.
02 array COMP OCCURS 5 TIMES.
...
MONITOR-CALL "SetND500Param" USING Buffer.
Buffer : W BLOCK 5
SetND500Param : EQU 37B9 + 436B
...
CALLG SetND500Param, 1, Buffer
This monitor call is not available on the ND-100. See SetUserParam.
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_436B_SetND500Param |
| Code lines | 6 (non-blank, non-comment lines in the file) |
Source¶
SINTRAN III Monitor Calls (ND-860228.2 EN), page 451.