340B ReadSystemRecord¶

Stub MON 340B (224 decimal) · Mnemonic RSREC · Group: Not grouped in manual

Available from: not known - no compatibility box captured from the manual

Emulation source: src/handlers/mon_340B_ReadSystemRecord.c

Description¶

Used to read the system record into a buffer.

Parameters¶

Name	Type	Direction	Description
`RecordType`	INTEGER2	In	Record type: 1=RT-description, 2=segment entry.
`AddressOrNumber`	INTEGER2	In	RT-description address or segment number.
`Buffer`	INTEGER2[]	Out	Buffer to receive system record. Minimum 38 words for RecordType=1, 8 words for RecordType=2.
`Format`	INTEGER2	In	Format (ND-500 only): 0=return information in 16-bit integer format.

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

Compatibility¶

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

From the YAML extraction; this call's page in the manual had no compatibility box that was captured.

Examples¶

From the manual (OCR text, not corrected).

ASSEMBLY-500MAC

| RECTYPE | W BLOCK 1  | % RT-description/segment entry            |
|---------|------------|-------------------------------------------|
| ADDNO   | W BLOCK 1  | % address of RT-descr/ND-100 segment      |
| ENTRY   | H BLOCK 38 | % buffer, 38 words                        |
| FORMAT  | W BLOCK 1  | % format (16/32-bit integer)              |
| RSREC   | EQU 37000000340B | % RSREC = MON 340                   |

CALLG RSREC,4,RECTYPE,ADDNO,ENTRY,FORMAT % MON RSREC with 4 parameters
IF K GO ERROR % on error return, W1 = error code

- LDA RECTP  %Load A register with the record type.
- LDT RTADR  %Load T register with RT address or segment no.
- LDX (BUFFR %Load X register with address of the buffer.
- MON 340    %Monitor call ReadSystemRecord.
- JMP ERROR  %Error return.
  ...        %Normal return.

| RECTP. | 1    |
|--------|------|
| RTADR. | 54214|
| BUFFR. | 0 *+46/ %Reserve 46 (38 words). |


ND-100 and ND-500  User RT and user SYSTEM  RT programs

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_340B_ReadSystemRecord`
Code lines	8 (non-blank, non-comment lines in the file)

Source¶

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